Sa artikulong ito, natutuwa kaming ipakita sa iyo ang 3 mabisang paraan upang mag-browse sa pamamagitan ng text box sa iyong dokumento sa Word.
Mayroong utos na "Piliin ang Bagay na Mag-browse" sa Word na nagbibigay-daan sa iyo upang mag-browse lamang ng mga bagay na iyong napili. Halimbawa, maaari kang pumili upang mag-browse ayon sa talahanayan o pahina. Sa kasamaang palad, walang built-in na pag-andar para sa pag-browse sa pamamagitan ng text box. Samakatuwid, bibigyan ka namin ng 3 mga paraan upang magawa ito.
Paraan 1: Gumamit ng "Tab" Key
- Una, pindutin ang "Ctrl+Home" para pumunta sa simula ng isang dokumento.
- Pagkatapos hanapin at mag-click sa unang text box.
- Susunod na pindutin ang "Tab" upang tumalon sa susunod na text box.
Sa pamamagitan ng paraan, sa ganitong paraan ay mahahanap ka rin ng mga hugis at imahe sa dokumento.
Paraan 2: Patakbuhin ang Macro upang Tumalon mula sa Isang Text Box patungo sa Isa pa
- Una sa lahat, pindutin ang "Alt + F11" upang ma-trigger ang VBA editor sa Word.
- Susunod na pag-click sa "Normal".
- Pagkatapos ay i-click ang "Ipasok" at piliin ang "Modyul" sa drop-down na menu nito.
- Buksan ang bagong module sa pamamagitan ng pag-double click.
- Ngayon sa lugar ng pag-coding, i-paste ang mga sumusunod na code:
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
- I-click ang pindutang "Run" sa menu bar o pindutin ang "F5" upang maipatupad ang mga code.
Kapag sinimulan mo nang patakbuhin ang macro, may lalabas na message box, tulad ng nasa ibaba:
Sa kahon ay ipinapakita ang mga nilalaman sa kasalukuyang napiling text box. Maaari mong i-click ang "Oo" upang tumigil dito kung nais mo ang text box. Kung hindi man, i-click ang "Hindi" upang pumunta sa susunod na text box.
Paraan 3: Humanap ng isang Tiyak na Text Box
Kung magtakda ka ng pamagat para sa kahon ng teksto sa dokumento, maaari mo itong magamit kasama ng bellowing macro upang mahanap ito kaagad.
- Una sa lahat, sumangguni sa mga hakbang sa pamamaraan 2 upang mai-install at magpatakbo ng isang macro.
- Pagkatapos tandaan na palitan ang macro sa isang ito:
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
- Susunod, sa input box na magpo-prompt up, ilagay ang pamagat ng text box na hahanapin at i-click ang “OK” para magpatuloy. Makikita mo ang target na text box sa selection.
Makaya ang Pagkawala ng Data
Dahil ang Word ay isa sa mga pinakaginagamit na software, mahalagang malaman ang ilang mga trick kapag tumigil na sa pagtugon ang Word. Para sa mahahalagang sira na doc, ang pagpipilian mo lang ay makuha ito. At upang gawin ito, kailangan mong maingat na pumili ng isang tool ng third-party na maaari mong pagkatiwalaan.
Panimula ng May-akda:
Si Vera Chen ay isang dalubhasa sa pagbawi ng data sa DataNumen, Inc., na pinuno ng mundo sa mga teknolohiya sa pagbawi ng data, kasama ang sira xlsx at pdf pagkumpuni ng mga produktong software. Para sa karagdagang impormasyon pagbisita www.datanumen. Sa



