ဤဆောင်းပါးတွင်၊ သင့် Word document ရှိ ဇယားစတိုင်များအားလုံးကို ရှင်းလင်းသုတ်သင်ရန် အသုံးဝင်သော နည်းလမ်း 3 ခုကို ပြသရန် အာရုံစိုက်ပါမည်။
တစ်ကြိမ်တစ်ခါမျှ မလိုလားအပ်သော စတိုင်ဖြင့် Word ဇယားကို အသုံးချပါက သို့မဟုတ် စာရွက်စာတမ်းတစ်ခုလုံး၏ အမြင်အာရုံအကျိုးသက်ရောက်မှုကို လျော့နည်းစေပါက၊ ၎င်း၏ပုံစံကို သင်ရှင်းလင်းရန် လိုအပ်သည်။ ယခုထိုကဲ့သို့သောတာဝန်ကို ပြီးမြောက်အောင်ပြုလုပ်နည်းကို သင့်အားပြသလိုက်ကြပါစို့။
နည်းလမ်း 1- စကားလုံးတစ်လုံးတည်း၏ပုံစံကို ရှင်းလင်းပါ။
- ပထမနှင့်ပုံစံostကာဆာကို အပေါ်မှရွှေ့ပါ။ tarစားပွဲ၏ဘယ်ဘက်အပေါ်ထောင့်တွင် လက်ဝါးကပ်တိုင်ဆိုင်းဘုတ်ကိုတွေ့သည်အထိ ဇယားကိုရယူပါ။
- ထို့နောက် ဇယားတစ်ခုလုံးကို ရွေးချယ်ရန် လက်ဝါးကပ်တိုင် ဆိုင်းဘုတ်ကို နှိပ်ပါ။
- ယခု သင် "Table Tools" ကို အစပျိုးလိုက်ပါပြီ။ "ဒီဇိုင်း" tab ကိုနှိပ်ပါ။
- ထို့နောက် drop-down menu ကိုပြသရန် "Table Styles" အုပ်စုရှိ "နောက်ထပ်" ခလုတ်ကိုနှိပ်ပါ။
- "Clear" option ကိုရွေးချယ်ပါ။
- ယခု ဇယားပုံစံကို ဖယ်ရှားလိုက်ပါပြီ။ ဇယားဘောင်များအားလုံးသည် ထိုနည်းလည်းကောင်းပင်။ ဇယားသို့ ဘောင်များထည့်ရန်၊ ဇယားကို ရွေးထားကြောင်း သေချာပါစေ။ ပြီးလျှင် “Borders” command ဘေးရှိ drop-down button ကိုနှိပ်ပါ။
- ပြီးလျှင် “All Borders” ကို ရွေးပါ။
ဤသည်မှာ ရလဒ်ဖြစ်သည်။
နည်းလမ်း 2- စာရွက်စာတမ်းတစ်ခုတည်းတွင် ဇယားပုံစံများအားလုံးကို အသုတ်လိုက်ရှင်းလင်းပါ။
ကျွန်ုပ်တို့သည် ဇယားတစ်ခုတည်းကို ပြီးသည်နှင့်၊ အစုလိုက်လုပ်ဆောင်ခြင်း၏ ခေါင်းစဉ်ကို လက်လွတ်မခံနိုင်ပါ။ ပထမဦးစွာ၊ VBA မှတစ်ဆင့် စာရွက်စာတမ်းတစ်ခုရှိ ဇယားစတိုင်များအားလုံးကို မည်သို့ရှင်းလင်းရမည်ကို ကြည့်ကြပါစို့။
- ၎tart နှင့်အတူ၊ Word တွင် VBA တည်းဖြတ်သူကိုပြသရန် "Alt+ F11" ကိုနှိပ်ပါ။
- ထို့နောက် ဘယ်ဘက်ကော်လံရှိ "ပုံမှန်" ပရောဂျက်ကို နှိပ်ပါ။
- ထို့နောက် မီနူးဘားပေါ်ရှိ “Insert” ကို နှိပ်ပါ။
- ပြီးလျှင် drop-down menu တွင် "Module" ကိုရွေးချယ်ပါ။
- ၎င်းကိုနှစ်ချက်နှိပ်ခြင်းဖြင့် module ၏ coding space ကိုဖွင့်ပါ။
- ယခု အောက်ပါ macro ကို ထိုနေရာတွင် ကူးထည့်ပါ။
Sub ClearTableStylesInADoc()
Dim objTable As Table
Dim objDoc As Document
Application.ScreenUpdating = False
Set objDoc = ActiveDocument
For Each objTable In objDoc.Tables
objTable.Style = "Table Normal"
objTable.Borders.Enable = True
Next objTable
Application.ScreenUpdating = True
Set objDoc = Nothing
End Sub
- နောက်ဆုံးတွင် "Run" ကိုနှိပ်ပါ။
ဤ macro သည် စာရွက်စာတမ်းတစ်ခုရှိ ဇယားပုံစံများအားလုံးကို ရှင်းလင်းစေပြီး ၎င်းတို့အတွက် "Table Normal" စတိုင်ကို အသုံးပြုကာ ဇယားဘောင်များကို ပေါင်းထည့်သည်။
နည်းလမ်း 3- စာရွက်စာတမ်းများစွာရှိ ဇယားပုံစံများအားလုံးကို အစုလိုက်ရှင်းလင်းပါ။
ယခု သင့်တွင် ကိုင်တွယ်ဖြေရှင်းရန် စာရွက်စာတမ်းနှစ်စုံရှိပါက၊ စာရွက်စာတမ်းများစွာရှိ ဇယားပုံစံများအားလုံးကို ရှင်းလင်းရန် ဤနေရာတွင် macro ဖြစ်သည်။
- ပထမဦးစွာ၊ ဖိုင်တွဲတစ်ခုတွင် စာရွက်စာတမ်းအားလုံးကို စီစဉ်ပါ။
- မက်ခရိုကို ထည့်သွင်းပြီး လုပ်ဆောင်ရန် နည်းလမ်း 2 တွင် ထပ်ခါတလဲလဲ လုပ်ဆောင်သည်။
- ဤတစ်ကြိမ်သာ၊ ဤမက်ခရိုဖြင့် အစားထိုးရန် မမေ့ပါနှင့်။
Sub ClearTableStylesInMultiDoc()
Dim objTable As Table
Dim objDoc As Document
Dim StrFolder As String
Dim strFile As String
Dim dlgFile As FileDialog
Set dlgFile = Application.FileDialog(msoFileDialogFolderPicker)
With dlgFile
If .Show = -1 Then
StrFolder = .SelectedItems(1) & "\"
Else
MsgBox "Select a folder first."
Exit Sub
End If
End With
strFile = Dir(StrFolder & "*.docx", vbNormal)
While strFile <> ""
Set objDoc = Documents.Open(FileName:=StrFolder & strFile)
Set objDoc = ActiveDocument
For Each objTable In objDoc.Tables
objTable.Style = "Table Normal"
objTable.Borders.Enable = True
Next objTable
objDoc.Save
objDoc.Close
strFile = Dir()
Wend
End Sub
- မက်ခရိုကို လုပ်ဆောင်နေစဉ်တွင် “Browse” ဝင်းဒိုး ပေါ်လာလိမ့်မည်။ အဆင့် 1 တွင် သင်သိမ်းဆည်းထားသည့် ဖိုင်တွဲကို ရွေးပြီး “OK” ကိုနှိပ်ပါ။
ပြီးရင် ကျန်တဲ့အလုပ်တွေကို macro မှာထားလိုက်ပါ။
L ကိုပြန်လည်ရရှိရန်နည်းလမ်းများost စာရွက်စာတမ်းများ
ဌအားဖြင့်ost စာရွက်စာတမ်းများ၊ ကျွန်ုပ်တို့သည် စာရွက်စာတမ်းများကြောင့် အပေးအယူလုပ်ခြင်းကို ဆိုလိုပါသည်။ စကားလုံး ဖောက်ပြန်မှု သို့မဟုတ် လူသားအမှားများ။ ထိုသို့သောစာရွက်စာတမ်းများကို ကိုင်တွယ်ဖြေရှင်းရာတွင် အဆင့်မြင့်ပြုပြင်ရေးကိရိယာအချို့၏အကူအညီဖြင့် ၎င်းတို့ကို ပြန်လည်ရယူနိုင်ကြောင်း အမြဲသတိရသင့်သည်။
စာရေးသူနိဒါန်း:
Vera Chen သည် ဒေတာပြန်လည်ရယူရေးဆိုင်ရာ ကျွမ်းကျင်သူဖြစ်သည်။ DataNumen, Inc. အပါအဝင် ဒေတာပြန်လည်ရယူရေးနည်းပညာများတွင် ကမ္ဘာ့ခေါင်းဆောင်ဖြစ်သည်။ xls ပြုပြင်ပါ။ နှင့် pdf ဆော့ဖ်ဝဲ ထုတ်ကုန်များကို ပြုပြင်ခြင်း။ ပိုမိုသိရှိလိုပါကသွားရောက်ကြည့်ရှု www ။datanumen.com





