Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Границы через одну / 4 сообщений из 4, страница 1 из 1
22.08.2007, 19:44:14
    #34745891
B.T.C.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Границы через одну
Как в заданном диапазоне, содержащим четное количество строк, провести горизонтальные границы, разделяющие пары?
Код: plaintext
1.
2.
3.
4.
    For Row =  1  To r.Rows.Count Step  2 
        With r
            .Borders(xlEdgeBottom).LineStyle = xlContinuous
        End With
    Next Row
Вроде просто, но не получилось
...
Рейтинг: 0 / 0
22.08.2007, 20:39:50
    #34745967
White Owl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Границы через одну
Эхм.... Возьми себе за правило - не использовать конструкцию WITH в течении следующего года.
Ты явно не понимаешь как она работает и для чего используется.
Код: plaintext
1.
2.
    For Row =  1  To r.Rows.Count Step  2 
        r.Rows(Row).Borders(xlEdgeBottom).LineStyle = xlContinuous
    Next Row
...
Рейтинг: 0 / 0
22.08.2007, 23:46:12
    #34746152
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Границы через одну
Для интереса, а может и не только
Можно форматировать строки через одну с помощью условного форматирования
используя следующие условия
=ОСТАТ(СТРОКА();2)=0
=ОСТАТ(СТРОКА()+1;2)=0
...
Рейтинг: 0 / 0
23.08.2007, 11:41:32
    #34747027
B.T.C.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Границы через одну
Хорошо, а если сначала в том же диапазоне нужно сделать "Все границы", как тогда?
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Границы через одну / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]