Vba- တန်ဖိုးများကို ဖော်မတ်ချခြင်းမရှိဘဲ ကူးထည့်နည်း

သတ်မှတ်ထားသောဆဲလ်အကွာအဝေးကို ကူးယူပြီး ဖော်မတ်ချခြင်းမပြုဘဲ တည်နေရာအသစ်တွင်သာ တန်ဖိုးများကို ကူးထည့်ရန် VBA တွင် အောက်ပါ syntax ကို သင်အသုံးပြုနိုင်သည်-

 Sub PasteNoFormatting()

Range(" A1:D9 ").Copy
Range(" A12 ").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False

End Sub

ဤအထူးမက်ခရိုသည် အပိုင်းအခြား A1:D9 အတွင်းရှိ ဆဲလ်များကို ကူးယူကာ ဆဲလ်တန်ဖိုးများကို A12 မှစတင်သည့် အပိုင်းအခြားသို့ ဖော်မတ်ချခြင်းမရှိဘဲ ဆဲလ်တန်ဖိုးများကို ကူးထည့်ပါမည်။

မှတ်ချက် – Application.CutCopyMode = မက်ခရိုကို လုပ်ဆောင်ပြီးနောက် ဖြတ်ခြင်းနှင့် ကော်ပီမုဒ်ကို ပိတ်ထားသင့်သည်ဟု မှားယွင်းသော မျဉ်းက သတ်မှတ်သည်။

အောက်ဖော်ပြပါ ဥပမာသည် ဤ syntax ကို လက်တွေ့တွင် မည်သို့အသုံးပြုရမည်ကို ပြသထားသည်။

ဥပမာ- VBA ကို အသုံးပြု၍ ဖော်မတ်ချခြင်းမရှိဘဲ တန်ဖိုးများကိုသာ ကူးထည့်ပါ။

အမျိုးမျိုးသော ဘတ်စကတ်ဘောကစားသမားများအကြောင်း အချက်အလက်များပါရှိသော Excel တွင် အောက်ပါဒေတာအတွဲရှိသည် ဆိုကြပါစို့။

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

ဒါကိုလုပ်ဖို့ အောက်ပါ macro ကို ဖန်တီးနိုင်ပါတယ်။

 Sub PasteNoFormatting()

Range(" A1:D9 ").Copy
Range(" A12 ").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False

End Sub

ကျွန်ုပ်တို့ ဤ macro ကို run သောအခါတွင်၊ ကျွန်ုပ်တို့သည် အောက်ပါ output ကို ရရှိသည် ။

မူရင်းဆဲလ်တန်ဖိုးများကို ဖော်မတ်ချခြင်းမရှိဘဲ တည်နေရာအသစ်သို့ ကူးထည့်ထားကြောင်း သတိပြုပါ။

မှတ်ချက် – VBA PasteSpecial နည်းလမ်းအတွက် စာရွက်စာတမ်းအပြည့်အစုံကို ဤနေရာတွင် ရှာနိုင်သည်။

ထပ်လောင်းအရင်းအမြစ်များ

အောက်ဖော်ပြပါ သင်ခန်းစာများသည် VBA တွင် အခြားဘုံအလုပ်များကို မည်သို့လုပ်ဆောင်ရမည်ကို ရှင်းပြသည်-

VBA- နောက်ဆုံးသုံးထားသောစာကြောင်းကို ဘယ်လိုရှာမလဲ။
VBA- အပိုင်းအခြားရှိ အတန်းအရေအတွက်ကို ရေတွက်နည်း
VBA- အသုံးပြုထားသော ကော်လံအရေအတွက်ကို ရေတွက်နည်း