Bir Excel Çalışma Kitabı İçin Hızlı Bir Şekilde Outlook Görevi Oluşturmanın 2 Kolay Yöntemi

Bazı kullanıcılar, bir Excel çalışma kitabı için hızla bir Outlook görevi oluşturmaya heveslidir. Bu nedenle, bu yazıda onu elde etmek için 2 basit yaklaşımı tanıtacağız.

Bazen, takip veya başka nedenlerle bir Excel dosyasından bir Outlook görevi oluşturmak isteyebilirsiniz. Aslında, Microsoft Excel, aşağıda tanıtılan Yöntem 1 gibi yerel bir "Microsoft Outlook Görevi Oluştur" özelliğiyle birlikte gelir. Ancak, yalnızca Excel çalışma kitabını bir Outlook görevine ekler. İstediğiniz, tüm çalışma sayfalarının tüm içeriğini hızlı bir şekilde bir Outlook görevinin gövdesine kopyalamaksa, bunun yerine Yöntem 2'yi kullanabilirsiniz. Şimdi 2 anlamı ayrıntılı olarak öğrenmek için okumaya devam edin.

Yöntem 1: MS Excel'de “Microsoft Outlook Görevi Oluştur” Komutunu Kullanın

1. İlk olarak, ilgili Excel çalışma kitabını açın.
2. Ardından, Hızlı Erişim Araç Çubuğundaki aşağı ok düğmesine tıklayın.
3. Ardından, açılır listeden "Diğer Komutlar" ı seçin.
4. Daha sonra yeni açılan “Excel Seçenekleri” penceresinde “Hızlı Erişim Araç Çubuğu” sekmesinde “Microsoft Outlook Görevi Oluştur” komutunu Hızlı Erişim Araç Çubuğuna ekleyin.

• Öncelikle, "Komutları seç" listesinden "Şeritte Olmayan Komutlar" ı seçin.
• Ardından, "Microsoft Outlook Görevi Oluştur" komutunu bulun ve adım atın.
• Daha sonra ortadaki “Ekle >>” butonuna tıklayın.
• Son olarak, “Tamam” düğmesine basın.

5. Sonunda, Excel çalışma kitabına döndükten sonra, Hızlı Erişim Araç Çubuğu'ndaki yeni düğmesine tıklayın.
6. Hemen, aşağıdaki ekran görüntüsü gibi mevcut Excel çalışma kitabına eklenmiş yeni bir Outlook görevi görüntülenecektir.

Yöntem 2: Excel Çalışma Kitabını VBA Koduyla Bir Outlook Görevinin Gövdesine Kopyalayın

1. İlk başta, kaynak Excel dosyasını açın.
2. Ardından, Excel VBA düzenleyicisini tetiklemek için “Alt + F11” tuşlarına basın.
3. Ardından, “Microsoft Outlook Object Lib'i etkinleştirin.rary”, hakkında “ başvurabileceğinizNesne Kitaplığı Nasıl Eklenir?rary VBA'da Referans".
4. Ardından aşağıdaki VBA kodunu bir modüle veya “ThisWorkbook” projesine koyun.

Sub CreateOutlookTaskforExcelWorkbook()
    Dim objOutlookApp As Outlook.Application
    Dim objTask As Outlook.TaskItem
    Dim objWorksheet As Excel.Worksheet
    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 objTempMail As Outlook.MailItem
 
    Set objOutlookApp = CreateObject("Outlook.Application")
    Set objTask = objOutlookApp.CreateItem(oltaskitem)
    objTask.Subject = ActiveWorkbook.Name
    objTask.Display
 
    For Each objWorksheet In ActiveWorkbook.Sheets
        objWorksheet.UsedRange.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 objTempMail = objOutlookApp.CreateItem(olMailItem)
 
        Set objFileSystem = CreateObject("Scripting.FileSystemObject")
        Set objTextStream = objFileSystem.OpenTextFile(strHTMLFile)
        objTempMail.HTMLBody = objTextStream.ReadAll
        objTempMail.Display
 
        objTask.Body = objTask.Body & vbCr & "-----------------------" & vbCr & objTempMail.Body

        objTextStream.Close
        objTempWorkbook.Close False
        Kill strHTMLFile
        objTempMail.Close olDiscard
    Next
End Sub

5. Sonunda, “F5” tuş düğmelerine basın.
6. Makro bittiğinde, aşağıdaki ekran görüntüsünde gösterildiği gibi gövdede Excel çalışma kitabı içeriğini içeren bir Outlook görevi alırsınız.

Outlook Verilerini Yedeklerden Geri Yükle

Elbette Outlook veri dosyalarınız da dahil olmak üzere bilgisayar verilerinizi düzenli aralıklarla yedeklemeniz önemle tavsiye edilir. Bu şekilde, Outlook veri kaybı konusunda endişelenmenize gerek kalmaz. Outlook dosyanız hasar görse bile, yedeklerden verileri zahmetsizce alabilirsiniz. Ancak, veri yedekleme yapmadığınızı varsayarsak, bu gibi durumlarda, PST kurtarma işlemini yetkin bir düzeltme yardımcı programı aracılığıyla denemeniz gerekir. DataNumen Outlook Repair. Bu olabilir PST'yi kurtar ter dökmeden.

Yazar Tanıtımı:

Shirley Zhang, bir veri kurtarma uzmanıdır. DataNumendahil olmak üzere veri kurtarma teknolojilerinde dünya lideri olan , Inc. onarım mdf ve görünüm onarım yazılım ürünleri. Daha fazla bilgi için ziyaret edin www.datanumen.com