Solved AutoExec Macro

[Romio_1968]

Hello World...

I have a procedure in a standard module and I want to run it in AutoExec Macro
For some reason i don't understand, Access does not recognize the procedure, so the macro fails.
I tried to run call the procedure using the Run Code in the macro.
The procedure is compiled.

Here is the Code

Public Sub FormatForms()
    Dim frm As Form
    Dim ctl As Control
    
    For Each frm In CurrentDb.Containers("Forms").Documents
        If frm.Name <> "AdminP_Frm" And frm.Name <> "Scrap_Frm" Then
            frm.Width = 28.3 * 567
            For Each ctl In frm.Controls
                Select Case ctl.ControlType
                    Case acLabel, acImage, acFrame, acTextBox, acComboBox, acListBox, acOptionButton, acCheckBox, acCommandButton, acToggleButton, acTabCtl, acPage
                        ctl.Left = ctl.Left + 5.15 * 567
                    Case Else
                        'Do nothing
                End Select
            Next ctl
        End If
    Next frm
End Sub

Can anybody tell me what am I doing wrong here?

 

[sonic8]

IIRC, the RunCode action of a macro only supports functions, not sub procedures.

 

[Romio_1968]

True... I changed it into a function and it works
But i discarded it.
Messy job

Thank you,