В Microsoft Publisher, вы можете сделать так, чтобы два текстовых поля всегда имели одинаковое содержимое?

411
T.J.L.

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

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

4

1 ответ на вопрос

2
simlev

Вы можете нажать ALT+ F11и использовать макросы :

Private Sub Document_Open() ActiveDocument.Pages(1).Shapes("Text Box 2").TextFrame.TextRange.Text = ActiveDocument.Pages(1).Shapes("Text Box 1").TextFrame.TextRange.Text End Sub

Таким образом, каждый раз, когда документ открывается, текст копируется из «Текстового поля 1» в «Текстовое поле 2».

Возможно, вы захотите узнать имена всех текстовых полей в документе с помощью:

Sub EnumerateTextBoxes() Dim pubPage As Page Dim pubShape As Shape For Each pubPage In ActiveDocument.Pages For Each pubShape In pubPage.Shapes If pubShape.Type = pbTextFrame Then MsgBox pubShape.Name End If Next pubShape Next pubPage End Sub
Макросы не страшная идея. Я только что понял, что Publisher может связывать разделы для потока, и есть один, чтобы связать их для дублирования. В любом случае, если ничего лучше не получится, я отмечу это через несколько дней, чтобы вы получили награду. T.J.L. 6 лет назад 0
Некоторые [говорят] (https://answers.microsoft.com/en-us/msoffice/forum/msoffice_other-mso_other/how-do-i-set-a-text-box-to-automatics-copy/fc8cf26e-92c6 -472f-a0b9-a1ec52f22033) они смогли выполнить то, что вы хотите, начав с шаблона новостной рассылки, а затем скопировав текстовое поле заголовка, но я не смог воспроизвести это поведение в Publisher 2010. simlev 6 лет назад 0
Я рискну предположить, что это макрос, связанный с событием изменения в текстовом поле, и именно так я собираюсь настроить мой. Я очень доволен макросами в Excel, я просто надеялся избежать их. T.J.L. 6 лет назад 0

Похожие вопросы