Переместить атрибут блока в формулу - PullRequest
0 голосов
/ 07 июня 2019

Я пытаюсь использовать TextString некоторого атрибута блока из Autocad в формуле или процедуре, но не знаете, как мне его определить?Точно, я хотел бы использовать att (I) .TextString в процедуре, включающей все, что форматирует If, но независимо от того, создаю ли я процедуру с переменной String или переменной Variant, она все равно не работает

att(I).TextString = Cells(rowNum, 23)
setScale att(I).TextString
Sub setScale(text As String)
If Len(text) > 43 Then
 text.ScaleFactor = 0.4
ElseIf Len(text) > 30 Then
 text.ScaleFactor = 0.5
ElseIf Len(text) > 21 Then
 text.ScaleFactor = 0.6
End If
End Sub

Ошибка "Invalidклассификатор "

...