3 သင့် Word Document ရှိ ရုပ်ပုံများသို့ ဘောင်များထည့်ရန် အမြန်နည်းလမ်းများ

ဤဆောင်းပါးတွင်၊ သင်၏ Word Documents အတွင်းရှိ ပုံများတွင် ဘောင်များထည့်နည်း အမြန်နည်းလမ်း 3 ခုကို ဆွေးနွေးလိုပါသည်။

ကျွန်ုပ်တို့သည် ရုပ်ပုံများတွင် ဘောင်များကို အဘယ်ကြောင့် အသုံးပြုရမည်နည်း။ အဖြေက ရှင်းပါတယ်။ အချို့သောပုံများသည် အဓိကအကြောင်းအရာနှင့် အလွန်တူလွန်းသည်၊ စာသားများအတွက် ကျွန်ုပ်တို့ အလွယ်တကူ မှားသွားနိုင်သည့် စကားလုံးများကို ကွက်တိကွက်ကြားပြောပါ။ ထို့ကြောင့် ပုံများကို ထင်ရှားပေါ်လွင်စေရန်အတွက် အောက်ပါနည်းလမ်း 3 ခု၏ အသုံးဝင်မှုကို ကျွန်ုပ်တို့ သင်ပြပေးမည်ဖြစ်ပါသည်။

နည်းလမ်း 1- စာရွက်စာတမ်းတစ်ခုတွင် ပုံတစ်ပုံသို့ နယ်နိမိတ်များထည့်ပါ။

1. ပထမဦးစွာ ရွေးချယ်ရန် ပုံတစ်ပုံကို နှိပ်ပါ။
2. ထို့နောက် “Picture Tool” အောက်ရှိ “Format” tab ကိုနှိပ်ပါ။
3. ထို့နောက် "Picture Border" ကိုနှိပ်ပြီး အရောင်တစ်ခုကို ရွေးချယ်ပါ။   

နည်းလမ်း 2- စာရွက်စာတမ်းတစ်ခုတည်းတွင် ပုံများအားလုံးသို့ ဘောင်များထည့်ပါ။

နည်းလမ်း 1 တွင်ပြထားသည့်အတိုင်း၊ ပုံတစ်ပုံချင်းစီကို ကိုယ်တိုင်ပြောင်းလဲခြင်းသည် စိတ်ကူးကောင်းမဟုတ်ပါ။ ကြိုးပမ်းအားထုတ်မှုများကို ချွေတာရန်၊ မက်ခရိုသည် သင်ယူသင့်သည့် နည်းလမ်းဖြစ်သည်။

1. အစပိုင်းမှာ VBA editor ကိုပြဖို့ “Developer” tab ကိုနှိပ်ပြီးရင် “Visual Basic” ကိုနှိပ်လိုက်ပါ။ “Developer” မရနိုင်ရင် “Alt+ F11” ကိုနှိပ်လိုက်ရုံပါပဲ။
2. ထို့နောက် "Normal" ကိုနှိပ်ပါ။
3. ထို့နောက် "Insert" tab ကိုနှိပ်ပြီး၎င်း၏မီနူးရှိ "Module" ကိုရွေးချယ်ပါ။
4. ညာဘက်ခြမ်းရှိ coding area ကိုဖွင့်ရန် module အသစ်ကို နှစ်ချက်နှိပ်ပါ။
5. ယခု အောက်ဖော်ပြပါ မက်ခရိုကို ထိုနေရာတွင် ကူးထည့်ပါ။

Sub AddPictureBorders()
  Dim objShape As Shape
  Dim objInLineShape As InlineShape
  Dim objDoc As Document
 
  Set objDoc = ActiveDocument
 
  With objDoc
    For Each objInLineShape In .InlineShapes
      With objInLineShape.Line
        .Style = msoLineSingle
        .ForeColor.RGB = RGB(0, 0, 0)
      End With
    Next
    For Each objShape In .Shapes
      objShape.Fill.Solid
      With objShape.Line
        .Style = msoLineSingle
        .ForeColor.RGB = RGB(0, 0, 0)
      End With
    Next
  End With
