Category: လမ်းညွှန်

VBA ကို အသုံးပြု၍ Excel အတွင်းရှိ ကော်လံများကို ဖျက်ရန် အောက်ပါနည်းလမ်းများကို အသုံးပြုနိုင်ပါသည်။ နည်းလမ်း 1- ကော်လံတစ်ခုကို ဖျက်ပါ။ SubDeleteColumns () Columns(" C ").Delete End Sub ဤဥပမာသည် ကော်လံ C ကို လက်ရှိအလုပ်စာအုပ်မှ ဖယ်ရှားမည်ဖြစ်သည်။ နည်းလမ်း 2- အပိုင်းအခြားမှ ကော်လံအားလုံးကို ဖယ်ရှားပါ။ SubDeleteColumns () Columns(" B:D ").Delete End Sub ဤဥပမာသည် လက်ရှိအလုပ်စာအုပ်ရှိ အပိုင်းအခြား...

ဆဲလ်တန်ဖိုးအပေါ် အခြေခံ၍ အတန်းများကို ဖျက်ရန် VBA တွင် အောက်ပါ syntax ကို သင်အသုံးပြုနိုင်သည်- Sub DeleteRowsByValue() Dim ws As Worksheet Set ws = ActiveSheet 'clear existing filters On Error Resume Next ws.ShowAllData On Error GoTo 0 'filter range where column 2 in range is equal...

VBA ကို အသုံးပြု၍ Excel တွင် ကော်လံအကျယ်များကို ပြောင်းလဲရန် အောက်ပါနည်းလမ်းများကို အသုံးပြုနိုင်ပါသည်။ နည်းလမ်း 1- ကော်လံတစ်ခု၏ အကျယ်ကို ပြောင်းပါ။ SubChangeColumnWidth () Columns(" B ").ColumnWidth = 20 End Sub ဤအထူးမက်ခရိုသည် ကော်လံ B ၏ အကျယ်ကို 20 သို့ ပြောင်းသည်။ မှတ်ချက် – Excel တွင် မူရင်းကော်လံအကျယ်သည် 8.29 ဖြစ်သည်။ နည်းလမ်း 2- ကော်လံများစွာ၏...

VBA ကို အသုံးပြု၍ Excel တွင် အတန်းအမြင့်ကို ပြောင်းလဲရန် အောက်ပါနည်းလမ်းများကို သင်သုံးနိုင်သည်။ နည်းလမ်း 1- အတန်းတစ်ခု၏အမြင့်ကိုပြောင်းပါ။ SubChangeRowHeight () Rows(3).RowHeight = 40 End Sub ဤအထူးမက်ခရိုသည် တတိယအတန်း၏အမြင့်ကို 40 သို့ပြောင်းသည်။ မှတ်ချက် – Excel တွင် မူရင်းအတန်းအမြင့်သည် 14.4 ဖြစ်သည်။ နည်းလမ်း 2- အတန်းများစွာ၏ အမြင့်ကို ပြောင်းပါ။ SubChangeRowHeight () Rows(" 1:5 ").RowHeight =...

တိကျသောစာသားပါရှိသော Excel အလုပ်စာအုပ်ရှိ စာရွက်တစ်ခုစီကို ဖျက်ရန် VBA တွင် အောက်ပါ syntax ကို သင်အသုံးပြုနိုင်သည်- SubDeleteSheets () Dim TextToFind As String Dim TextWildcard As String Dim Ws As Worksheet Dim i As Integer 'prompt user for text to search for in sheet names TextToFind =...

သင်အလုပ်စာအုပ်တစ်အုပ်ရှိ သီးခြားစာရွက်တစ်ခုကိုဖျက်ရန် VBA တွင် Delete နည်းလမ်းကိုအသုံးပြုသောအခါ၊ Excel သည် သင်စာရွက်ကိုဖျက်လိုသည်မှာသေချာလားဟုမေးသောအချက်ပြလိမ့်မည်။ သို့သော်၊ သင်သည် အမှာစာ သို့မဟုတ် သတိပေးချက်ဘောက်စ်မပါဘဲ စာရွက်တစ်ရွက်ကို ဖျက်ရန် VBA တွင် အောက်ပါ syntax ကို အသုံးပြုနိုင်သည်။ SubDeleteSheets () 'turn off display alerts Application.DisplayAlerts = False 'delete Sheet1 Sheets(" Sheet1 ").Delete 'turn back on display alerts...

