Merhaba,
Access dosyasındaki bir makroyu aşağıdaki kod ile excel üzerinden çalıştırabiliyoruz.
Birden fazla acccess dosyasını, sırası ile, önce ilk accessteki makroyu çalıştır, run bittikten sonra ikinci access'e geç ve bu accessteki makroyu da çalıştır gibi birşey mümkün mü?
Yani mesela A.mdb ve B.mbd diye iki tane access dosyam olsun. A.mbd'deki makroyu çalıştırsın, bunu çalıştırdıktan sonra B.mbd'ye geçsin ve bundaki makroyu çalıştırsın, A.mbd'nin run'ı bitmeden B.mbd'ye geçmesin.
Fikri olan var mı? tşk.
Sub Run_Access_Macro()
'Opens Microsoft Access and the file nwind.mdb
Shell("c:\access\msaccess.exe c:\access\sampapps\nwind.mdb")
'Initiates a DDE channel to Microsoft Access
Chan = DDEInitiate("MSACCESS", "system")
'Activates Microsoft Access
Application.ActivateMicrosoftApp xlMicrosoftAccess
'Runs the macro "Sample AutoExec" from the NWIND.MDB file
Application.DDEExecute Chan, "Sample AutoExec"
'Terminates the DDE channel
Application.DDETerminate Chan
End Sub
Access dosyasındaki bir makroyu aşağıdaki kod ile excel üzerinden çalıştırabiliyoruz.
Birden fazla acccess dosyasını, sırası ile, önce ilk accessteki makroyu çalıştır, run bittikten sonra ikinci access'e geç ve bu accessteki makroyu da çalıştır gibi birşey mümkün mü?
Yani mesela A.mdb ve B.mbd diye iki tane access dosyam olsun. A.mbd'deki makroyu çalıştırsın, bunu çalıştırdıktan sonra B.mbd'ye geçsin ve bundaki makroyu çalıştırsın, A.mbd'nin run'ı bitmeden B.mbd'ye geçmesin.
Fikri olan var mı? tşk.
Sub Run_Access_Macro()
'Opens Microsoft Access and the file nwind.mdb
Shell("c:\access\msaccess.exe c:\access\sampapps\nwind.mdb")
'Initiates a DDE channel to Microsoft Access
Chan = DDEInitiate("MSACCESS", "system")
'Activates Microsoft Access
Application.ActivateMicrosoftApp xlMicrosoftAccess
'Runs the macro "Sample AutoExec" from the NWIND.MDB file
Application.DDEExecute Chan, "Sample AutoExec"
'Terminates the DDE channel
Application.DDETerminate Chan
End Sub