သီးခြား Outlook အီးမေးလ်များအဖြစ် Excel Workbook တစ်ခုတွင် အလုပ်စာရွက်များအားလုံးကို တွဲပို့နည်း

Outlook ဖြေရှင်းချက် စက်တင်ဘာလ 29, 2025

အကယ်၍ သင်သည် သီးခြား Outlook အီးမေးလ်များအဖြစ် Excel workbook တွင် worksheet အားလုံးကို ပေးပို့လိုပါက၊ ဤဆောင်းပါးတွင် ဖော်ပြထားသော နည်းလမ်းကို အသုံးပြုနိုင်သည်။ တစ်ခုပြီးတစ်ခု မပို့ဘဲ အစုလိုက်အပြုံလိုက် သဘောပေါက်ဖို့ လမ်းညွှန်ပေးနိုင်ပါတယ်။

ကျွန်တော့်ရဲ့ ယခင်ပို့စ်မှာ "2 Outlook Email အဖြစ် Excel Worksheet ကို အမြန်ပေးပို့ရန် နည်းလမ်းများ"Excel worksheet တစ်ခုကို email အနေနဲ့ ပို့နည်း နှစ်မျိုးကို လေ့လာနိုင်ပါတယ်။ workbook တစ်ခုတည်းမှာ worksheet အားလုံးကို individual email အနေနဲ့ batch ပို့ချင်ရင်တော့ post မှာ ဖော်ပြထားတဲ့ နည်းလမ်းနှစ်ခုထဲက တစ်ခုခုကို အသုံးပြုတာက အတော်လေး ပင်ပန်းပြီး ဒုက္ခများပါလိမ့်မယ်။ ဒါကြောင့် "Batch Send" ကို အချိန်တိုအတွင်း ရရှိနိုင်မယ့် နောက်ထပ်နည်းလမ်းတစ်ခုကို မိတ်ဆက်ပေးပါမယ်။

သီးခြားအီးမေးလ်များအဖြစ် Excel Workbook တစ်ခုတွင် အလုပ်စာရွက်များအားလုံးကို အသုတ်လိုက်ပို့ပါ။

ပထမဦးစွာ၊ သင်သည်အရင်းအမြစ် Excel အလုပ်စာအုပ်ကိုဖွင့်သင့်သည်။
ထို့နောက် Excel ဝင်းဒိုးထဲသို့ ဝင်ရောက်ပြီးနောက်၊ သင်သည် “Alt + F11” သော့ဖြတ်လမ်းများကို နှိပ်ရပါမည်။
ထို့နောက်၊ “Microsoft Visual Basic for Applications” ဟုခေါ်သော အခြားဝင်းဒိုးတစ်ခုကို ပြသပါမည်။
၎င်းတွင်၊ သင်သည် အသုံးမပြုသော module တစ်ခုကိုဖွင့်ရန် သို့မဟုတ် module အသစ်တစ်ခုကို ထည့်သွင်းရပါမည်။
ထို့နောက်တွင်၊ သင်သည် အောက်ပါ VBA ကုဒ်ကို ဤ module သို့ ကူးယူနိုင်သည်။

Sub SendEachWorksheet_inOutlookEmail()
    Dim objWorksheet As Excel.Worksheet
    Dim objRange As Excel.Range
    Dim objTempWorkbook As Excel.Workbook
    Dim objTempWorksheet As Excel.Worksheet
    Dim strTempFolder As String
    Dim strHTMLFile As String
    Dim objHTMLFile As Object
    Dim objFileSystem As Object
    Dim objTextStream As Object
    Dim objOutlookApp As Outlook.Application
    Dim objMail As Outlook.MailItem
 
    For Each objWorksheet In ActiveWorkbook.Sheets
        Set objRange = objWorksheet.UsedRange
        objRange.Copy
 
        Set objTempWorkbook = Excel.Application.Workbooks.Add(1)
        Set objTempWorksheet = objTempWorkbook.Sheets(1)
        With objTempWorksheet.Cells(1)
             .PasteSpecial xlPasteValues
             .PasteSpecial xlPasteColumnWidths
             .PasteSpecial xlPasteFormats
        End With
 
        strTempFolder = CStr(Environ("USERPROFILE")) & "\AppData\Local\Temp"
        strHTMLFile = strTempFolder & "\Temp" & Format(Now, "yyyymmddhhmmss") & ".htm"
        Set objHTMLFile = objTempWorkbook.PublishObjects.Add(xlSourceRange, strHTMLFile, objTempWorksheet.Name, objTempWorksheet.UsedRange.Address)
        objHTMLFile.Publish (True)
 
        Set objOutlookApp = CreateObject("Outlook.Application")
        Set objMail = objOutlookApp.CreateItem(olMailItem)
 
        Set objFileSystem = CreateObject("Scripting.FileSystemObject")
        Set objTextStream = objFileSystem.OpenTextFile(strHTMLFile)
        objMail.HTMLBody = objTextStream.ReadAll
 
        'Change the email details as per your needs
        With objMail
             .To = "test@datanumen.com"
             .Subject = objWorksheet.Name
             .Display
        End With
 
        objTextStream.Close
        objTempWorkbook.Close False
        Kill strHTMLFile
    Next
End Sub

၎င်းနောက်၊ F5 ခလုတ်ခလုတ်ကို နှိပ်ခြင်း သို့မဟုတ် ကိရိယာဘားရှိ “Run” အိုင်ကွန်ကို နှိပ်ခြင်းဖြင့် သင်သည် ဤမက်ခရိုကို အစပျိုးနိုင်သည်။
တစ်ချိန်တည်းတွင်၊ ဤ Excel အလုပ်စာအုပ်ရှိ အလုပ်စာရွက်အားလုံးနှင့် သက်ဆိုင်သည့် အီးမေးလ်များကို Outlook တွင် ပြသပါမည်။
နောက်ဆုံးတွင် သင်သည် အီးမေးလ်များ၏ အသေးစိတ်အချက်အလက်များအားလုံးကို ပြန်လည်စစ်ဆေးနိုင်ပြီး နောက်ဆုံးတွင် အီးမေးလ်များကို ပေးပို့ရန် "ပို့ရန်" ခလုတ်ကို နှိပ်နိုင်ပါသည်။

Backup များမရှိပါက Potent Recovery Tool ကိုအသုံးပြုပါ။

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

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

Shirley Zhang သည် ဒေတာပြန်လည်ရယူရေးဆိုင်ရာ ကျွမ်းကျင်သူဖြစ်သည်။ DataNumen, Inc. အပါအဝင် ဒေတာပြန်လည်ရယူရေးနည်းပညာများတွင် ကမ္ဘာ့ခေါင်းဆောင်ဖြစ်သည်။ sql ပြန်လည်ရယူပါ။ နှင့် outlook ပြုပြင်ရေး software ထုတ်ကုန်များ။ ပိုမိုသိရှိလိုပါကသွားရောက်ကြည့်ရှု www ။datanumen.com

မှတ်ချက်များကိုပိတ်ထားကြသည်။