Open file(2) from file(1) and then close file(1)
Barb was partially right/ Here is the statement from VBA help file.
Variables declared using the Public statement are available to all
procedures in all modules in all applications unless Option Private Module
is in effect; in which case, the variables are public only within the
project in which they reside.
Caution The Public statement can't be used in a class module to declare a
fixed-length string variable.
"K_Macd" <kmacdonald "A_T" activ8 ''D O T'' net [ST OP] au wrote in message
...
Then why the hell did the the good folk at Microsoft ever use the term
'public' ?
--
Ken
"Using Dbase dialects since 82"
"Started with Visicalc in the same year"
"Barb Reinhardt" wrote:
IIRC, public variables are valid within a project, not from project to
project.
--
HTH,
Barb Reinhardt
"Alberto Ast" wrote:
I need to open a file(2) when I open file(1) and then close file(1)
File(1) name can change so I need variables.
sequence will be
Open File(1)
Open File(2)... I do it by the following macro:
Public LaunchFile As String 'in this public variable I want to keep
file(1) name
Private Sub Workbook_Open()
Dim lDir, lFile, lFileMtr As String
lDir = Sheets("launch").Range("B2") & "\" 'direction of my file
to open
lFile = Sheets("launch").Range("B3") & ".xls" 'file name to openm
lFileMtr = lDir & lFile 'complete string of file(2)
LaunchFile = ThisWorkbook.Name 'filename file(1)
Workbooks.Open Filename:=lFileMtr, ReadOnly:=True
End Sub
then on file(2) I have
Private Sub Workbook_Open()
msgbox LaunchFile 'I did it to be sure value stays but it is blank
so
next line fail.
workbooks(LaunchFile).close false
End Sub
Any idea where am I failing?
|