Как скрыть границы у таблиц в Word

Комментариев: 10

1. 

   Александр
   10.07.2009 в 23:55 | #1

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

   А может есть другой способ решить задачу (не табличный)? Суть в том, что пользователи должны заполнять (редактировать) один и тот же документ разными данными, а потом выводить его на печать. Особенность в том, что документ содержит определенным образом позиционированные и отделенные друг от друга блоки текста. В настоящий момент эта задача решена при помощи таблицы. Но отключать постоянно границы при печати - утомляет.
2. 

   Админ
   11.07.2009 в 07:14 | #2

   Александр, можно отображать табличные границы в документе и при этом они невидимы при печати. Для этого нужно в меню Таблицы сделать активной опцию "Отображать сетку". Тогда у таблицы, у которой нет границ, будет отображаться серым цветом сетка. Эта сетка при печати не выводится.

   Обратите внимание: границ у таблицы не должно быть.

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

   Sub tableNoBorders()
   'Удаление границ у таблицы, в которой находится курсор ввода
   Dim tCurrent As Table
   Dim rngTable As Range
   Set rngTable = Selection.Range
   If Not rngTable.Information(wdWithInTable) Then
    MsgBox prompt:="Курсор находится вне таблицы"
   Else
   Application.ScreenUpdating = False  'Запрещаем обновление экрана во время работы макроса
   Set tCurrent = Selection.Tables(1)
   With tCurrent
      .Borders(wdBorderLeft).LineStyle = wdLineStyleNone
      .Borders(wdBorderRight).LineStyle = wdLineStyleNone
      .Borders(wdBorderTop).LineStyle = wdLineStyleNone
      .Borders(wdBorderBottom).LineStyle = wdLineStyleNone
      .Borders(wdBorderHorizontal).LineStyle = wdLineStyleNone
      .Borders(wdBorderVertical).LineStyle = wdLineStyleNone
      .Borders(wdBorderDiagonalDown).LineStyle = wdLineStyleNone
      .Borders(wdBorderDiagonalUp).LineStyle = wdLineStyleNone
      .Borders.Shadow = False
   End With
   Application.ScreenUpdating = True   'Разрешаем обновление экрана
   End If
   End Sub
3. 

   Александр Витер
   11.07.2009 в 08:24 | #3

   А зачем вообще их показывать? Покажите у таблицы сетку, или включите параметр «Отображать границы текста». Тогда видимых границ не будет, и будет видно, где эти границы находятся.
4. 

   Александр
   12.07.2009 в 02:54 | #4

   @Антон Кокин:

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

   Спасибо за макрос. Он сработет автоматически при отправке документа на печать? Если нет, то это те же самые дополнительные телодвижение, но только с запуском макроса. (Кстати, макрос убирает только сетку внутри таблицы, но не ее границы )

   @Антон Кокин:

   нужно в меню Таблицы сделать активной опцию "Отображать сетку"

   Этот пункт меню нашел - спасибо!

   @Александр Витер:

   включите параметр «Отображать границы текста»

   Этот пункт меню найти не удалось. У меня Word 2007. Подскажите где он есть в 2007-м и в 2003-м?

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

   Админ
   12.07.2009 в 07:53 | #5

   Спасибо за макрос. Он сработет автоматически при отправке документа на печать? Если нет, то это те же самые дополнительные телодвижение, но только с запуском макроса. (Кстати, макрос убирает только сетку внутри таблицы, но не ее границы )

   Нет, не сработает. Но телодвижений гораздо меньше - один клик мышкой по кнопке макроса.

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

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

   Кроме того, если вы уверены, что этот макрос не убирает внешние границы таблицы, проверьте, а не вставлена ли эта таблица в другую?

   В крайнем случае, вышлите ваш пример документа, в котором макрос не убирает границы - проверю.

   В 2007 параметр "Показывать границы текста" находится в диалоге "Параметры Word" на вкладке Дополнительно в группе параметров "Отображать содержимое документа".
6. 

   Юрий А.
   16.04.2011 в 02:03 | #6

   Не надо никаких макросов. В Word 2007 эта функция есть:

   щелкните вкладку "Макет", а затем в группе "Таблица" выберите команду "Показать линии сетки".
7. 

   Макс
   25.04.2012 в 00:16 | #7

   Спасибо! После часа мучений наткнулся на вашу статью.. Вы спасли килограмм нервных клеток
8. 

   Денис
   12.11.2012 в 12:36 | #8

   Спасибо! Тоже долго искал как повторить этот вроде несложный сфокус доступный ещё в Word 2003
9. 

   Аноним
   21.04.2016 в 11:19 | #9

   Спасибо, помогло!!!
10. 

    Аноним
    15.04.2017 в 14:34 | #10

    присоединяюсь)))) спасибо