S
Scooter
With the below code in a workbook I get "Cannot run macro. Macro may not be
available in this workbook or all macros my be disabled." I have checked
that all macros are enabled under the trust center and MonthlyUpdate is not a
private sub and does exist in the second workbook. What am I missing?
Sub UpdateBig()
Dim PathToFile As String
Dim File2Update As Workbook
Dim MyResult As Variant
Dim NameofFile As String
NameofFile = "abc.xls"
PathToFile = "C:\Documents and Settings\me\My Documents"
Set File2Update = Workbooks.Open(PathToFile & "\" & NameofFile)
MyResult = Application.Run(File2Update.Name & "!MonthlyUpdate")
Windows(File2Update).Activate
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub
available in this workbook or all macros my be disabled." I have checked
that all macros are enabled under the trust center and MonthlyUpdate is not a
private sub and does exist in the second workbook. What am I missing?
Sub UpdateBig()
Dim PathToFile As String
Dim File2Update As Workbook
Dim MyResult As Variant
Dim NameofFile As String
NameofFile = "abc.xls"
PathToFile = "C:\Documents and Settings\me\My Documents"
Set File2Update = Workbooks.Open(PathToFile & "\" & NameofFile)
MyResult = Application.Run(File2Update.Name & "!MonthlyUpdate")
Windows(File2Update).Activate
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub