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

Один из подходов — использовать возможности автоформата Word для вашей таблицы. Выполните следующие действия:

  1. Создайте свою таблицу, как обычно.

  2. Поместите точку вставки где-нибудь в таблице.

  3. Выберите параметр «Автоформат таблицы» в меню «Таблица». Word отображает диалоговое окно «Автоформат таблицы». (См. Рис. 1.)

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

  5. Щелкните Применить. Формат применяется к таблице.

  6. Закройте диалоговое окно Автоформат таблицы.

Многие из автоформатов, предоставляемых для таблиц, являются «умными», что означает, что они могут регулировать затенение строк, даже если вы добавляете в таблицу новые строки. Как это сделать? Рад, что вы спросили; это приводит ко второму способу затенения строк таблицы — стилям таблицы.

Стили доступны в Word уже много лет. Одно из относительно недавних дополнений к возможностям стилей Word — это стили для таблиц. Вы можете определить стиль таблицы, который автоматически применяет затенение к четным или нечетным строкам в таблице. (Вот как это делают автоформаты таблиц.) Выполните следующие действия:

  1. Выберите «Стили и форматирование» в меню «Формат». Word отображает область задач «Стили и форматирование».

  2. На панели задач щелкните Новый стиль. Word отображает диалоговое окно «Новый стиль».

  3. В раскрывающемся списке Тип стиля выберите Таблица. (См. Рис. 2.)

  4. В раскрывающемся списке «Применить форматирование к» выберите «Полосы нечетных строк» ​​или «Полосы четных строк» ​​в зависимости от того, хотите ли вы, чтобы этот стиль применялся к нечетным или четным строкам.

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

  6. Задайте имя стиля и другие свойства по желанию.

  7. Щелкните ОК.

Теперь вы создали стиль затенения для нечетных или четных строк. При желании вы можете применить этот стиль к таблице. Форматирование автоматически корректируется при изменении количества строк в таблице.

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

Sub ShadeRows()

Dim iRow As Integer     Dim iHeads As Integer     Dim iRowTtl As Integer

If Selection.Information(wdWithInTable) = True Then         iHeads = InputBox(prompt:="Number of heading rows?", _           Title:="Headings", Default:="1")



iRowTtl = Selection.Tables(1).Rows.Count - iHeads         For iRow = 1 To iRowTtl             If iRow Mod 3 = 0 Then                 Selection.Tables(1).Rows(iRow + iHeads).Shading.Texture _                   = wdTexture20Percent             Else                 Selection.Tables(1).Rows(iRow + iHeads).Shading.Texture _                   = wdTextureNone             End If         Next iRow     End If End Sub

Макрос спрашивает, сколько строк заголовка находится в таблице, а затем корректирует строки, к которым применяется затенение. Если во время запуска макроса точка вставки находится вне таблицы, ничего не происходит. Вы также можете изменить частоту затенения (например, с каждой третьей строки на каждую четвертую), изменив формулу Mod. Просто измените одну строку следующим образом:

If iRow Mod 4 = 0 Then

Вы также можете изменить степень затенения, изменив константу wdTexture20Percent на другую, например wdTexture5Percent, wdTexture10Percent, wdTexture25Percent и т. Д.

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

_Примечание: _

Если вы хотите знать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах WordTips), я подготовил специальную страницу, содержащую полезную информацию.

link: / wordribbon-WordTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].

WordTips — ваш источник экономичного обучения работе с Microsoft Word.

(Microsoft Word — самая популярная программа для обработки текстов в мире.) Этот совет (5814) применим к Microsoft Word 97, 2000, 2002 и 2003. Вы можете найти версию этого совета для ленточного интерфейса Word (Word 2007 и позже) здесь:

link: / wordribbon-Shading_Table_Rows [Строки таблицы затенения].