- Сообщения
- 738
- Реакции
- 21
Illustrator CS4. VBA
Нашел аналоги в JS. Переписал в VB. Не работает. (см строку с "object expected")
Sub test_rect()
Set aiApp = SetMyIll
Set aiCurDoc = aiApp.ActiveDocument
Set mColor = New GrayColor
mColor.Gray = 50
Set mrect = aiCurDoc.PathItems.Rectangle(10, 10, 50, 50, False)
' mColor = Array(0, 76, 0, 100) 'K C M Y '''' тут я пытался задать нужный мне цвет
' а дальше остановка... (((
mrect.PathItem.StrokeColor = mColor ''''''''''object expected!!!!!!!
End Sub
Нашел аналоги в JS. Переписал в VB. Не работает. (см строку с "object expected")
Sub test_rect()
Set aiApp = SetMyIll
Set aiCurDoc = aiApp.ActiveDocument
Set mColor = New GrayColor
mColor.Gray = 50
Set mrect = aiCurDoc.PathItems.Rectangle(10, 10, 50, 50, False)
' mColor = Array(0, 76, 0, 100) 'K C M Y '''' тут я пытался задать нужный мне цвет
' а дальше остановка... (((
mrect.PathItem.StrokeColor = mColor ''''''''''object expected!!!!!!!
End Sub