I am trying to execute the following given macro from the current
workbook. The macro opens the workbook "2148.xls" and waits there. It
does not proceed to run the macro "NextDay" as given in line number 3.
However, if I execute the entire macro step by step from Visual Basic
(using F8) it works fine. What could be the problem? What is the
solution.:


Workbooks.Open Filename:="C:\Data\GLIF\2148.xls"
Windows("2148.xls").Activate
Application.Run "2148.xls!NextDay"
ActiveWorkbook.Save
ActiveWorkbook.Close


NextDay macro is as under:

Sub NextDay()

Sheets("Summary").Select

Columns("H:H").Select
Application.CutCopyMode = False
Selection.Insert Shift:=xlToRight
Range("C6:C45").Select
Range("C45").Activate
Selection.Copy
Range("H6").Select
ActiveSheet.Paste
ActiveWorkbook.Save

End Sub