StillHammer
7c3dd3fb31
- Test and helper VBS scripts for VBA MCP development - Technical reference documentation and PDFs - HTML form templates for all 5 forms - PowerShell and Python scripts for PDF/documentation generation Co-Authored-By: Claude Haiku 4.5 <noreply@anthropic.com>
16 lines
357 B
Plaintext
16 lines
357 B
Plaintext
Dim accessApp
|
|
Set accessApp = GetObject(, "Access.Application")
|
|
|
|
' Executer le code directement via VBE
|
|
Dim vbProj
|
|
Set vbProj = accessApp.VBE.VBProjects(1)
|
|
|
|
' Trouver le module
|
|
Dim vbComp
|
|
Set vbComp = vbProj.VBComponents("mod_FixFormBindings")
|
|
|
|
' Executer la procedure
|
|
accessApp.DoCmd.RunMacro "mod_FixFormBindings.FixAllFormBindings"
|
|
|
|
WScript.Echo "Done!"
|