I am trying to get Access VBA to copy one of its modules out to a folder - I have looked at the other threads / google and no joy - what do you think? Code below
Sub copy_out_module()
Set appAccess = New Access.Application
Set dbsCurr = appAccess.CurrentProject
Const ModulePath As String = "C:UsersSjohnDocumentsComponents"
dbsCurr.Item("Module2").Export ModulePath
End Sub
See Question&Answers more detail:os