I need a macro that will open a second Excel program and open a specific file
name "name.xls" at the same time.

I could also use a macro that would only open a second Excel program with an
empty workbook.

Thanks in advance for your help.

Matt @ Launchnet

--
Please take a look at www.openoursite.com and you will see how I want to
use.

God Bless for helping

Sub NewExcel()
Dim oXL As Object
Dim oWB As Object

Set oXL = CreateObject("Excel.Application")
oXL.Visible = True
Set oWB = oXL.Workbooks.Open("C:\myBook.xls")
'...
Set oWB = Nothing
oXL.Quit
Set oXL = Nothing
End Sub


--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"Launchnet" <u20911@uwe wrote in message news:73c27ac1692ba@uwe...
I need a macro that will open a second Excel program and open a specific
file
name "name.xls" at the same time.

I could also use a macro that would only open a second Excel program with
an
empty workbook.

Thanks in advance for your help.

Matt @ Launchnet

--
Please take a look at www.openoursite.com and you will see how I want to
use.

God Bless for helping

Good Morning Bob

Thanks for Macro, But I do have a problem. First, I copied the code directly
to my macro sheet. The code in Macro is now:

Sub NewExcel()
Dim oXL As Object
Dim oWB As Object

Set oXL = CreateObject("Excel.Application")
oXL.Visible = True
Set oWB = oXL.Workbooks.Open("C:\documents and settings\default\my
documents\computerclasshandouts.xls")
'...
Set oWB = Nothing
oXL.Quit
Set oXL = Nothing
End Sub


When I click on my macro, it opens a new instance of Excel and the desired
file (which I can see for a moment, but then it immediately closes and I only
have my original worksheet.

Any ideas would be appreciated.

Thanks
Matt@Launchnet

Bob Phillips wrote:
Sub NewExcel()
Dim oXL As Object
Dim oWB As Object

Set oXL = CreateObject("Excel.Application")
oXL.Visible = True
Set oWB = oXL.Workbooks.Open("C:\myBook.xls")
'...
Set oWB = Nothing
oXL.Quit
Set oXL = Nothing
End Sub

I need a macro that will open a second Excel program and open a specific
file
[quoted text clipped - 7 lines]

Matt @ Launchnet

--
Please take a look at www.openoursite.com and you will see how I want to
use.

God Bless for helping

Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...tions/200706/1

LOL! Yes, my code will do that.

This bit

'...

is where you should do what you want to do. If you don't want to do
anything, just have the extar instance of Excel, remove


Set oWB = Nothing
oXL.Quit
Set oXL = Nothing

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"Launchnet via OfficeKB.com" <u20911@uwe wrote in message
news:73ca036d9d0fa@uwe...
Good Morning Bob

Thanks for Macro, But I do have a problem. First, I copied the code
directly
to my macro sheet. The code in Macro is now:

Sub NewExcel()
Dim oXL As Object
Dim oWB As Object

Set oXL = CreateObject("Excel.Application")
oXL.Visible = True
Set oWB = oXL.Workbooks.Open("C:\documents and settings\default\my
documents\computerclasshandouts.xls")
'...
Set oWB = Nothing
oXL.Quit
Set oXL = Nothing
End Sub


When I click on my macro, it opens a new instance of Excel and the desired
file (which I can see for a moment, but then it immediately closes and I
only
have my original worksheet.

Any ideas would be appreciated.

Thanks
Matt@Launchnet

Bob Phillips wrote:
Sub NewExcel()
Dim oXL As Object
Dim oWB As Object

Set oXL = CreateObject("Excel.Application")
oXL.Visible = True
Set oWB = oXL.Workbooks.Open("C:\myBook.xls")
'...
Set oWB = Nothing
oXL.Quit
Set oXL = Nothing
End Sub

I need a macro that will open a second Excel program and open a specific
file
[quoted text clipped - 7 lines]

Matt @ Launchnet

--
Please take a look at www.openoursite.com and you will see how I want to
use.

God Bless for helping

Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...tions/200706/1

Many Thanks Bob

I removed the 3 lines of code and it works perfect.

Now, I need a macro to simply open a new instance of Excel.
So, I tried copying the workable code to a new macro and rem'd out:
'Set oWB = oXL.Workbooks.Open("C:\documents and settings\default\my documents\
computerclasshandouts.xls")

Well, it didn't do anything except flash or blink the existing copy of Excel
that the original macro is in.

Can I please ask for help one more time ?

Matt@Launchnet

Bob Phillips wrote:
LOL! Yes, my code will do that.

This bit

'...

is where you should do what you want to do. If you don't want to do
anything, just have the extar instance of Excel, remove

Set oWB = Nothing
oXL.Quit
Set oXL = Nothing

Good Morning Bob

[quoted text clipped - 44 lines]

Matt @ Launchnet

--
Please take a look at www.openoursite.com and you will see how I want to
use.

God Bless for helping

Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...tions/200706/1

Matt,

Just to check, can you post the actual code that you now have?

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"Launchnet via OfficeKB.com" <u20911@uwe wrote in message
news:73cf7a1889582@uwe...
Many Thanks Bob

I removed the 3 lines of code and it works perfect.

Now, I need a macro to simply open a new instance of Excel.
So, I tried copying the workable code to a new macro and rem'd out:
'Set oWB = oXL.Workbooks.Open("C:\documents and settings\default\my
documents\
computerclasshandouts.xls")

Well, it didn't do anything except flash or blink the existing copy of
Excel
that the original macro is in.

Can I please ask for help one more time ?

Matt@Launchnet

Bob Phillips wrote:
LOL! Yes, my code will do that.

This bit

'...

is where you should do what you want to do. If you don't want to do
anything, just have the extar instance of Excel, remove

Set oWB = Nothing
oXL.Quit
Set oXL = Nothing

Good Morning Bob

[quoted text clipped - 44 lines]

Matt @ Launchnet

--
Please take a look at www.openoursite.com and you will see how I want to
use.

God Bless for helping

Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...tions/200706/1