Границы таблицы в excel

Применение и удаление границ ячеек на листе

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

Примечание: Границы ячеек, которые вы хотите применить, отображаются на печатных страницах. Если вы не используете границы ячеек, но вы хотите, чтобы границы линии сетки листа были видны на напечатанных страницах, можно отобразить линии сетки. Дополнительные сведения можно найти в разделе Печать с линиями и безних.

Выделите на листе ячейку или диапазон ячеек , к которым вы хотите добавить границу, измените стиль границы или удалите границу.

На вкладке Главная в группе Шрифт выполните одно из указанных ниже действий.

Чтобы применить новый или другой стиль границы, щелкните стрелку рядом с кнопкой границы и выберите нужный стиль границы.

Совет: Чтобы применить пользовательский стиль границы или диагональную границу, нажмите кнопку другие границы. В диалоговом окне Формат ячеек на вкладке граница в группе линии и Цветщелкните нужный стиль и цвет линии. В разделе пресеты и границынажмите одну или несколько кнопок, чтобы обозначить расположение границы. Две диагональных кнопки, доступные в разделе border.

Чтобы удалить границы ячеек, щелкните стрелку рядом с кнопкой границы и выберите пункт нет границы .

Кнопка ” границы ” отображает последний использованный стиль границы. Вы можете нажать кнопку границы (а не стрелку), чтобы применить стиль.

Если вы примените границу к выделенной ячейке, она также будет применена к смежным ячейкам, которые имеют границу границы ячейки. Например, если вы применяете границу для диапазона B1: C5, ячейки D1: D5 приобретают левую границу.

Если вы примените различные типы границ к общей границе ячейки, появится Последнее примененное обрамление.

Выделенный диапазон ячеек форматируется как один блок ячеек. Если вы применяете правую границу к диапазону ячеек B1: C5, граница отображается только на правой границе ячеек C1: C5.

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

Выделите строки на обеих сторонах разрыва страницы.

Щелкните стрелку рядом с кнопкой границы и выберите пункт другие границы.

В разделе пресеты нажмите кнопку Внутренняя .

В разделе границана схеме предварительный просмотр Удалите вертикальную границу, щелкнув ее.

Выделите на листе ячейку или диапазон ячеек , для которых нужно удалить границу.

Чтобы отменить выделение ячеек, щелкните любую ячейку на листе.

На вкладке Главная в группе Шрифт щелкните стрелку рядом с кнопкой границы и выберите пункт нет границы .

На вкладке главная > стрелку ” границы ” > ” стереть границу“, а затем выделите ячейки с границей, которые нужно стереть.

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

На вкладке Главная в группе Стили нажмите кнопку Стили ячеек.

Совет: Если кнопка стили ячеек не отображается, нажмите кнопку стили, а затем нажмите кнопку Дополнительно рядом с полем стили ячеек.

Выберите команду Создать стиль ячейки.

В поле имя стиля введите подходящее имя для нового стиля ячейки.

Нажмите кнопку Формат.

На вкладке граница в группе линияв поле стиль выберите стиль линии, который будет использоваться для границы.

В поле Цвет выберите цвет, который вы хотите использовать.

В разделе границащелкните кнопки с границей, чтобы создать нужную границу.

Нажмите кнопку ОК.

В диалоговом окне стиль в группе стиль включает (по примеру)снимите флажки для тех элементов форматирования, которые не нужно включать в стиль ячейки.

Нажмите кнопку ОК.

Чтобы применить стиль ячейки, выполните указанные ниже действия.

Выделите ячейки , которые нужно отформатировать, с помощью настраиваемой границы ячейки.

На вкладке Главная в группе Стили нажмите кнопку Стили ячеек.

Щелкните настраиваемый стиль ячейки, который вы только что создали. Как например, кнопка FancyBorderStyle на этом рисунке.

Чтобы настроить стиль линии или цвет границ ячеек или стереть существующие границы, можно воспользоваться параметрами “нарисовать границы “. Чтобы нарисовать границы ячеек, сначала выберите тип границы, затем цвет границы и стиль линии, а затем выделите ячейки, вокруг которых нужно добавить границу. Вот как это сделать:

