ဒီပို့စ်မှာ သင့်ရဲ့ Word စာရွက်စာတမ်းမှာ ပုံသဏ္ဍာန်များစွာရဲ့ ဖြည့်အရောင်ကို အသုတ်လိုက်ဖယ်ရှားဖို့ ထိရောက်တဲ့ နည်းလမ်း ၃ ခုကို ပြသပေးလို့ ဝမ်းမြောက်မိပါတယ်။
ပုံသဏ္ဍာန်များကို Word စာရွက်စာတမ်းတစ်ခုတွင် ထည့်သွင်းစဉ်တွင်၊ သင်သည် ၎င်းတို့အား ဖြည့်စွက်အရောင်ကိုလည်း ထည့်သွင်းနိုင်သည်။ ပုံသဏ္ဍာန်တစ်ခုတည်း၏ ဖြည့်စွက်အရောင်ကို ထည့်ရန် သို့မဟုတ် ဖယ်ရှားရန် လွယ်ကူသည်။ သို့သော် batch processing နှင့်ပတ်သက်လာသောအခါ၊ ကျွန်ုပ်တို့သည် လှည့်ကွက်အချို့ လိုအပ်မည်ဖြစ်သည်။
ယခုတစ်ကြိမ်တွင်၊ စာရွက်စာတမ်းရှိ ပုံသဏ္ဍာန်များစွာ၏ ဖြည့်စွက်အရောင်ကို အသုတ်လိုက်ဖယ်ရှားနည်းကို သင့်အား ပြသလိုပါသည်။ ထို့ကြောင့် ၎င်းတို့ကို အလိုရှိသော အရောင်များဖြင့် ပြန်လည်ဖြည့်သွင်းနိုင်သည် သို့မဟုတ် ပုံသဏ္ဍာန်များကို နောက်ခံအလွတ်တွင်သာ ချန်ထားနိုင်သည်။ အောက်ပါတို့သည် မတူညီသောကိစ္စများတွင် သင့်အား ကူညီပေးနိုင်သော နည်းလမ်း 3 ခုဖြစ်သည်။
နည်းလမ်း 1- စာမျက်နှာတစ်ခုပေါ်ရှိ ပုံသဏ္ဍာန်များစွာ၏ ဖြည့်စွက်အရောင်ကို ဖယ်ရှားပါ။
- ပထမဆုံးအနေနဲ့ Ribbon ရှိ “Home” tab ကိုနှိပ်ပါ။
- ထို့နောက် "တည်းဖြတ်ခြင်း" အုပ်စုရှိ "Select" အမိန့်ကိုနှိပ်ပါ။
- drop-down menu တွင်၊ "ရွေးချယ်မှုအကန့်" ကိုရွေးချယ်ပါ။
- ယခု "ရွေးချယ်မှုနှင့် မြင်နိုင်မှု" အကန့်တွင်၊ ဤစာမျက်နှာရှိ ပုံသဏ္ဍာန်များ၏ အမည်အားလုံးကို သင်မြင်နိုင်သည်။ သင်လိုအပ်သောပုံစံများကိုရွေးချယ်ရန် "Ctrl" ကိုနှိပ်ပါ။
- ထို့နောက် Ribbon တွင် "Format" ကိုနှိပ်ပါ။
- ထို့နောက် "Shape Fill" ကိုနှိပ်ပါ။
- drop-down menu တွင် "No Fill" ကိုရွေးချယ်ပါ။
နည်းလမ်း 2- စာရွက်စာတမ်းတစ်ခုတွင် ပုံသဏ္ဍာန်အားလုံး၏ ဖြည့်စွက်အရောင်ကို အသုတ်လိုက် ဖယ်ရှားပါ။
- အဓိကအားဖြင့် “Developer” tab ရှိရင် နှိပ်ပြီး VBA editor ကိုဖွင့်ဖို့ “Visual Basic” ကို နှိပ်ပါ။ “Developer” ကို activate မလုပ်ရသေးရင် “Alt+ F11” ကို နှိပ်ပါ။
- ယခု တည်းဖြတ်သူတွင် ဘယ်ဘက်ရှိ "ပုံမှန်" ပရောဂျက်ကို နှိပ်ပါ။
- ထို့နောက် မီနူးဘားပေါ်ရှိ “Insert” ကိုနှိပ်ပါ။
- ထို့နောက် drop-down menu တွင် "Module" ကိုရွေးချယ်ပါ။
- ၎င်းကိုဖွင့်ပြီး ဤကုဒ်များကို ထိုနေရာတွင် ကူးထည့်ရန် မော်ဂျူးအသစ်ပေါ်တွင် နှစ်ချက်နှိပ်ပါ။
Sub RemoveAllShapeFill()
Dim objShape As Shape
Dim objDoc As Document
Application.ScreenUpdating = False
Set objDoc = ActiveDocument
For Each objShape In objDoc.Shapes
objShape.Fill.Visible = False
objShape.Line.Visible = msoTrue
Next objShape
Application.ScreenUpdating = True
Set objDoc = Nothing
End Sub
- နောက်ဆုံးအနေဖြင့်၊ ကုဒ်များကိုလုပ်ဆောင်ရန် "Run" ခလုတ်ကိုနှိပ်ပါ သို့မဟုတ် "F5" ကိုနှိပ်ပါ။
နည်းလမ်း 3- စာရွက်စာတမ်းတစ်ခုရှိ စာသားအကွက်များအားလုံး၏ ဖြည့်စွက်အရောင်ကို ဖယ်ရှားပါ။
စာသားသေတ္တာများသည် ပုံသဏ္ဍာန်အမျိုးအစားတွင် သက်ဆိုင်ပါသည်။ စာသားအကွက်အားလုံး၏ ဖြည့်စွက်အရောင်ကို ဖယ်ရှားလိုသော်လည်း အခြားပုံသဏ္ဍာန်များကို သိမ်းဆည်းလိုပါက ဤနည်းလမ်းကို အသုံးပြုနိုင်သည်။
- ပထမဦးစွာ၊ macro ကိုထည့်သွင်းပြီး run ရန် method 2 တွင်အဆင့်များကိုပြန်လုပ်ပါ။
- ပြီးတော့ ဒီတစ်ခါ၊ အဲဒီ macro ကို ဒီတစ်ခုနဲ့ အစားထိုးလိုက်ပါ-
Sub RemoveTextBoxFill()
Dim objShape As Shape
Dim objDoc As Document
Application.ScreenUpdating = False
Set objDoc = ActiveDocument
For Each objShape In objDoc.Shapes
If objShape.Type = msoTextBox Then
objShape.Fill.Visible = msoFalse
objShape.Line.Visible = msoTrue
Else
Exit For
End If
Next objShape
Application.ScreenUpdating = True
Set objDoc = Nothing
End Sub
ဤသည်မှာ ရလဒ်ဖြစ်သည်။
ပျက်စီးနေသောစာရွက်စာတမ်းများကို အမြန်ပြန်ယူပါ။
စာရွက်စာတမ်းပျက်စီးမှုတွေနဲ့ ကြုံတွေ့ရရင် စိတ်မပူပါနဲ့။ စာရွက်စာတမ်းအများစုကို ပြန်လည်ရယူနိုင်တယ်ဆိုတာ သတိရပါ။ သင်လုပ်သင့်တာက အချိန်ယူပြီး ရယူဖို့ပါပဲ။ doc fix ကိရိယာ။ ယနေ့ခေတ်တွင်၊ ထိုသို့သော အသုံးဝင်မှုသည် သင်၏ဒေတာကို ပြန်လည်ရယူရာတွင် ကြီးမားသောအကူအညီဖြစ်နိုင်ပါသည်။
စာရေးသူနိဒါန်း:
Vera Chen သည် ဒေတာပြန်လည်ရယူရေးဆိုင်ရာ ကျွမ်းကျင်သူဖြစ်သည်။ DataNumen, Inc. အပါအဝင် ဒေတာပြန်လည်ရယူရေးနည်းပညာများတွင် ကမ္ဘာ့ခေါင်းဆောင်ဖြစ်သည်။ xls ပြင်ပါ။ နှင့် pdf ဆော့ဖ်ဝဲ ထုတ်ကုန်များကို ပြုပြင်ခြင်း။ ပိုမိုသိရှိလိုပါကသွားရောက်ကြည့်ရှု www ။datanumen.com




