Лен обычно помещает все свои фигуры в текстовые поля. Он форматирует текстовые поля так, чтобы они не перекрывали друг друга. (Он отображает диалоговое окно «Макет» и на вкладке «Положение» снимает флажок «Разрешить перекрытие».) Лен хотел бы, чтобы этот параметр был очищен по умолчанию, но всегда кажется, что по умолчанию перекрытие разрешено. Он задается вопросом, есть ли способ полностью его выключить.

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

Sub AllowOverlapFalse()

Selection.ShapeRange.WrapFormat.AllowOverlap = False End Sub

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

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

Sub FixTextBoxOverlap()

Dim s As Shape

For Each s In ActiveDocument.Shapes         If s.Type = msoTextBox Then             s.WrapFormat.AllowOverlap = False         End If     Next End Sub

Как видно из этих макросов, текстовые поля в мире VBA обрабатываются как фигуры. Этот макрос гарантирует при пошаговом прохождении всех определенных фигур, что он влияет только на те, которые на самом деле являются текстовыми полями.

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

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

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

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

(Microsoft Word — самая популярная программа для обработки текстов в мире.) Этот совет (13631) относится к Microsoft Word 2007, 2010, 2013, 2016, 2019 и Word в Office 365.