В этой статье мы рады показать вам 3 эффективных способа просмотра текстового поля в документе Word.
В Word есть команда «Выбрать объект для просмотра», позволяющая просматривать только те объекты, которые вы выбрали. Например, вы можете выбрать просмотр по таблице или странице. К сожалению, нет встроенной функции просмотра по текстовому полю. Поэтому мы предоставим вам 3 способа сделать это.
Способ 1: используйте клавишу «Tab»
- Для начала нажмите «Ctrl + Home», чтобы перейти к началу документа.
- Затем найдите и щелкните первое текстовое поле.
- Затем нажмите «Tab», чтобы перейти к следующему текстовому полю.
Кстати, таким образом вы также найдете фигуры и изображения в документе.
Способ 2: запустить макрос для перехода от одного текстового поля к другому
- В первую очередь, нажмите «Alt + F11», чтобы открыть редактор VBA в Word.
- Далее нажмите «Обычный».
- Затем нажмите «Вставить» и выберите «Модуль» в раскрывающемся меню.
- Откройте новый модуль двойным щелчком мыши.
- Теперь в области кодирования вставьте следующие коды:
Sub BrowseByTextBox()
Dim objShape As Shape
Dim strBoxText As String
Dim strButtonValue As String
Dim objDoc As Document
Set objDoc = ActiveDocument
For Each objShape In objDoc.Shapes
If objShape.Type = msoTextBox Then
objShape.Select
Selection.ShapeRange.TextFrame.TextRange.Select
strBoxText = objShape.TextFrame.TextRange.Text
strButtonValue = MsgBox("This text box contains: " & vbNewLine _
& strBoxText & vbNewLine & "Is this your desired text box?" _
& vbNewLine, vbYesNo, "Desired Text Box")
If strButtonValue = vbYes Then
Exit Sub
End If
End If
Next objShape
End Sub
- Нажмите кнопку «Выполнить» в строке меню или нажмите «F5», чтобы выполнить коды.
После запуска макроса появится всплывающее окно с сообщением, как показано ниже:
В поле отображается содержимое текущего выбранного текстового поля. Вы можете нажать «Да», чтобы остановиться на нем, если это нужное вам текстовое поле. В противном случае нажмите «Нет», чтобы перейти к следующему текстовому полю.
Способ 3: найти конкретное текстовое поле
Если вы установите заголовок для текстового поля в документе, вы можете использовать его в сочетании с макросом рев, чтобы найти его немедленно.
- Прежде всего, обратитесь к шагам в способе 2, чтобы установить и запустить макрос.
- Тогда не забудьте заменить макрос на этот:
Sub FindASpecificTextBox()
Dim objShape As Shape
Dim strBoxTitle As String
Dim objInlineShape As InlineShape
Dim objDoc As Document
Application.ScreenUpdating = False
Set objDoc = ActiveDocument
strBoxTitle = InputBox("Enter the title of the text box to be found here: ")
For Each objShape In objDoc.Shapes
If objShape.Type = msoTextBox Then
objShape.Select
Selection.ShapeRange.TextFrame.TextRange.Select
If objShape.Title = strBoxTitle Then
Exit Sub
End If
End If
Next objShape
For Each objInlineShape In objDoc.InlineShapes
If objInlineShape.Type = msoTextBox Then
objInlineShape.Select
Selection.ShapeRange.TextFrame.TextRange.Select
If objInlineShape.Title = strBoxTitle Then
Exit Sub
End If
End If
Next objInlineShape
Application.ScreenUpdating = True
End Sub
- Далее в появившемся поле ввода введите заголовок искомого текстового поля и нажмите «ОК», чтобы продолжить. Вы увидите целевое текстовое поле в выделенной области.
Справиться с потерей данных
Учитывая, что Word является одной из наиболее часто используемых программ, необходимо знать несколько приемов, когда Word перестает отвечать. Для важных моментов поврежденный документ, ваш единственный выбор — восстановить его. И для этого вам нужно тщательно выбрать сторонний инструмент, которому вы можете доверять.
Об авторе:
Вера Чен — эксперт по восстановлению данных в DataNumen, Inc., которая является мировым лидером в области технологий восстановления данных, включая поврежденный xlsx и pdf ремонт программных продуктов. Для получения дополнительной информации посетите www.datanumen.com