End Sub

6. နောက်ဆုံးအနေနှင့် အနည်းဆုံးတော့၊ "Run" ခလုတ်ကိုနှိပ်ပါ သို့မဟုတ် "F5" ကိုနှိပ်ပါ။

နည်းလမ်း 3- စာရွက်စာတမ်းများစွာတွင် ပုံများအားလုံးသို့ ဘောင်များထည့်ပါ။

စာရွက်စာတမ်းတစ်ခုတွင် ရုပ်ပုံများကို ကိုင်တွယ်ဖြေရှင်းရန် မက်ခရိုတစ်ခုရေးနိုင်သောကြောင့်၊ စာရွက်စာတမ်းများစွာတွင် ပုံများကို စီမံဆောင်ရွက်နိုင်သည့်နည်းလမ်းလည်း ရှိပါသည်။

အားလုံးမစခင်မှာ target document အားလုံးကို directory တစ်ခုတည်းအောက်မှာ စီစဉ်ဖို့ လိုအပ်ပါတယ်။ ပြီးရင် macro ကို install လုပ်ပြီး run ဖို့ အထက်မှာပြထားတဲ့ အဆင့်တွေကို လိုက်နာပါ။ ဒါပေမယ့် အောက်ပါနဲ့ အစားထိုးလိုက်ပါ။

Sub AddPictureBordersInMultiDoc()
  Dim objShape As Shape
  Dim objInLineShape As InlineShape
  Dim objDoc As Document
  Dim strFile As String
  Dim strFolder As String
 
  Set objDoc = ActiveDocument
  strFolder = "C:\Users\Public\Documents\New folder\"
  strFile = Dir(strFolder & "*.docx", vbNormal)
 
  While strFile <> ""
    Set objDoc = Documents.Open(FileName:=strFolder & strFile)
    With objDoc
      For Each objInLineShape In .InlineShapes
        With objInLineShape.Line
          .Style = msoLineSingle
          .ForeColor.RGB = RGB(0, 0, 0)
        End With
      Next
      For Each objShape In .Shapes
        objShape.Fill.Solid
        With objShape.Line
          .Style = msoLineSingle
          .ForeColor.RGB = RGB(0, 0, 0)
        End With
      Next
    End With
    objDoc.Save
    objDoc.Close
    strFile = Dir()
  Wend
End Sub

မှတ်စုများ:

1. အဆိုပါ "C:\Users\Public\Documents\New folder\” ဤမက်ခရိုတွင် သင်စာရွက်စာတမ်းများသိမ်းဆည်းသည့်လမ်းကြောင်းကို ရည်ညွှန်းသည်။ နောက်ဆုံးထည့်ဖို့ မမေ့နဲ့နော်"\"။
2. ဘောင်ကို ပြောင်းလဲခြင်းဖြင့် သင်ပြောင်းလဲနိုင်သည်။ RGB တန်ဖိုး.

Backup အကြောင်းစဉ်းစားရန်အချိန်

ကျွန်ုပ်တို့အများစုဟာ အရန်ကူးယူမှုတစ်ခု ဘာလုပ်ပေးနိုင်လဲဆိုတာကို ကောင်းကောင်းသိကြပါတယ်။ ဒီလိုအခြေအနေမျိုးမှာ အသက်ကယ်ပေးနိုင်ပါတယ်။ စကားလုံးပျက်စီးခြင်း။. ထို့ကြောင့် ကျွန်ုပ်တို့သည် တန်ဖိုးရှိသောစာရွက်စာတမ်းများကို အရန်သိမ်းဆည်းရန် မိနစ်များယူခြင်း၏အကျိုးသက်ရောက်မှုကို ဘယ်သောအခါမှ လျော့ပါးစေမည်မဟုတ်ပါ။ ထို့ကြောင့် မိမိဒေတာ၏ ဘေးကင်းမှုကို အာမခံနိုင်မည်မဟုတ်ပေ။

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

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