|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
||||
|
||||
(ВСЕ границы) в Excel
Доброго дня. Подскажите как лучше в Excel (выгрузка идет в него) нарисовать все границы в выделенном диапозоне. Аналог кнопки "Все границы". Выделяю диапозон ячеек и нужно задать все границы, по одной рисовать долго, процесс ускорить хочется.
Код HTML:
|
#2
|
||||
|
||||
Код:
Selection.Borders(xlDiagonalDown).LineStyle = xlNone Selection.Borders(xlDiagonalUp).LineStyle = xlNone With Selection.Borders(xlEdgeLeft) .LineStyle = xlContinuous .Weight = xlThin .ColorIndex = xlAutomatic End With With Selection.Borders(xlEdgeTop) .LineStyle = xlContinuous .Weight = xlThin .ColorIndex = xlAutomatic End With With Selection.Borders(xlEdgeBottom) .LineStyle = xlContinuous .Weight = xlThin .ColorIndex = xlAutomatic End With With Selection.Borders(xlEdgeRight) .LineStyle = xlContinuous .Weight = xlThin .ColorIndex = xlAutomatic End With With Selection.Borders(xlInsideVertical) .LineStyle = xlContinuous .Weight = xlThin .ColorIndex = xlAutomatic End With With Selection.Borders(xlInsideHorizontal) .LineStyle = xlContinuous .Weight = xlThin .ColorIndex = xlAutomatic End With на pascal переводить?) Пишу программы за еду. __________________ |
#3
|
||||
|
||||
Благодарю. Паскаль не нужно.
Последний раз редактировалось fofka, 24.12.2010 в 17:16. |
#4
|
||||
|
||||
^
| Если не ты, то кто? (с) Терри Пратчетт Не забывайте ставить плюсы и говорить спасибо! |