how do i open a second workbook automatically

  • Thread starter Thread starter swain.s
  • Start date Start date
S

swain.s

i have tried all of the following

Double click 'This WorkBook' and paste the below code to the right code pane.
Private Sub Workbook_Open()
Workbooks.Open Me.Path & "\data.xls"
End Sub

Private Sub Workbook_Open()
Workbooks.Open ("C:\data.xls")
End Sub
Private Sub Workbook_Open()
Workbooks.Open Filename:="D:\lorne stewart\timesheet\2008\data.xls"
End Sub
Click to expand...

i have several answers but none work
 
What do you mean when you say it doesn't work? Do you get an error message or
does nothing seem to happen at all? If you get an error message that the file
cannot be found, the path and/or filename in the macro are not correct. If
nothing seems to happen, you probably have macros disabled or the code is not
in the ThisWorkbook module (when you are in the ThisWorkbook module, the
title at the top of the screen should say [ThisWorkbook (Code)].) There is
nothing wrong with the code itself.

Hope this helps,

Hutch
 
run time error'1004'
Tom Hutchins said:
What do you mean when you say it doesn't work? Do you get an error message or
does nothing seem to happen at all? If you get an error message that the file
cannot be found, the path and/or filename in the macro are not correct. If
nothing seems to happen, you probably have macros disabled or the code is not
in the ThisWorkbook module (when you are in the ThisWorkbook module, the
title at the top of the screen should say [ThisWorkbook (Code)].) There is
nothing wrong with the code itself.

Hope this helps,

Hutch

[email protected] uk said:
i have tried all of the following

Double click 'This WorkBook' and paste the below code to the right code pane.
Private Sub Workbook_Open()
Workbooks.Open Me.Path & "\data.xls"
End Sub

Private Sub Workbook_Open()
Workbooks.Open ("C:\data.xls")
End Sub


i have several answers but none work
Click to expand...
Click to expand...
 
1004 generally means there is no such path or filename.


Gord Dibben MS Excel MVP

run time error'1004'
Tom Hutchins said:
What do you mean when you say it doesn't work? Do you get an error message or
does nothing seem to happen at all? If you get an error message that the file
cannot be found, the path and/or filename in the macro are not correct. If
nothing seems to happen, you probably have macros disabled or the code is not
in the ThisWorkbook module (when you are in the ThisWorkbook module, the
title at the top of the screen should say [ThisWorkbook (Code)].) There is
nothing wrong with the code itself.

Hope this helps,

Hutch

[email protected] uk said:
i have tried all of the following

Double click 'This WorkBook' and paste the below code to the right code pane.
Private Sub Workbook_Open()
Workbooks.Open Me.Path & "\data.xls"
End Sub

Private Sub Workbook_Open()
Workbooks.Open ("C:\data.xls")
End Sub

Private Sub Workbook_Open()
Workbooks.Open Filename:="D:\lorne stewart\timesheet\2008\data.xls"
End Sub

i have several answers but none work
Click to expand...
Click to expand...
Click to expand...
 
i had to change the flie extension from .xls to .xlsx to work with office 2007

Gord Dibben said:
1004 generally means there is no such path or filename.


Gord Dibben MS Excel MVP

run time error'1004'
Tom Hutchins said:
What do you mean when you say it doesn't work? Do you get an error message or
does nothing seem to happen at all? If you get an error message that the file
cannot be found, the path and/or filename in the macro are not correct. If
nothing seems to happen, you probably have macros disabled or the code is not
in the ThisWorkbook module (when you are in the ThisWorkbook module, the
title at the top of the screen should say [ThisWorkbook (Code)].) There is
nothing wrong with the code itself.

Hope this helps,

Hutch

:

i have tried all of the following

Double click 'This WorkBook' and paste the below code to the right code pane.
Private Sub Workbook_Open()
Workbooks.Open Me.Path & "\data.xls"
End Sub

Private Sub Workbook_Open()
Workbooks.Open ("C:\data.xls")
End Sub

Private Sub Workbook_Open()
Workbooks.Open Filename:="D:\lorne stewart\timesheet\2008\data.xls"
End Sub

i have several answers but none work
Click to expand...
Click to expand...

.
Click to expand...
 
You should be able to open *.xls files in 2007 version.


Gord

i had to change the flie extension from .xls to .xlsx to work with office 2007

Gord Dibben said:
1004 generally means there is no such path or filename.


Gord Dibben MS Excel MVP

run time error'1004'
:

What do you mean when you say it doesn't work? Do you get an error message or
does nothing seem to happen at all? If you get an error message that the file
cannot be found, the path and/or filename in the macro are not correct. If
nothing seems to happen, you probably have macros disabled or the code is not
in the ThisWorkbook module (when you are in the ThisWorkbook module, the
title at the top of the screen should say [ThisWorkbook (Code)].) There is
nothing wrong with the code itself.

Hope this helps,

Hutch

:

i have tried all of the following

Double click 'This WorkBook' and paste the below code to the right code pane.
Private Sub Workbook_Open()
Workbooks.Open Me.Path & "\data.xls"
End Sub

Private Sub Workbook_Open()
Workbooks.Open ("C:\data.xls")
End Sub

Private Sub Workbook_Open()
Workbooks.Open Filename:="D:\lorne stewart\timesheet\2008\data.xls"
End Sub

i have several answers but none work
Click to expand...

.
Click to expand...
Click to expand...
 
Back
Top