VBA Workbooks.activate default

jakobt

Active Member
Joined
May 31, 2010
Messages
337
Created a macro to define a variable for the current activated workbook. Then I open another file. And then I want to activate the first workbook. The code defaults when cworkbook is asked to be activated in the end of the code:


Sub This_Workbook()
'Reference to active work book


Dim cWorkbook As Workbook


Set cWorkbook = activeworkbook


Debug.Print cWorkbook.Name


Workbooks.Open ("S:\TB\UK TB_MTD_0918-en-us.xlsx")


Workbooks(cWorkbook).Activate




End Sub
 

Excel Facts

Square and cube roots
The =SQRT(25) is a square root. For a cube root, use =125^(1/3). For a fourth root, use =625^(1/4).
I swap between the existing workbook and a new workbook using this code:
Code:
CurrentWorkbookName = ActiveWorkbook.Name
Workbooks.Add
NewWorkbookName = ActiveWorkbook.Name
' do something in the the new workbok


Workbooks(CurrentWorkbookName).Activate
' swap back to the orginal workbook
 
Upvote 0
jakobt, what happens in your original code if you change

Code:
Workbooks(cWorkbook).Activate
to
Code:
cWorkbook.Activate
 
Upvote 0

Forum statistics

Threads
1,214,924
Messages
6,122,293
Members
449,077
Latest member
Rkmenon

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top