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

Copy formula down without changing references
If you have =SUM(F2:F49) in F50; type Alt+' in F51 to copy =SUM(F2:F49) to F51, leaving the formula in edit mode. Change SUM to COUNT.
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,224,823
Messages
6,181,182
Members
453,021
Latest member
Mohamed Magdi Tawfiq Emam

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