ဒီနေ့ပို့စ်မှာ သင့်ရဲ့ Word စာရွက်စာတမ်းကနေ အရောင်တူစာသားတွေကို ထုတ်ယူဖို့ မြန်ဆန်တဲ့နည်းလမ်း ၂ ခုကို မျှဝေပေးချင်ပါတယ်။
ယခုနှင့်ထို့နောက်၊ Word document တစ်ခုပေါ်တွင် ဖော်မတ်လုပ်နေစဉ်၊ အချို့သောစာသားများအတွက် စာလုံးအရောင်ကို အထူးသတိထားနိုင်ရန် ၎င်းတို့ကို ဖယ်ထုတ်ရန် အလားအလာရှိသည်။ အများအားဖြင့်၊ ဤရောင်စုံစကားလုံးများသည် သင့်ပြန်လည်သုံးသပ်ရန် ထိုက်တန်သော အရေးကြီးသော အကြောင်းအရာများဖြစ်သည်။ ထို့နောက် ရှင်းရှင်းလင်းလင်း စစ်ဆေးရန်အတွက် ၎င်းတို့ကို အခြားတစ်နေရာသို့ တင်ပို့ပြီး စုဆောင်းခြင်းအား မည်သို့လုပ်ဆောင်မည်နည်း။
ဤတောင်းဆိုမှုကို အာရုံစိုက်ခြင်းဖြင့်၊ သင့်အား အဆုံးမရှိဖြတ်တောက်ခြင်းနှင့် ကူးထည့်ခြင်းလုပ်ဆောင်မည့်အစား အမြန်ဖြတ်လမ်း ၂ ခုကို အကြံပြုအပ်ပါသည်။
နည်းလမ်း 1- "Find" အင်္ဂါရပ်ကိုအသုံးပြုပါ။
- ပထမဦးစွာ "Home" tab ကိုနှိပ်ပါ။
- ထို့နောက် "Find" ဘေးရှိ ဇောက်ထိုးတြိဂံခလုတ်ကိုနှိပ်ရန် "တည်းဖြတ်ခြင်း" အဖွဲ့သို့ သွားပါ။