На вкладке Главная рядом с элементом Границы щелкните стрелку .

Для создания внешних границ выберите пункт Нарисовать границы, для внутренней разметки — пункт Нарисовать линии границы.

Щелкните стрелку рядом с элементом Границы, выберите пункт Цвет линии и укажите нужный цвет.

Щелкните стрелку рядом с элементом Границы, выберите пункт Вид линии и укажите нужный вид.

Выделите ячейки, вокруг которых необходимо нарисовать границы.

Добавление границы, цвета границы или типа линии границы

Выделите ячейку или диапазон ячеек, вокруг которых нужно добавить границу, измените стиль границы на или удалите границу.

2. на вкладке главная> стрелку границы и выберите нужный параметр границы.

Добавление цвета границы — щелкните стрелку ” границы ” > ” Цвет границы“, а затем выберите цвет.

Добавьте стиль линии границы : щелкните стрелку границы > стиль границыи выберите параметр стиль линии.

Советы

На кнопке Границы отображается последний использованный стиль границы. Чтобы применить этот стиль, нажмите кнопку (не стрелку) Границы.

Если вы примените границу к выделенной ячейке, она также будет применена к смежным ячейкам, которые имеют границу границы ячейки. Например, если вы применяете границу для диапазона B1: C5, ячейки D1: D5 будут получать левую границу.

Читайте также:  Как восстановить эксель файл если забыл сохранить

Если вы примените различные типы границ к общей границе ячейки, появится Последнее примененное обрамление.

Выделенный диапазон ячеек форматируется как один блок ячеек. Если вы применяете правую границу к диапазону ячеек B1: C5, граница отображается только на правой границе ячеек C1: C5.

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

Выделите строки на обеих сторонах разрыва страницы.

Щелкните стрелку рядом с кнопкой границы и выберите внутреннюю горизонтальную границу .

Удаление границы

Чтобы удалить границу, выделите ячейки с границей, а затем щелкните стрелку границы > нет границы.

Дополнительные сведения

Вы всегда можете задать вопрос специалисту Excel Tech Community, попросить помощи в сообществе Answers community, а также предложить новую функцию или улучшение на веб-сайте Excel User Voice.

См. также

Примечание: Эта страница переведена автоматически, поэтому ее текст может содержать неточности и грамматические ошибки. Для нас важно, чтобы эта статья была вам полезна. Была ли информация полезной? Для удобства также приводим ссылку на оригинал (на английском языке).

Источник: support.office.com

Границы, заливка и стили ячеек в Excel

Microsoft Excel позволяет применять форматирование не только к содержимому, но и к самой ячейке. Вы можете настроить границы у ячеек, а также задать цвет заливки. Кроме этого, Excel предоставляет очень полезный инструмент Стили, который позволяет даже начинающему пользователю применять профессиональные темы для оформления своих документов. В рамках этого урока Вы познакомитесь со стилями, а также узнаете, как добавлять границы и заливку ячейкам.

Границы ячеек и цвета заливки в Excel

Границы ячеек и цвет заливки позволяют создать четкие и определенные границы разделов Вашего листа Excel. В примере ниже мы добавим границы и заливку ячейкам, которые содержат заголовки, чтобы выделить их.

Добавляем границы

  1. Выделите ячейки, к которым необходимо добавить границы.
  2. На вкладке Главная нажмите на стрелку рядом с командой Границы. Появится выпадающее меню с различными типами границ.
  3. Выберите необходимый тип. В нашем примере мы выберем Все границы.
  4. Границы отобразятся в соответствии с выбранным типом.

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

Добавляем цвет заливки в Excel

  1. Выделите ячейки, к которым необходимо добавить заливку.
  2. На вкладке Главная нажмите на стрелку рядом с командой Цвет заливки. Появится меню с цветовой палитрой.
  3. Выберите необходимый цвет заливки. При наведении курсора на различные варианты цвета можно увидеть, как меняется фон выделенных ячеек. Для нашего примера мы выберем светло-зеленый цвет.
  4. Выбранный цвет заливки появится в выделенных ячейках.

