- 1
- 2
- 3
- 4
- 5
- 6
Для К = 1 По 11 Цикл
Если Форм = 1 Тогда
ExcelApp.Cells(КолЗ,К).Font.Bold = 1;
ExcelApp.Cells(КолЗ,К).Font.Color = 16732963;
КонецЕсли;
КонецЦикла;
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
−141
Для К = 1 По 11 Цикл
Если Форм = 1 Тогда
ExcelApp.Cells(КолЗ,К).Font.Bold = 1;
ExcelApp.Cells(КолЗ,К).Font.Color = 16732963;
КонецЕсли;
КонецЦикла;
"Орфография автора сохранена" =)
Бля какой мудак это писал? Надо через месяц подойти к нему и спросить "какой это цвет", на ответ дать 1 секунду, если не успеет, то ёбнуть головой об клавиатуру, а потом ещё раз ёбнуть, а потом ещё раз, пока на экране не появится что-то, хотя бы напоминающее 16-ичный вид.
Мне похуй, есть ли в 1С 16-ичные числа, пусть пишет ((a*256+b)*256)+c, если иначе никак.
> ExcelApp.Cells(КолЗ,К).Font.Color = 16732963; //оранжевый
> ExcelApp.Cells(КолЗ,К).Font.Color = 16732963; //оранжевый -> #FF5323
Хотя в 1С похер какой оттенок. Для суровых кладовщиков все равно есть только 7 цветов, а бухгалтера думают о всяких сальдо, бульдо... им не до цветовых изысков.
Никто менять не будет. Тем более это файл эксель. В 90% случаев он используется для распечатки, причем на черно-белом принтере.
И опережая твой вопрос "А если кто-то захочет поменять на синий?", 1Снику все равно в какой системе будет записан цвет, что hex, что dec все равно гуглить будет, ибо в 1С нет производственной необходимости запоминать непонятные циферки.
От смеха рыдаешь?
– Ну, это уже сенсация, – сказал доктор Боард. – Я слышал, что делают операции по изменению пола у мужчин, но…
http://flibusta.net/b/49821/read
и хватит уже своей операцией хвастаться, мистер Гаррисон :-Р
Ну захотел чел покрасить ТОЛЬКО 11 ячеек и что?