autocad中用 vba如何取用EXCEL单元格的值

如题所述

)

VBA:

Sub xx()
For i = 1 To 100 '从1行到100行
If Left(Cells(i, 2), 1) = "f" Then
Cells(i, 3) = 1
End If
Next
End Sub
温馨提示:答案为网友推荐,仅供参考