Стили ячеек в Excel

Помимо форматирования вручную, Вы можете воспользоваться готовыми стилями ячеек. Применение стилей в Excel – это быстрый способ добавить профессиональное форматирование любым областям Вашей книги, например, заголовкам.

Как применять стили в Excel

В следующем примере мы научимся применять готовые стили к уже созданному заголовку.

  1. Выделите ячейки, которые необходимо изменить.
  2. На вкладке Главная нажмите команду Стили ячеек, а затем в раскрывающемся меню выберите подходящий стиль. В нашем примере, мы выберем Акцент1.
  3. Выбранный стиль будет применен к ячейкам.

Применение стиля к ячейке заменяет любое форматирование в ней, кроме выравнивания. При необходимости Вы можете создавать собственные стили и использовать их в шаблонах для своих проектов.

Источник: office-guru.ru

Использование инструментов рисования границ и рисование границ сетки для применения и удаления границ ячеек Excel

Описание

В этой статье приводится пример использования инструментов рисования границ и инструментов рисования границ в Microsoft Excel.

Excel предоставляет метод для добавления и удаления границ между ячейками и между ними. Вместо того чтобы выбирать ячейки сначала и затем форматировать, можно выбрать нужное средство форматирования, а затем применить формат к одной или нескольким ячейкам.

Microsoft Office Excel 2007

Чтобы попробовать пример, в котором используются инструменты рисования границ и сетка рисования границ, выполните следующие действия:

В группе Шрифт на вкладке Главная щелкните стрелку рядом с кнопкой границы , выберите команду стиль линии , а затем щелкните стиль двойной линии.

В группе Шрифт на вкладке Главная щелкните стрелку рядом с кнопкой границы , а затем выберите команду нарисовать границу.

Нажмите и перетащите инструмент «граница» на диапазон B3: D14.

Граница двойной линии, охватывающая диапазон B3: D14.

В группе Шрифт на вкладке Главная щелкните стрелку рядом с кнопкой границы , а затем выберите команду стереть границу.

Щелкните и перетащите инструмент стирания на диапазон B3: D7.

Обратите внимание, что граница удалена из диапазона B3: B7.

В группе Шрифт на вкладке Главная щелкните стрелку рядом с кнопкой границы , наведите указатель на пункт Цвет линии, а затем выберите красныйцвет.

В группе Шрифт на вкладке Главная щелкните стрелку рядом с кнопкой границы , а затем выберите команду Нарисовать сетку границ.

Наведите указатель мыши на диапазон B8: D14.

Вокруг каждой ячейки в диапазоне B8: D14 отображается красная линия с двумя границами:.

Microsoft Office Excel 2003 и Microsoft Excel 2002

Чтобы попробовать пример, в котором используются инструменты рисования границ и сетка рисования границ, выполните следующие действия:

На панели инструментов Форматирование нажмите стрелку рядом с кнопкой границы .

Читайте также:  Как в excel вычислить процент от суммы

Нажмите кнопку Рисование границ , чтобы отобразить панель инструментов границы .

Щелкните стрелку рядом с полем тип линии , а затем выберите двойную линию.

Нажмите и перетащите инструмент «граница» на диапазон B3: D14.

Граница двойной линии, охватывающая диапазон B3: D14.

На панели инструментов границы нажмите кнопку стереть границу.

Щелкните и перетащите инструмент стирания на диапазон B3: D7.

Обратите внимание, что граница удалена из диапазона B3: B7.

Щелкните стрелку рядом с кнопкой нарисовать границу и выберите команду Нарисовать сетку границ.

На панели инструментов границы нажмите кнопку Цвет линии , а затем нажмите кнопку Red ( красный).

Наведите указатель мыши на диапазон B8: D14.

Вокруг каждой ячейки в диапазоне B8: D14 отображается красная линия с двумя границами:.

Источник: docs.microsoft.com

Использование инструментов рисования границ и рисование границ сетки для применения и удаления границ ячеек Excel

Описание

