Thank you for your reply , but when I put the namespace EditorInput , the following error appear :
The type or namespace name 'EditorInput' does not exist in the namespace 'AutoDesk.AutoCAD' (are you missing an assembly reference?)
N.B. I added all the references concerning AutoCAD 2009 .
What must I do ???
style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<Elie911> wrote in message
href="news:6178582@discussion.autodesk.com">news:6178582@discussion.autodesk.com...
Thank you for your reply , but when I put the namespace EditorInput ,
the following error appear :
The type or namespace name
'EditorInput' does not exist in the namespace 'AutoDesk.AutoCAD' (are you
missing an assembly reference?)
N.B. I added all the
references concerning AutoCAD 2009 .
What must I do ???
Norman Yuan
Norman Yuan
Norman Yuan
Norman Yuan
Norman Yuan
Private Sub UserForm_initialize()
Dim app As excel.Application
Dim wbook As excel.Workbook
Dim wsheet As excel.Worksheet
Dim rg As excel.Range
Set app = excel.Application
Set wbook = app.Workbooks.Open("C:\Materials.xlsx")
Set wsheet = wbook.Worksheets(1)
Set rg = wsheet.Range(A1, D107)
Dim iCol As Integer
iCol = 2
Dim iRow As Integer
For iRow = 1 To 10 Step iRow + 1
ListBox1 = wsheet.Cells(iRow, 1).Value
Next
End Sub
but an error is appearing :
Run-time error '1004':
Method 'Range' of object '_worksheet' failed
plz help !!!