Switching to another workbook via VBA

[davidam]

Hello. I am using VBA to open another workbook and then close the workbook that holds the code. There are quite a few operations and I hide the activity by disabling ScreenUpdating. To make this work I have enabled ScreenUpdating before closing the original file...this means that the user sees some jumping around that I would rather avoid. If I do not do this it behaves unpredictably...sometimes it will execute a random module in the new book or just freeze on the original book. Any suggestions? Many thanks!

Workbooks("Input.xls").Activate 'this is the new book
 Application.EnableEvents = True
ActiveSheet.Protect Password:=PW
Application.ScreenUpdating = True
Workbooks("Choose Case.xls").Activate ' the original book with this code
ActiveWorkbook.Close SaveChanges:=False

 

[pedie]

To close the workbook that holds the code

[/FONT]
[FONT=Courier New]thisworkbook.close false 'true if you wish to[/FONT]
[FONT=Courier New]

 

[davidam]

Would I still activate the original workbook?

 

[davidam]

I tried it witout activating the original book and it worked nicely. Thank you!

 

[pedie]

[/FONT]
[FONT=Courier New]Workbooks("Input.xls").Activate 'this is the new book
ActiveSheet.Protect Password:=PW
ThisWorkbooks.Close false[/FONT]
[FONT=Courier New]

If you run this code then
Input.xls will be activated after original book is closed.
You dont have to use
Workbooks("Input.xls").Activate
again because the book that contains code is already closed.

 

[davidam]

Works perfect. Thank you!

 

[ctnguyen89]

oh, yes
Input.xls will be activated after original book is closed.
You dont have to use
Workbooks("Input.xls").Activate
again because the book that contains code is already closed.
Thanks.