Copy text strings from AutoCAD into Excel

[sscott5]

I would like to be able to copy text strings from Autocad into Excel.
i.e. my drawing have several text strings in it "test1", "test2", "test3", and so on, I would like to be able at the click of a button for Excel to open and copy each of the text strings in to a spreadsheet. I'm able to get excel to open and see the text entities, I have tested this by using a bog standard change text height macro. The problem I'm having is that Im unable to get vba to recognise the text strings. Can anyone help.


Rgards

Steve

[fixo]

Steve, I wrote this some time ago
This is not you exactly need but
may lead you in the right way

Tested A2005, Excel2003

~'J'~

[Ed Jobe]

The problem I'm having is that Im unable to get vba to recognise the text strings.

Can you be more specific?

[h1d2ok261409]

Thank you , this is a nice idea !

[grobnik]

Steve, I wrote this some time ago
This is not you exactly need but
may lead you in the right way

Tested A2005, Excel2003

~'J'~

HI I had a look to your file and realted macro. But I have a question IS THERE A REASON to create the macro inside excel instead strarting from AUTOCAD.
I'm asking you this question because I have a lot of difficulty to transfer data from Autocad 2005 to excel 2007.
My Issue concern an already open an excel file, no problems if I create the Excel object as new.
If you want I'll post the code.

So your option could be a good idea starting from excel and getting data from Autocad.

I'll try.
Thank you.

Thank you

[fixo]

Hi grobnik,
I have some experience with Excel/Acad interaction
using early and late binding, so I need to see your code
for the better understanding your task
Guess, you need it on VB.Net or C#, let me know

Thank you

[grobnik]

Hi Fixo,
thank you very much for your support.
Here is a part of the code concerning the excel & Autocad integration. (Autocad 2005 & Excel 2007)
I got the code from the web site and also from several support forum (included AUGI).
The macro has been crated with Autocad 2005.

Dim MyExcel As Object
Dim MyExcelSheet As Object

On Error Resume Next
Set MyExcel = GetObject(, "Excel.Application")' <---- The MyEcel Objec is not retrived even if excel has been open. No msg box will be displayed. No new excel object will be created, if Excel is not running.

If Err.Number <> 0 Then ExcelWasNotRunning = True
Err.Clear ' Clear Err object in case error occurred.
' Check for Microsoft Excel. If Microsoft Excel is running,
' enter it into the Running Object table.

If Err <> 0 Then
Err.Clear
Set MyExcel_F1 = CreateObject("Excel.Application")

If Err <> 0 Then
MsgBox "Could Not Load Excel!", vbExclamation
End
End If
End If
On Error GoTo 0
MyExcel.Visible = True
'Excel.Workbooks.Add
MyExcel.Sheets("Foglio1").Select

[fixo]

Ok, that's pretty easy what you doing with this code
Please, explain me what is you goal,
better yet step-by-step
As I see this part is just get or create Excel object
and what you want after?, sorry not clearly enough
And also you didn't answer me what is the language you'll be
prefer, this one is pure VBA, but in another thread
you've asked about VB.NET as I remember it.
Perhaps,I'm wrong though

[grobnik]

Ok, that's pretty easy what you doing with this code
Please, explain me what is you goal,
better yet step-by-step
As I see this part is just get or create Excel object
and what you want after?, sorry not clearly enough
And also you didn't answer me what is the language you'll be
prefer, this one is pure VBA, but in another thread
you've asked about VB.NET as I remember it.
Perhaps,I'm wrong though

My MAIN problem concern the creation of an excel object, which should be represented by an existing opened excel file.
The code that I posted doesn't work with AUTOCAD 2005 and EXECEL 2007, the code is pure VBA, I never ask for VB.NET.
The routine hangs Set MyExcel_F1 = CreateObject("Excel.Application") the object will be not created.
The code provide for an error message but it doesn't appear, ExcelWasNotRunning variable it's always true.

Probably some part is missing (both MSOffice, or Autocad) I don't know.

When I have available the Excel Object I'll transfer some data from it to a Autocad Table.
The Autocad Table in 2005 version is not so easy to manage, linking to an excel worksheet.

I hope this helps you understanding more my ISSUE !.
Thank you.

[fixo]

Ok it's clearly enough,
I will be free just tomorrow only
Can you wait for?
on the quick glance I see just that these
two objects are different:

MyExcel_F1 and MyExcel

Thank you,
See later
Cheers