В этой статье приводится пример использования инструментов рисования границ и инструментов рисования границ в Microsoft Excel.

Excel предоставляет метод для добавления и удаления границ между ячейками и между ними. Вместо того чтобы выбирать ячейки сначала и затем форматировать, можно выбрать нужное средство форматирования, а затем применить формат к одной или нескольким ячейкам.

Microsoft Office Excel 2007

Чтобы попробовать пример, в котором используются инструменты рисования границ и сетка рисования границ, выполните следующие действия:

В группе Шрифт на вкладке Главная щелкните стрелку рядом с кнопкой границы , выберите команду стиль линии , а затем щелкните стиль двойной линии.

В группе Шрифт на вкладке Главная щелкните стрелку рядом с кнопкой границы , а затем выберите команду нарисовать границу.

Нажмите и перетащите инструмент «граница» на диапазон B3: D14.

Граница двойной линии, охватывающая диапазон B3: D14.

В группе Шрифт на вкладке Главная щелкните стрелку рядом с кнопкой границы , а затем выберите команду стереть границу.

Щелкните и перетащите инструмент стирания на диапазон B3: D7.

Обратите внимание, что граница удалена из диапазона B3: B7.

В группе Шрифт на вкладке Главная щелкните стрелку рядом с кнопкой границы , наведите указатель на пункт Цвет линии, а затем выберите красныйцвет.

В группе Шрифт на вкладке Главная щелкните стрелку рядом с кнопкой границы , а затем выберите команду Нарисовать сетку границ.

Наведите указатель мыши на диапазон B8: D14.

Вокруг каждой ячейки в диапазоне B8: D14 отображается красная линия с двумя границами:.

Microsoft Office Excel 2003 и Microsoft Excel 2002

Чтобы попробовать пример, в котором используются инструменты рисования границ и сетка рисования границ, выполните следующие действия:

На панели инструментов Форматирование нажмите стрелку рядом с кнопкой границы .

Нажмите кнопку Рисование границ , чтобы отобразить панель инструментов границы .

Щелкните стрелку рядом с полем тип линии , а затем выберите двойную линию.

Нажмите и перетащите инструмент «граница» на диапазон B3: D14.

Граница двойной линии, охватывающая диапазон B3: D14.

На панели инструментов границы нажмите кнопку стереть границу.

Щелкните и перетащите инструмент стирания на диапазон B3: D7.

Обратите внимание, что граница удалена из диапазона B3: B7.

Щелкните стрелку рядом с кнопкой нарисовать границу и выберите команду Нарисовать сетку границ.

На панели инструментов границы нажмите кнопку Цвет линии , а затем нажмите кнопку Red ( красный).

Наведите указатель мыши на диапазон B8: D14.

Вокруг каждой ячейки в диапазоне B8: D14 отображается красная линия с двумя границами:.

Источник: docs.microsoft.com

Урок выделения таблицы в Excel

Программа Excel предназначена для выполнения различных математических вычислений, создания таблиц, графиков и диаграмм. Для осуществления каких-либо действий с таблицей необходимо уметь правильно ее выделять.

В зависимости от размеров таблиц, наличия в соседних зонах каких-либо значений существует 3 варианта выделения таблиц в Excel. Для выбора наиболее приемлемого, необходимо рассмотреть каждый из них подробнее.

Содержание: “Как выделить таблицу в Экселе”

Вариант 1: выделение таблицы мышью

Метод является самым простым и наиболее распространенным. Его плюсами, безусловно, является простота и понятность большому количеству пользователей. Минусом является тот факт, что для выделения таблицы большого размера этот вариант не удобен, но, тем не менее, применим.

Итак, для выделения таблицы данным способом необходимо нажать левую кнопку мыши, и удерживая ее, выделить всю табличную область от верхнего левого угла до нижнего правого угла.

Причем начинать выделение и перемещение мыши можно как с верхнего левого угла, так и с нижнего правого угла, выбрав в качестве финальной точки диаметрально противоположную. От выбора начальной и финальной точек разницы в полученном результате не будет.

Вариант 2: горячие клавиши для выделения