သီးခြားဖိုင်တွဲတစ်ခုရှိ Excel ဖိုင်တစ်ခုကို ဖျက်ရန် VBA တွင် Kill ထုတ်ပြန်ချက်ကို အသုံးပြုနိုင်သည်။ ဤဖော်ပြချက်ကို လက်တွေ့တွင် အသုံးပြုရန် ဘုံနည်းလမ်းတစ်ခုဖြစ်သည်။ SubDeleteFile () On Error Resume Next Kill "C:\Users\Bob\Desktop\My_Data\soccer_data.xlsx" On Error GoTo 0 End Sub ဤ Macro သည် အောက်ပါဖိုင်တွဲတွင်ရှိသော soccer_data.xlsx ဟုခေါ်သော Excel ဖိုင်ကို ဖျက်လိုက်သည်- C:\Users\Bob\Desktop\My_Data On Error Resume Next...

ဖိုင်တွဲများကိုဖျက်ရန် VBA တွင် အောက်ပါနည်းလမ်းများကို သင်အသုံးပြုနိုင်သည်- နည်းလမ်း 1- ဖိုဒါရှိ ဖိုင်အားလုံးကို ဖျက်ပါ။ Sub DeleteFolderContents() On Error Resume Next Kill “ C:\Users\bobbi\Desktop\My_Data\*.* ” On Error GoTo 0 End Sub ဤအထူးမက်ခရိုသည် My_Data ဟုခေါ်သော ဖိုင်တွဲရှိ ဖိုင်အားလုံးကို ဖျက်လိုက်ပါမည်။ နည်းလမ်း 2- ဖိုဒါတစ်ခုလုံးကို ဖျက်ပါ။ SubDeleteFolder () On Error Resume...

VBA ကို အသုံးပြု၍ ဖိုင်တွဲတစ်ခုဖန်တီးရန် MkDir ကြေညာချက်ကို အသုံးပြုနိုင်သည်။ ဤဖော်ပြချက်ကို လက်တွေ့တွင် အသုံးပြုရန် ဘုံနည်းလမ်းတစ်ခုဖြစ်သည်။ SubCreateFolder () MkDir " C:\Users\Bob\Desktop\My_Data " End Sub ဤထူးခြားသော မက်ခရိုသည် ကျွန်ုပ်၏ကွန်ပျူတာ၏ ဒက်စ်တော့တွင် My_Data ဟုခေါ်သော ဖိုဒါတစ်ခုကို ဖန်တီးပေးလိမ့်မည်။ အောက်ဖော်ပြပါ ဥပမာသည် ဤလုပ်ဆောင်ချက်ကို လက်တွေ့အသုံးချနည်းကို ပြသထားသည်။ ဥပမာ- VBA ကိုအသုံးပြု၍ ဖိုင်တွဲတစ်ခုဖန်တီးပါ။ ကျွန်ုပ်၏ ဒက်စ်တော့တွင် လောလောဆယ် ဖိုင်တွဲနှစ်ခုပါရှိသည် ဆိုကြပါစို့။...

ဗလာလိုင်းများကိုဖယ်ရှားရန် VBA တွင် အောက်ပါနည်းလမ်းများကို သင်အသုံးပြုနိုင်သည်- နည်းလမ်း 1- သတ်မှတ်ထားသော အကွာအဝေးရှိ အလွတ်တန်းများကို ဖယ်ရှားပါ။ Sub DeleteEmptyRowsInRange() Sheets(" Sheet1 ").Select Range(" A1:B10 ").Select Selection.SpecialCells(xlCellTypeBlanks).EntireRow.Delete End Sub ဤအထူးမက်ခရိုသည် Sheet1 ၏ A1:B10 အကွာအဝေးမှ အလွတ်အတန်းအားလုံးကို ဖယ်ရှားပါမည်။ နည်းလမ်း 2- စာရွက်တစ်ခုလုံးရှိ အလွတ်တန်းများကို ဖျက်ပါ။ Sub DeleteEmptyRowsInSheet() 'turn off screen updating for...