Refering to workbooks using a variable

[paulo33]

Anybody know how to refer to a workbook, using a variable??

My procedure asks the user to input the name of the excel workbook to open, asigns this filename to a variable, and opens it. Then I need to call this opened workbook, from the original procedure, but I don´t know how to refer to it using the original variable which stores the workbook name.

 

[Zathras]

When you open a workbook, it becomes the active book:
[blue]

Option Explicit

Sub test()
Dim sWork As String
  sWork = "c:\JulySummary.xls"
  OpenMyBook sWork
End Sub

Sub OpenMyBook(ABookName As String)
Dim oWorkbook As Workbook
  Workbooks.Open ABookName
  Set oWorkbook = ActiveWorkbook
  MsgBox oWorkbook.Name
  Set oWorkbook = Nothing
End Sub

[/color]