- ထို့နောက် စာရင်းတွင် “Advanced Find” ကို ရွေးပါ။
- "Find and Replace" dialog box တွင် cursor ကို "Find what" text box တွင် ထားကာ ရှိပါက ထိုနေရာတွင် မည်သည့်အကြောင်းအရာကိုမဆို ရှင်းလင်းပါ။
- ထို့နောက် "နောက်ထပ်" ခလုတ်ကိုနှိပ်ပါ။
- ယခု "Format" ခလုတ်ကိုနှိပ်ပြီး "Font" ကိုရွေးချယ်ပါ။
- “ဖောင့်ကိုရှာပါ” ဒိုင်ယာလော့ခ်ဘောက်စ်တွင်၊ သင့်စာသားများအတွက် သင်သတ်မှတ်ပေးထားသည့် အရောင်အတိအကျကို ရွေးချယ်ရန် “ဖောင့်အရောင်” နောက်ဘက်ရှိ drop down ခလုတ်ကို နှိပ်ပါ။
- “OK” ကိုနှိပ်ရန်မမေ့ပါနှင့်။
- ယခု “Find and Replace” အကွက်သို့ ပြန်သွားပြီး “Find In” ကိုနှိပ်ပါ။
- နောက်ဆုံးအနေနဲ့ “Main Document” ကို ရွေးပါ။
ထို့နောက် ပစ်မှတ်အရောင်ရှိ စာသားအားလုံးကို ရွေးချယ်ပါလိမ့်မည်။ ယခုအခါ “Ctrl+ C” ကို နှိပ်၍ ကူးယူပြီးနောက် အခြားနေရာတွင် တစ်ကြိမ်တည်း ကူးထည့်နိုင်ပါပြီ။
နည်းလမ်း 2- Word Macro ကို Run ပါ။
- ပထမဦးစွာနှင့်အရေးအကြီးဆုံးအနေဖြင့် "Developer" tab ကိုနှိပ်ပါ။
- ထို့နောက် VBA တည်းဖြတ်မှုကို စတင်ရန် "Visual Basic" ကိုနှိပ်ပါ။
- ထို့နောက် "Normal" ကိုနှိပ်ပြီး "Insert" ကိုနှိပ်ပါ။
- မီနူးတွင် "Module" ကိုရွေးချယ်ပါ။
- ထို့နောက် coding space ကိုအသက်သွင်းရန် module ပေါ်တွင်နှစ်ချက်နှိပ်ပါ။
- နောက်တစ်ခုကူးထည့်ကုဒ်များ
Sub ExtractColoredTexts()
Dim objDoc As Document, objDocAdd As Document
Dim objRange As Range
Set objDoc = ActiveDocument
Set objDocAdd = Documents.Add
objDoc.Activate
With Selection
.HomeKey Unit:=wdStory
With Selection.Find
.ClearFormatting
.Replacement.ClearFormatting
.Font.Color = wdColorRed
.Text = ""
.Execute
End With
Do While .Find.Found
Set objRange = Selection.Range
objDocAdd.Range.InsertAfter objRange & vbCr
.Collapse wdCollapseEnd
.Find.Execute
Loop
End With
End Sub
- ယခု "Run" ခလုတ်ကိုနှိပ်ပါ။
ထုတ်ယူထားသော စာသားများအားလုံးနှင့်အတူ ဖွင့်ထားသော စာရွက်စာတမ်းအသစ်တစ်ခု ရှိရမည်။
မှတ်ချက်- ကုဒ်လိုင်း “.Font.Color = wdColorRed” တွင်၊ သင်သည် “wdColorRed” ကို သင့်စာသားများ၏ တကယ့်အရောင်ဖြင့် အစားထိုးရန် လိုအပ်သည်။ အသေးစိတ်အကိုးအကားအတွက်၊ သင်သည် ဤစာမျက်နှာသို့ ဝင်ရောက်ကြည့်ရှုနိုင်သည်- https://docs.microsoft.com/en-us/office/vba/api/Word.WdColor
Word Problem ကိုဖြေရှင်းပါ။
ကျွန်ုပ်တို့အများစုဟာ Word ကို မကြာခဏအသုံးပြုနေကြပါပြီ။ ဒါပေမယ့် ဒီလိုဖြစ်နေပေမယ့်လည်း Word ပျက်သွားခြင်းလိုမျိုး ခက်ခဲတဲ့ပြဿနာတွေနဲ့ ကြုံတွေ့ရနိုင်ပါတယ်။ အရေးကြီးတဲ့ဖိုင်တွေ ပျောက်ဆုံးသွားနိုင်တာကြောင့် ဒါဟာ အတော်လေးကို ဆိုးရွားတဲ့ပြဿနာတစ်ခုပါပဲ။ ဒီလိုအခြေအနေမျိုးမှာ တစ်ခုခုကို ရယူဖို့ အကြံပြုထားပါတယ်။ စကားလုံးဒေတာအမှားပြင်ဆင်သည့်ကိရိယာ ၎င်းသည် မိနစ်အနည်းငယ်အတွင်း Word ဒေတာကို ပြန်လည်ရယူမည်ဖြစ်သည်။
စာရေးသူနိဒါန်း:
Vera Chen သည် ဒေတာပြန်လည်ရယူရေးဆိုင်ရာ ကျွမ်းကျင်သူဖြစ်သည်။ DataNumen, Inc. အပါအဝင် ဒေတာပြန်လည်ရယူရေးနည်းပညာများတွင် ကမ္ဘာ့ခေါင်းဆောင်ဖြစ်သည်။ xls ဒေတာပြဿနာပြုပြင်ရေးကိရိယာ နှင့် pdf ဆော့ဖ်ဝဲ ထုတ်ကုန်များကို ပြုပြင်ခြင်း။ ပိုမိုသိရှိလိုပါကသွားရောက်ကြည့်ရှု www ။datanumen.com






