Outlook'ta bir şablona hızlı başlatma düğmesi nasıl atanır?

Outlook'ta şablonu kullanırken, Form Seç penceresine girmeniz, şablon kaydetme konumunu bulmanız ve ardından açmayı seçmeniz gerekir. Bu çoğumuz için biraz zahmetli olabilir. Burada size Outlook'ta belirli bir şablonu açmak için hızlı başlatma düğmesi atamanın bir yöntemini göstereceğim. Düğmeyi atadıktan sonra, şablon yalnızca tek bir tıklama ile hızlı bir şekilde açılacaktır.

VBA kodu içeren bir şablona hızlı başlatma düğmesi atayın

Office Sekmesi - Microsoft Office'te Sekmeli Düzenlemeyi ve Göz Atmayı Etkinleştirerek Çalışmayı Kolaylaştırın

Devamı ...Indirin ...

Kutools for Outlook - Üstün Verimlilik için Outlook'u 100'den Fazla Gelişmiş Özellikle Güçlendirin

E-posta göndermeyi otomatikleştirin Otomatik CC / BCC, Otomatik İleri kurallara göre; Göndermek Otomatik cevap (Ofis Dışında) değişim sunucusu gerektirmeden...
Şunun gibi hatırlatıcılar alın: BCC Uyarısı BCC listesindeyken herkese yanıt verirken ve Eksik Olduğunda Hatırlat Unutulan eklentiler için...
E-posta verimliliğini artırın Yanıtla (Tümü) Eklerle birlikte, İmzaya veya Konuya Otomatik Selamlama veya Tarih ve Saat Ekleme, Birden Fazla E-postayı Yanıtlayın...
E-posta göndermeyi kolaylaştırın E-postaları Geri Çağırma, Ek Araçları (Tümünü Sıkıştır, Tümünü Otomatik Kaydet...), Yinelemeleri Kaldır, ve Hızlı rapor...

Bu gelişmiş özelliklerle Outlook 2021 - 2010 veya Outlook 365'inizi güçlendirin. Kapsamlı 60 günlük ücretsiz deneme sürümünün keyfini çıkarın ve e-posta deneyiminizi geliştirin!

Devamı ...Indirin ...

VBA kodu içeren bir şablona hızlı başlatma düğmesi atayın

Outlook'ta bir şablona hızlı başlatma düğmesi atamak için lütfen aşağıdaki işlemleri yapın.

1. Tuşuna basın. Ara Toplam + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.

2. içinde Uygulamalar için Microsoft Visual Basic Pencere, tıklayın Ekle > modül. Ardından, VBA kodunu Kod penceresine kopyalayın.

VBA kodu: Şablonu açmak için makro

Sub MakeTemplate()
'Update by Extendoffice 2018/5/24
Dim xDialog As FileDialog
Dim xExcel As Excel.Application
Dim xFilePath As String
Dim xNewItem As Object
On Error Resume Next
xFilePath = CreateObject("WScript.Shell").SpecialFolders(5)
xFilePath = xFilePath & "\Microsoft\Templates\template test.oft"
Set xNewItem = Outlook.Application.CreateItemFromTemplate(xFilePath)
xNewItem.Display True
Set xNewItem = Nothing
End Sub

not: Kodda, "\ Microsoft \ Templates \ şablon test.oft"varsayılan şablon kaydetme yoludur ve şablon testi, açacağınız şablonun adıdır. Lütfen bunları gerektiği gibi değiştirin.

3. tık Tools > Referanslar. Sonra etkinleştirin Microsoft Excel Nesne Kitaplığı aşağıdaki ekran görüntüsü gibi kutu.