Для выделения больших таблиц гораздо удобнее пользоваться комбинацией клавиш на клавиатуре “CTRL+A” (“Cmd+A” – для macOS). Кстати, этот способ работает не только в Excel, но и в других программах.

Обратите внимание, что для выделения таблицы данным методом существует небольшой нюанс – в момент нажатия горячих клавиш курсор мыши должен быть помещен в ячейку, которая является частью таблицы. Т.е. для успешного выделения всей табличной области нужно кликнуть по любой ячейке таблицы и нажать комбинацию клавиш на клавиатуре “Ctrl+A”.

Повторное нажатие этих же горячих клавиш приведет к выделению всего листа.

Если же курсор будет уставлен вне таблицы, при нажатии Ctrl+A выделится весь лист вместе с таблицей.

Вариант 3: выделение с помощью клавиши Shift

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

Читайте также:  Как в excel изменить область печати

Для выделения таблицы этим способом необходимо соблюдать следующий порядок действий:

  1. Установите курсор в самую верхнюю левую ячейку таблицы.
  2. Нажмите клавишу Shift и, удерживая ее, кликните по самой нижней правой ячейке. После этого можно отпустить клавишу Shift.
  3. Если таблица слишком большая и не помещается на экране, сначала установите курсор на начальную ячейку, затем пролистайте таблицу, найдите конечную точку, и затем выполните действия пункта выше.

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

Заключение

Из описанных выше трёх вариантов выделения таблицы в Excel пользоваться можно всеми тремя. И при выборе конкретного способа необходимо учитывать, в первую очередь, размеры таблицы. Первый способ – самый простой и понятный, но применять его лучше и удобнее на небольших таблицах. Так как выделение всей табличной области при помощи мышки будет весьма затруднительно, если таблица состоит из большого количества строк, из-за чего придется удерживать зажатой левую кнопку мышки долгое время. Второй вариант с горячими клавишами – самый быстрый, но его нюансы могут вызывать определенные трудности у пользователя. Третий метод позволяет избежать данных затруднений, но занимает немного больше времени, чем использование комбинации кнопок, предложенной во втором варианте.

СТАТЬИ ПО ТЕМЕБОЛЬШЕ ОТ АВТОРА

Включение надстройки “Анализ данных” в Excel

Как сделать зачеркнутый текст в Эксель

Как перенести таблицу из Word в Excel

Как сделать разделение ячеек в Excel

Импорт содержимого CSV-файла в Excel

Защита ячеек от изменений в Эксель

Статистические функции в Microsoft Excel

Математические функции в Microsoft Excel

Извлечение корня в Excel с помощью формулы и функции

Регрессионный анализ данных в Excel

Метод наименьших квадратов в Excel

Как решить транспортную задачу в Excel

1 КОММЕНТАРИЙ

Спасибо за подробное обьяснение. Уроков у вас много и все они очень полезные начивающим осваивать Эксэл. Будем учится дальше

Источник: microexcel.ru

Как сделать границы ячеек макросом в таблице Excel

Рисовать границы для разных ячеек вручную – это потребует много драгоценного времени и сил. Лучше применить специальный макрос, который сам поставит границы с разными типами и цветами линий для объединенных и необъединенных ячеек. Он автоматически определит положение объединенных ячеек и сам присвоит им линии границ в соответствии со всеми пожеланиями пользователя.

Как изменить границы макросом в ячейках таблицы Excel

У нас иметься отчет по продажам в магазинах целой ритейловской сети, которые разделены на группы городов по отдельным штатам. В таблице отчета имеются объединенные ячейки:

  1. Отформатировать ячейки таблицы таким образом, чтобы были установленные границы с толстой линией только для диапазонов каждого отдельного штата. А внутри группы городов каждого штата необходимо установить ячейкам границы с тонкой линией.
  2. Таким же образом хотим форматировать ячейки в объединенных диапазонах, охватывающих несколько столбцов. А, столбцы с показателями продаж и выручки необходимо отделить тонкими линиями. Дополнительно целая таблица должна иметь самую толстую линию для внешней границы по периметру.
  3. Если объединенная ячейка охватывает несколько строк, то границы ячеек, отделяющие эти строки, будут иметь тоненькие линии. По аналогичному принципу будут определены границы столбцов которых охватывает объединенная ячейка.

