Thank you for your interest in helping me,
I wrote in excel the following in column (A1:A350) and i want to make a vba excel ( if possible ) that copy/paste the range in the autocad command line.
If I copy this range now in autocad it works.
I m new to all of this, and this is why probably I am not very clear.
RANGE :
Code:
-LAYER SET Axes
_ltscale 50
PLINE
0,-744.204496985428
1289,-744.204496985428
0,1488.40899397086
-1289,-744.204496985428
0,-744.204496985428
LINE
0,1488.40899397086
0,-744.204496985428
1289,-744.204496985428
-644.5,372.102248492714
-1289,-744.204496985428
644.5,372.102248492714
-LAYER SET Concrete
PLINE
-250,1738.40899397086
250,1738.40899397086
250,1238.40899397086
-250,1238.40899397086
CLOSE
*
-ARRAY
-250,1738.40899397086
Polar
0,0
2
-120
y
*
I started with opening autocad like this :
Code:
Sub Acad()
Dim strDrawing As String
On Error Resume Next
Set Graphics = GetObject(, "AutoCAD.Application")
If Err.Description > vbNullString Then
Err.Clear
Set Graphics = CreateObject("AutoCAD.Application")
End If
' ACAD.Visible = True
strDrawing = "C:\Users\s\Desktop\FD\tte.dwg"
Graphics.Documents.Open (strDrawing)
Graphics.Visible = True
On Error GoTo 0
End Sub