В тази статия се радваме да ви покажем 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
- След това в появилото се поле за въвеждане въведете заглавието на текстовото поле, което искате да намерите, и щракнете върху „OK“, за да продължите. Ще намерите целевото текстово поле в селекцията.
Справете се със загубата на данни
Тъй като Word е един от най-използваните софтуерни програми, е необходимо да знаете някои трикове, когато Word спре да отговаря. За важни... корумпиран док, единственият ви избор е да го възстановите. И за да направите това, трябва внимателно да изберете инструмент на трета страна, на който можете да се доверите.
Въведение на автора:
Вера Чен е експерт по възстановяване на данни в DataNumen, Inc., която е световен лидер в технологиите за възстановяване на данни, включително корумпиран xlsx и pdf ремонт на софтуерни продукти. За повече информация посетете WWW.datanumen.com



