Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Workbooks.Open Filename
Dear all,
'I ask for a new filename: fileKimutatas = Application.GetOpenFilename("Adatok (*.xls), *.xls") If fileKimutatas < False Then 'I open it, if the string not empty: Workbooks.Open Filename:=fileKimutatas 'Operations: .... 'I am going back to the original file: Workbooks("Gazszamla_adatok.xls").Activate 'Operations: .... 'I activate the opened file: Workbooks(2).Activate .... .... End if My question is: Instead of Workbooks(2).Activate how could I link to that file? (The "fileKimutatas" variable has the name of the file) Thank you in advance! |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Workbooks.Open Filename
Set oOldWB = Workbooks("Gazszamla_adatok.xls").
tfileKimutatas = Application.GetOpenFilename("Adatok (*.xls),*.xls") If fileKimutatas < False Then 'I open it, if the string not empty: Set oNewWB = Workbooks.Open(Filename:=fileKimutatas) 'Operations: .... 'I am going back to the original file: oOldWB.Activate 'Operations: .... 'I use the opened file: With oNewWB ' do something End With -- --- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "Konczér Tamás" wrote in message . .. Dear all, 'I ask for a new filename: fileKimutatas = Application.GetOpenFilename("Adatok (*.xls), *.xls") If fileKimutatas < False Then 'I open it, if the string not empty: Workbooks.Open Filename:=fileKimutatas 'Operations: .... 'I am going back to the original file: Workbooks("Gazszamla_adatok.xls").Activate 'Operations: .... 'I activate the opened file: Workbooks(2).Activate .... .... End if My question is: Instead of Workbooks(2).Activate how could I link to that file? (The "fileKimutatas" variable has the name of the file) Thank you in advance! |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
GetOpen filename to open files(Workbooks) | Excel Discussion (Misc queries) | |||
Workbooks.Open Filename:=.UpdateLinks:=0, IgnoreReadOnlyRecommended:=True | Excel Discussion (Misc queries) | |||
Workbooks.Open Filename | Excel Worksheet Functions | |||
Trying to Open Multiple WorkBooks w/ same beginning FileName | Excel Programming | |||
Workbooks.Open(filename) : Returning err: Object reference not... (in VB.NET) | Excel Programming |