activating a workbook
 

I need to activate a workbook through a cell reference. the workook
name is stored in cell A1 as "pnlreport_060321.xls". This name
automatically changes daily based on the date. This is how I wrote the
code to activate the workbook:

Sub import()

Dim fileA As String
fileA = Range("A1").Value
windows("fileA").Activate

End Sub

Please HELP. How would I activate a workbook which is already open. I
cannot use the file name in the code because the name changes every
day.

Thanks : )

activating a workbook
 

if it's already open, just delete the quotes

Windows(fileA).Activate


--


Gary


"VB Script for Excel" wrote in message
oups.com...
I need to activate a workbook through a cell reference. the workook
name is stored in cell A1 as "pnlreport_060321.xls". This name
automatically changes daily based on the date. This is how I wrote the
code to activate the workbook:

Sub import()

Dim fileA As String
fileA = Range("A1").Value
windows("fileA").Activate

End Sub

Please HELP. How would I activate a workbook which is already open. I
cannot use the file name in the code because the name changes every
day.

Thanks : )

activating a workbook
 

Gary
It still does not work. Gives me a Run-Time Error 9 message: Subscript
out of range.
Thanks

activating a workbook
 

what, exactly, is in A1

--


Gary


"VB Script for Excel" wrote in message
oups.com...
I need to activate a workbook through a cell reference. the workook
name is stored in cell A1 as "pnlreport_060321.xls". This name
automatically changes daily based on the date. This is how I wrote the
code to activate the workbook:

Sub import()

Dim fileA As String
fileA = Range("A1").Value
windows("fileA").Activate

End Sub

Please HELP. How would I activate a workbook which is already open. I
cannot use the file name in the code because the name changes every
day.

Thanks : )

activating a workbook
 

also, is the workbook already open, or do you need code to open it, too?

--


Gary


"VB Script for Excel" wrote in message
ups.com...
Gary
It still does not work. Gives me a Run-Time Error 9 message: Subscript
out of range.
Thanks

activating a workbook
 

if it's already loaded, try this. you may not have the file extension in A1

Windows(fileA & ".xls").Activate


--


Gary


"VB Script for Excel" wrote in message
ups.com...
Gary
It still does not work. Gives me a Run-Time Error 9 message: Subscript
out of range.
Thanks

activating a workbook
 

The workbook is already open. Need to activate that open workbook.
filename to open that workbook is located in cell A1 of current
workbook (the workbook in which I am writing the macros).
:)

activating a workbook
 

A1 in the current workbook gives me the file name that changes everyday
due to date.
A1 shows:
="pnlreport_"& TEXT(now(),"yymmdd")& ".xls"
this will produce: pnlreport_060321.xls if today's date is 21st March
2006.

I need to activate this file, which is already open through VB. But it
gives me a run time error in above code.


Thanks

activating a workbook
 

Again gives me same Run Time Error '9': Subscript out of range. Makes
the line Windows(fileA & ".xls").Activate as yellow.

Thnx

activating a workbook
 

i put your formula in A1 and this worked for me
Windows(fileA).Activate

maybe you should qualify the range with the sheet name, since i don't know what
the active sheet is

fileA =
workbooks("YourWorkbookName").worksheets("YourShee tName").Range("A1").Value

--


Gary


"VB Script for Excel" wrote in message
oups.com...
A1 in the current workbook gives me the file name that changes everyday
due to date.
A1 shows:
="pnlreport_"& TEXT(now(),"yymmdd")& ".xls"
this will produce: pnlreport_060321.xls if today's date is 21st March
2006.

I need to activate this file, which is already open through VB. But it
gives me a run time error in above code.


Thanks

activating a workbook
 

you have & ".xls" already in A1, i didn't know until you just posted the
formula, so this wouldn't work.

--


Gary


"VB Script for Excel" wrote in message
ups.com...
Again gives me same Run Time Error '9': Subscript out of range. Makes
the line Windows(fileA & ".xls").Activate as yellow.

Thnx

activating a workbook
 

IT WORKS GARY!!!!
thank you so much and thanks a millionsss.
i really appreciate your help

Dhaval

activating a workbook
 

you're welcome

--


Gary


"VB Script for Excel" wrote in message
oups.com...
IT WORKS GARY!!!!
thank you so much and thanks a millionsss.
i really appreciate your help

Dhaval