reference the currenlty open Excel from Word

[Essam Salah]

Hi All

I need to create a menu item in word that will get the selection of the
current open Excel sheet and then creates a table in word and populate it
with the data within the selection of Excel.

I know how to create the menu, create word table , etc...
but how to get a ref. to the Excel window

I tried the following code :
<------------------- >
Dim excl As Excel.Application
Set excl = CreateObject("Excel.Application")
MsgBox excl.Windows.Count

</------------------>

but it gives [ 0 ] , while I have one Excel window open !!!

Any Advice

Essam

 

[Tom Winter]

CreateObject may well be creating a new instance of Excel. You should try
GetObject first to get the currently running instance of Excel.

-Tom

 

[Pranav Wagh]

Try this,
Sub x()
Dim excl As Object
Set excl = GetObject(, "Excel.Application")
MsgBox excl.Windows.Count
End Sub
--
Thank You..
Pranav Wagh, MCP, MCSD
Developer Support - Office Integration
Microsoft India(R & D) Pvt. Ltd

CreateObject may well be creating a new instance of Excel. You should try
GetObject first to get the currently running instance of Excel.

-Tom

Hi All

I need to create a menu item in word that will get the selection of the
current open Excel sheet and then creates a table in word and populate it
with the data within the selection of Excel.

I know how to create the menu, create word table , etc...
but how to get a ref. to the Excel window

I tried the following code :
<------------------- >
Dim excl As Excel.Application
Set excl = CreateObject("Excel.Application")
MsgBox excl.Windows.Count

</------------------>

but it gives [ 0 ] , while I have one Excel window open !!!

Any Advice

Essam