cannot create accde (1 Viewer)

[sammers101]

More ways to debug compile errors? Having problems creating an accde file
Trying to follow the directions "Correct any problems in the code that prevent you from compiling the database or project" from microsoft to no avail
I added

Sub Generate_Compile_Error()
 MsgBoxx "This will cause an error"
End Sub

as a module but don't see an error message or message box when trying to save as an accde, other than "Microsoft Access was unable to create the .accde, .mde, or .ade file"

It's a front end file, I have already deleted all my linked tables as they were linked to accdb files. Any other reasons I might not be able to create an accde file?

 

[arnelgp]

To each module, form's code, report's code
Add;

Option Explicit

Declaration, then try to compile it and your error will appear.

 

[Ranman256]

When you clicked COMPILE, the error should have shown. DId it?

 

[sammers101]

I've deleted all the forms and reports to try to narrow it down and still getting the same issue. Very odd, only thing left is a brand new form named start, local tables, and a module with the code

Sub Generate_Compile_Error()
MsgBoxx "This will cause an error"
End Sub

I'm thinking I will try to import everything into a new file and try again

 

[Rene vK]

MsgBox with only one 'x' ? or did you write a Function?

 

[sammers101]

Did I do something wrong with the module code?

Option Compare Database
Option Explicit
    Sub Generate_Compile_Error()
    MsgBoxx "This will cause an error"
    End Sub

 

[sammers101]

Removing the extra x worked. I had copied what MS had *eye roll*

Unable to save a database as an accde or mde file - Microsoft 365 Apps

There is an error in the VBA code that prevents you from compiling a database or project or there is a reference.

docs.microsoft.com

Now to see what the actual error was...

 

[Isaac]

1. Do you really have MsgBoxx ? Is MsgBoxx a custom function or class?

2. Did you actually Compile prior to trying to create the accde?

 

[sammers101]

I do not have a msgboxx function, I was copying the code Microsoft had on their website, it appears they have a typo.
I found the error, I was trying to use ShellToFile for links in a to do list. Is there another way that allows users to click links that are part of a list?
Some items in the list have a link, others do not. They are different links

Private Sub cmdOpen_Click()

    If Not IsNull(Me.link) Then
        ShellToFile Me.link
    End If
    
End Sub