Eksekvering af macro ved åbning af workbook
Via WorkBookMain åbner jeg en anden workbook (SecWB1).Når SecWB1 åbner, skal den automatisk eksekvere en macro.
Nedenfor er hvad jeg har forsøgt. SecWB1 åbnes, men ingen macro aktiveres!
WorkBookMain
Sub OpenWB()
Dim tmpWB As Workbook
MsgBox ("OpenWB")
Application.EnableEvents = True
Workbooks.Open ("C:\Users\us5s\Desktop\TestAfOpenWB\SecWB1")
Workbooks("SecWB1").RunAutoMacros xlAutoOpen
End Sub
Workbook: SecWB1
Sub Main()
MsgBox (ThisWorkbook.Name)
End Sub
Sub xlAuto_open()
MsgBox ("auto OK")
End Sub
Sub xlAutoOpen()
MsgBox ("xlAutoOpen")
End Sub
