Рисование границ таблицы

Вход

Регистрация

Напомнить пароль

= Мир MS Excel/Рисование границ таблицы - Мир MS Excel

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Рисование границ таблицы (Макросы/Sub)

Рисование границ таблицы

DimOzerov

Дата: Вторник, 30.10.2018, 19:07 | Сообщение № 1

Группа: Пользователи

Ранг: Участник

Сообщений: 68

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Здравствуйте.

Есть макрос создающий таблицу.
Таблицу он строит, но я пытаюсь сделать так, чтобы он еще отображал границы для этих ячеек.
Но что-то не получается - выходит искажение таблицы.

Видимо вот этот кусок кода - написан неправильно.
[vba]

Код

    With Range(a(0)).Resize(c + 1, r + 1)
        .Borders(xlEdgeLeft).Weight = xlThin
        .Borders(xlEdgeBottom).Weight = xlThin
        .Borders(xlEdgeRight).Weight = xlThin
        .Borders(xlEdgeTop).Weight = xlThin
        .Borders(xlInsideHorizontal).Weight = xlThin
        .Borders(xlInsideVertical).Weight = xlThin
    End With

[/vba]

Как изменить код, чтобы он рисовал границы созданной таблицы.