သင့် Word Document တွင် Text Box ဖြင့်ရှာဖွေရန် ထိရောက်သောနည်းလမ်း 3 ခု

ဤဆောင်းပါးတွင်၊ သင်၏ Word document ရှိ စာသားပုံးဖြင့် ရှာဖွေရန် ထိရောက်သော နည်းလမ်း ၃ ခုကို သင့်အား ပြသရန် ဝမ်းမြောက်မိပါသည်။

Word တွင် "Select Browse Object" command သည် သင်ရွေးချယ်ထားသော အရာများကိုသာ ရှာဖွေနိုင်စေပါသည်။ ဥပမာအားဖြင့်၊ သင်သည် ဇယား သို့မဟုတ် စာမျက်နှာဖြင့် ရှာဖွေရန် ရွေးချယ်နိုင်သည်။ ကံမကောင်းစွာဖြင့်၊ စာသားဘောက်စ်ဖြင့်ကြည့်ရှုရန် built-in function မရှိပါ။ ထို့ကြောင့် ကျွန်ုပ်တို့သည် သင့်အား ထိုသို့ပြုလုပ်ရန် နည်းလမ်း 3 ခုကို ပေးပါမည်။

နည်းလမ်း 1- "Tab" ကီးကိုသုံးပါ။

1. အရင်ဆုံး စာရွက်စာတမ်းရဲ့ အစကို သွားဖို့ “Ctrl+Home” ကို နှိပ်ပါ။
2. ထို့နောက် ပထမစာသားအကွက်ကို ရှာပြီး နှိပ်ပါ။
3. နောက်စာသားအကွက်သို့ ခုန်ရန် "Tab" ကိုနှိပ်ပါ။

စကားမစပ်၊ ဤနည်းဖြင့် စာရွက်စာတမ်းရှိ ပုံသဏ္ဍာန်များနှင့် ပုံများကို တွေ့လိမ့်မည်။

နည်းလမ်း 2- Text Box တစ်ခုမှ အခြားတစ်ခုသို့ ခုန်ရန် Macro ကိုဖွင့်ပါ။

1. Word မှာ VBA editor ကိုဖွင့်ဖို့ ပထမဆုံး “Alt+ F11” ကိုနှိပ်လိုက်ပါ။
2. ထို့နောက် "Normal" ကိုနှိပ်ပါ။
3. ထို့နောက် "Insert" ကိုနှိပ်ပြီး ၎င်း၏ drop-down menu တွင် "Module" ကိုရွေးချယ်ပါ။
4. နှစ်ချက်ကလစ်ဖြင့် module အသစ်ကိုဖွင့်ပါ။
5. ယခု ကုဒ်နံပါတ်နေရာတွင် အောက်ပါကုဒ်များကို ကူးထည့်ပါ။

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

6. ကုဒ်များကိုလုပ်ဆောင်ရန် မီနူးဘားရှိ “Run” ခလုတ်ကို နှိပ်ပါ သို့မဟုတ် “F5” ကို နှိပ်ပါ။

macro ကို စတင်လုပ်ဆောင်ပြီးသည်နှင့် အောက်တွင်ဖော်ပြထားသည့်အတိုင်း message box တစ်ခု ပေါ်လာပါလိမ့်မည်။

အကွက်ပေါ်တွင် လက်ရှိရွေးချယ်ထားသော စာသားအကွက်အတွင်းရှိ အကြောင်းအရာများကို ပြသသည်။ သင်အလိုရှိသောစာသားအကွက်ဖြစ်ပါက ၎င်းကိုရပ်တန့်ရန် "Yes" ကိုနှိပ်နိုင်သည်။ မဟုတ်ပါက နောက်စာသားအကွက်သို့သွားရန် "No" ကိုနှိပ်ပါ။

နည်းလမ်း 3- တိကျသောစာသားအကွက်ကိုရှာပါ။

စာရွက်စာတမ်းတွင် စာသားအကွက်အတွက် ခေါင်းစဉ်ကို သတ်မှတ်ပါက၊ ၎င်းကို ချက်ချင်းရှာဖွေရန် အောက်ပါ macro နှင့် ပေါင်းစပ်အသုံးပြုနိုင်ပါသည်။

1. ပထမဆုံးအနေဖြင့် macro တစ်ခုကို install လုပ်ပြီး run ရန် method 2 တွင် အဆင့်များကို ကိုးကားပါ။
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

3. ထို့နောက် ပေါ်လာသော input box တွင်၊ ရှာဖွေလိုသော text box ၏ ခေါင်းစဉ်ကို ရိုက်ထည့်ပြီး ဆက်လက်လုပ်ဆောင်ရန် “OK” ကိုနှိပ်ပါ။ ရွေးချယ်ထားသော target text box ကို သင်တွေ့လိမ့်မည်။

Data ဆုံးရှုံးမှုကို ရင်ဆိုင်ပါ။

Word ဟာ အသုံးအများဆုံးဆော့ဖ်ဝဲတွေထဲက တစ်ခုဖြစ်တာကြောင့် Word က တုံ့ပြန်မှုရပ်တန့်သွားတဲ့အခါ လှည့်ကွက်တချို့ကို သိထားဖို့ လိုအပ်ပါတယ်။ အရေးကြီးတာက အကျင့်ပျက် ဒေါ့သင်၏တစ်ခုတည်းသောရွေးချယ်မှုသည် ၎င်းကိုပြန်လည်ရယူရန်ဖြစ်သည်။ ဒါကိုလုပ်ဖို့၊ သင်ယုံကြည်နိုင်တဲ့ Third-party tool ကို ဂရုတစိုက်ရွေးချယ်ဖို့လိုပါတယ်။

စာရေးသူနိဒါန်း:

Vera Chen သည် ဒေတာပြန်လည်ရယူရေးဆိုင်ရာ ကျွမ်းကျင်သူဖြစ်သည်။ DataNumen, Inc. အပါအဝင် ဒေတာပြန်လည်ရယူရေးနည်းပညာများတွင် ကမ္ဘာ့ခေါင်းဆောင်ဖြစ်သည်။ အကျင့်ပျက် xlsx နှင့် pdf ဆော့ဖ်ဝဲ ထုတ်ကုန်များကို ပြုပြင်ခြင်း။ ပိုမိုသိရှိလိုပါကသွားရောက်ကြည့်ရှု www ။datanumen.com