activate workbook w/unknown name

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Can I activate an open workbook without knowing name?

I have a macro that unprotects a workbook, copys and moves a worksheet,
activates the main workbook to re-protect it but I want to leave the user in
the new workbook. I don’t know if the name is Book2 or Book3, etc>

Sheets("Grid (2)").Move
ThisWorkbook.Activate
Sheets("Cover").Select
Range("C11").Select
ActiveWorkbook.Protect (["password"])
Now I want to activate the single sheet workbook that I moved (Book2 or Book3)
 
When you are in the new workbook, set a workbook object to it

Set oWB = ActiveWorkbook

You can always come back to it using that object variable
 
I like to use a range object and use that:

Dim CurRng as range

set currng = selection
'do lots of stuff
'now go back
application.goto currng



Jim said:
Can I activate an open workbook without knowing name?

I have a macro that unprotects a workbook, copys and moves a worksheet,
activates the main workbook to re-protect it but I want to leave the user in
the new workbook. I don’t know if the name is Book2 or Book3, etc>

Sheets("Grid (2)").Move
ThisWorkbook.Activate
Sheets("Cover").Select
Range("C11").Select
ActiveWorkbook.Protect (["password"])
Now I want to activate the single sheet workbook that I moved (Book2 or Book3)
 
Back
Top