Когда у Лилианы есть таблица в документе, требования компании гласят, что каждая ячейка таблицы должна что-то содержать. Это означает, что если ячейка в противном случае пуста, она должна содержать либо тире, либо буквы «N / A». Лилиана задается вопросом, есть ли способ, которым она может автоматически ставить тире или «Н / Д» в пустые ячейки таблицы.

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

Если ячейка пуста, то желаемый текст помещается в ячейку.

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

Sub ProcCells1()

Dim tTable As Table     Dim cCell As Cell     Dim sTemp As String

sTemp = "N/A"



For Each tTable In ActiveDocument.Range.Tables         For Each cCell In tTable.Range.Cells             'An apparently empty cell contains an end of cell marker             If Len(cCell.Range.Text) < 3 Then                 cCell.Range = sTemp             End If         Next     Next     Set oCell = Nothing     Set tTable = Nothing End Sub

Если вы решите, что ваши пустые ячейки должны содержать тире вместо «N / A», все, что вам нужно сделать, это изменить текст, помещенный в переменную sTemp. Если вы предпочитаете макрос, который работает с одной таблицей, а не со всеми таблицами в документе, вам подойдет следующий вариант:

Sub ProcCells2()

Dim tTable As Table     Dim cCell As Cell     Dim sTemp As String

sTemp = "N/A"



If Selection.Information(wdWithInTable) Then         Set tTable = Selection.Tables(1)

For Each cCell In tTable.Range.Cells             'An apparently empty cell contains an end of cell marker             If Len(cCell.Range.Text) < 3 Then                 cCell.Range = sTemp             End If         Next     End If     Set oCell = Nothing     Set tTable = Nothing End Sub

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

Если вы предпочитаете не использовать макросы, вы можете рассмотреть другой подход — просто убедитесь, что ваша таблица содержит желаемые дефисы или текст «N / A», прежде чем начинать вводить в нее информацию. Вы можете создать шаблон таблицы, который будет содержать тире или «N / A» в каждой ячейке, а затем, помещая в ячейку другую информацию, вы просто удаляете текст по умолчанию. (Различные способы настройки шаблонов таблиц описаны в других выпусках WordTips.)

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

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

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

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

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

link: / wordribbon-Placing_Text_in_Empty_Table_Cells [Размещение текста в пустых ячейках таблицы].