Напишем свой макрос, который сам автоматически выполнит весь этот объем работы для любой таблицы. Откройте редактор Visual Basic (ALT+F11):

А затем создайте новый модуль с помощью инструмента: «Insert»-«Module». А потом введите в него следующий VBA-код:

Sub BorderLine()
Dim i As Long
Selection.Borders(xlEdgeBottom).Weight = xlMedium
Selection.Borders(xlEdgeTop).Weight = xlMedium
Selection.Borders(xlEdgeLeft).Weight = xlMedium
Selection.Borders(xlEdgeRight).Weight = xlMedium
Selection.Borders(xlInsideHorizontal).Weight = xlThin
Selection.Borders(xlInsideVertical).Weight = xlThin
For i = 1 To Selection.Count
If Selection(i).MergeArea.Address <> Selection(i).Address Then
Application.Intersect(Selection, Selection(i).MergeArea.EntireColumn).Borders(xlInsideVertical).Weight = xlHairline
Application.Intersect(Selection, Selection(i).MergeArea.EntireRow).Borders(xlInsideHorizontal).Weight = xlHairline
End If
Next
End Sub

Теперь если мы хотим автоматически форматировать целую таблицу в один клик мышки, выделите диапазон A1:D18. А потом просто выберите инструмент: «РАЗРАБОТЧИК»-«Код»-«Макросы»-«BorderLine»-«Выполнить».

Чтобы группы данных по строкам и столбцам на против объединенных ячеек были экспонированы границами пользовательской толщены, сначала кода присваиваем линию увеличенной толщины для внешних границ выделенного диапазона. А внутренним границам присваивается линия со стандартной толщиной. Далее с помощью цикла выполняется проход по каждой ячейке выделенного диапазона и все они проверяются. Если ячейка является объединенной, то ей присваивается соответственная граница. Конечно же изменения границ касаются только для ячеек внутри выделенного диапазона.

С помощью свойства Weight можно установить 4 типа толщины линии для границ ячеек:

  1. xlThink – наиболее толстая линия.
  2. xlMedium – просто толстая граница.
  3. xlThin – стандартная толщина линии для границ.
  4. xlHairLine – свойство для самой тонкой границы ячейки.

Внимание! Если перед использованием макроса некоторые ячейки уже имели свои линии границ в другом цвете кроме черного или их лини были в другом стиле, тогда после запуска макроса некоторые ячейки могут получить другой цвет или стиль обводки. Чтобы перестраховаться от таких ошибок, в начале кода макроса, после строки декларации переменной i, вставим еще 2 строки с кодом:

Selection.Borders.Color = vbBlack Selection.Borders.Color = xlContinuous

Полная версия макроса, работающего безошибочно при любых условиях и форматах для исходной таблицы:

Sub BorderLine()
Dim i As Long
Selection.Borders.Color = vbBlack
Selection.Borders.Color = xlContinuous
Selection.Borders(xlEdgeBottom).Weight = xlMedium
Selection.Borders(xlEdgeTop).Weight = xlMedium
Selection.Borders(xlEdgeLeft).Weight = xlMedium
Selection.Borders(xlEdgeRight).Weight = xlMedium
Selection.Borders(xlInsideHorizontal).Weight = xlThin
Selection.Borders(xlInsideVertical).Weight = xlThin
For i = 1 To Selection.Count
If Selection(i).MergeArea.Address <> Selection(i).Address Then
Application.Intersect(Selection, Selection(i).MergeArea.EntireColumn).Borders(xlInsideVertical).Weight = xlHairline
Application.Intersect(Selection, Selection(i).MergeArea.EntireRow).Borders(xlInsideHorizontal).Weight = xlHairline
End If
Next
End Sub

Теперь можно уверенно и быстро красиво форматировать большие таблицы по одному клику мышкой или нажатию комбинации горячих клавиш для вызова соответственного макроса.

Источник: exceltable.com