Необходимо задать цвет линии у ячейки таблицы

[EugenLi]

Поможите люди добрые!
Необходимо задать цвет линии у ячейки таблицы, пишу так:

myCell.BottomEdgeStrokeColor = mySwatches.Item(Combo13.ListIndex + 1)
- выдает ошибку несовпадения типа.

Это вообщем так и есть:
myCell.BottomEdgeStrokeColor - типа Swatch
mySwatches.Item(Combo13.ListIndex + 1) - типа Color

КАК СДЕЛАТЬ???

для Бутрина - mySwatches.Item(Combo13.ListIndex + 1) - именно типа Color, а вот "None" - типа Swatch

 

[EugenLi]

Ответ: Необходимо задать цвет линии у ячейки таблицы

Толи народ в продолжительных выходных, толи озадачил всех не по-детски... :confused:

 

[pm4]

Ответ: Необходимо задать цвет линии у ячейки таблицы

Толи народ в продолжительных выходных, толи озадачил всех не по-детски... :confused:

Интересный вопрос!!!!!!

 

[vbatushev]

Ответ: Необходимо задать цвет линии у ячейки таблицы

Жень, лень было на VB писать Но вот код, который на JS 100%-но сработал

app.selection[0].bottomEdgeStrokeColor = app.activeDocument.colors[2];

Выделена была ячейка, то есть app.selection[0] соответствует твоему myCell, в качестве параметра для colors использована цифра, что также аналогично твоему "Combo13.ListIndex + 1".

Для pm4: Я очень попрошу Вас воздержаться от бессодержательных комментариев. Хочется сказать что-нибудь дельное – говорите, нечего сказать – …

 

[EugenLi]

Ответ: Необходимо задать цвет линии у ячейки таблицы

Виталий! Спасибо за ответ, хотя он мало чем поможет: во-первых, потому что мне Басик нужен, во-вторых, да же на неБасике смысл остается тем же - будет несовпадение типов, т.к., получается, myDoc.Color = myDoc.Swatches :eek: , за исключением цвета "None", который типа Swatch. Вообщем - засада!!! :mad:
Толи в описании типов чего напутали, толи .

А вот еще вопрос (или это необходимо в новую тему вынести?): возможно ли обрабатывать ВСЕ ячейки в таблице сразу (как в ручную в ИД выделяя диоганальной стрелкой)? Это через Selection надо, да7 Если можно поподробнее (можно на неБасике ).

 

[vbatushev]

Ответ: Необходимо задать цвет линии у ячейки таблицы

Жень, ты будешь смеяться, но вот тебе на VB и со свотчами :

Dim myID
Set myID = CreateObject("InDesign.Application.CS")
myID.Selection.Item(1).BottomEdgeStrokeColor = myID.ActiveDocument.Swatches.Item(5)

По поводу таблиц подумаю.

 

[EugenLi]

Ответ: Необходимо задать цвет линии у ячейки таблицы

Что есть Selection в этом случае (я не слишком не доганяю?...) Если это есть Cell, то я действительно буду смеятся, если это заработает

 

[EugenLi]

Ответ: Необходимо задать цвет линии у ячейки таблицы

Это не смешно. :eek:
Но действительно работает :confuse:

 

[vbatushev]

Ответ: Необходимо задать цвет линии у ячейки таблицы

Cell, Жень, Cell.
И зарекся я публиковать непроверенный код

 

[EugenLi]

Ответ: Необходимо задать цвет линии у ячейки таблицы

И зарекся я публиковать непроверенный код

Да я даже и не думал сомневаться!!!!! :angel:

Если ты не против я продолжу вопросничать: как убрать выделение?

 

[vbatushev]

Ответ: Необходимо задать цвет линии у ячейки таблицы

Конкретнее.

 

[Oleg Butrin]

Ответ: Необходимо задать цвет линии у ячейки таблицы

Да я даже и не думал сомневаться!!!!! :angel:

Если ты не против я продолжу вопросничать: как убрать выделение?

Надо убрать причину воспаления :wink:

with (app) {
	select(null,SelectionOptions.replace);
}

 

[EugenLi]

Ответ: Необходимо задать цвет линии у ячейки таблицы

Надо убрать причину воспаления

Доктор, я буду жить? :eek:

Спасибо, получилось.