in message:
How to I make an mde using vba code?
Here is some code by MVP Dirk "Yoda" Goldgar:
'----- start of code -----
Sub MakeMyMDE()
Dim accApp As Access.Application
Const PathToMDB As String = "C:\Your Path\YourApp.mdb"
Const PathToMDE As String = "C:\Your Path\YourApp.mde"
Set accApp = New Access.Application
accApp.SysCmd 603, PathToMDB , PathToMDE
accApp.Quit
Set accApp = Nothing
End Sub
'----- end of code -----