View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Eduardo Eduardo is offline
external usenet poster
 
Posts: 2,276
Default error when running macro from another workbook


Hi,
Was the workbook saved with extension xlsm (macro enable)

"Scooter" wrote:

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