Skip to main content

Kutools for Office — Bir Paket. Beş Araç. Daha Fazla İş Yapın.

Outlook'ta ileti oluştururken imleç konumuna belirli metni nasıl eklerim? 

Author Xiaoyang Last modified

Diyelim ki, e-posta mesajı oluştururken sıkça kullandığınız bazı belirli metin dizileriniz var ve bu metinleri tekrar tekrar elle yazmak zorunda kalmadan posta gövdesindeki imlecin geçerli konumuna otomatik olarak eklemek istiyorsunuz. Bu makalede, bu görevi hızlı bir şekilde çözmek için kolay bir yöntemden bahsedeceğim.

VBA kodu ile ileti oluştururken imleç konumuna belirli metin veya geçerli tarihi ekleme


VBA kodu ile ileti oluştururken imleç konumuna belirli metin veya geçerli tarihi ekleme

Aşağıdaki VBA kodu, belirli bir metin dizesini veya geçerli tarihi imleç konumuna eklemenize yardımcı olabilir, lütfen şu adımları izleyin:

1. Microsoft Visual Basic for Applications penceresini açmak için ALT + F11 tuşlarına basın.

2. Ardından, Ekle > Modül'e tıklayın, aşağıdaki kodu açılan boş modüle kopyalayıp yapıştırın:

VBA Kodu: İmleç konumuna belirli metin veya geçerli tarihi ekleme

Option Explicit
Public Sub InsertInfoToSelection()
    Dim xDoc As Word.Document
    Dim xSel As Word.Selection
    On Error Resume Next
    Select Case TypeName(Application.ActiveWindow)
        Case "Explorer"
            Set xDoc = Application.ActiveExplorer.Selection(1).GetInspector.WordEditor
        Case "Inspector"
            Set xDoc = Application.ActiveInspector.WordEditor
    End Select
    Set xSel = xDoc.Application.Selection
    xSel.InsertBefore Format("ExtendOffice")
    Set xDoc = Nothing
    Set xSel = Nothing
End Sub

Not: Yukarıdaki kodda, ExtendOffice, eklemek istediğiniz belirli metindir. Eğer metin yerine geçerli tarihi eklemek istiyorsanız, bu betikteki xSel.InsertBefore Format("ExtendOffice") ifadesini xSel.InsertBefore Format(Now, "GG/AA/YYYY") olarak değiştirin.

3. Daha sonra, kod penceresini kaydedip kapatın, yeni bir e-posta oluşturun ve İleti penceresinde, Kullanıcı Tanımlı Hızlı Erişim Araç Çubuğu açılır menüsünü tıklayın ve Daha Fazla Komut seçeneğini seçin, aşağıdaki ekran görüntüsüne bakın:

doc insert text at cursor 1

4. Outlook Seçenekleri iletişim kutusunda, lütfen aşağıdaki işlemleri yapın:

(1.) Aşağı Çek menüsünden Makrolar'ı seçin;

(2.) Eklediğiniz makro adını tıklayın;

(3.) Ardından, bu makroyu Kullanıcı Tanımlı Hızlı Erişim Araç Çubuğu listesi kutusuna eklemek için Ekle düğmesine tıklayın.

doc insert text at cursor 2

5. Ardından, iletişim kutusunu kapatmak için Tamam düğmesine tıklayın, şimdi, makro simgesi Kullanıcı Tanımlı Hızlı Erişim Araç Çubuğu'na eklenmiştir. Metni eklemek istediğiniz yere imleci yerleştirin ve ardından bu makro düğmesine tıklayın, belirli metin hemen eklenecektir, aşağıdaki ekran görüntüsüne bakın:

doc insert text at cursor 3

İleti oluştururken herhangi bir konuma belirli metin ekleme:

Kutools for Outlook'un Otomatik Metin özelliği ile bir otomatik metin oluşturabilir ve ileti oluştururken ihtiyacınız olduğu gibi herhangi bir yere ekleyebilirsiniz.

doc insert text at cursor 4
 👉 Kutools for Outlook artık ücretsiz bir sürümü var, 70+ özelliği ömür boyu ücretsiz. Ücretsiz Sürümü Şimdi İndirin.

En İyi Ofis Verimlilik Araçları

Son Dakika: Kutools for Outlook Ücretsiz Sürümünü Sunmaya Başladı!

Yepyeni Kutools for Outlook ile100'den fazla etkileyici özelliği deneyimleyin! Şimdi indir!

🤖 Kutools AI : Gelişmiş yapay zeka teknolojisi sayesinde e-postalarınızı kolayca yönetir; yanıtlama, özetleme, optimize etme, uzatma, çeviri ve e-posta oluşturma işlemlerini zahmetsizce gerçekleştirir.

📧 E-posta Otomasyonu: Otomatik Yanıt (POP ve IMAP için kullanılabilir) / E-posta Gönderimini Zamanla / E-posta Gönderirken Kurala Göre Otomatik CC/BCC / Gelişmiş Kurallar ile Otomatik Yönlendirme / Selamlama Ekle / Çoklu Alıcılı E-postaları Otomatik Olarak Bireysel Mesajlara Böl...

📨 E-posta Yönetimi: E-postayı Geri Çağır / Konu veya diğer kriterlere göre dolandırıcılık amaçlı e-postaları engelle / Yinelenen e-postaları sil / Gelişmiş Arama / Klasörleri Düzenle...

📁 Ekler Pro: Toplu Kaydet / Toplu Ayır / Toplu Sıkıştır / Otomatik Kaydet / Otomatik Ayır / Otomatik Sıkıştır...

🌟 Arayüz Büyüsü: 😊 Daha Fazla Şık ve Eğlenceli Emoji / Önemli e-postalar geldiğinde uyarı / Outlook'u kapatmak yerine küçült...

👍 Tek Tıkla Harikalar: Tümüne Eklerle Yanıtla / Kimlik Avı E-postalarına Karşı Koruma / 🕘 Gönderenin Saat Dilimini Göster...

👩🏼‍🤝‍👩🏻 Kişiler & Takvim: Seçilen E-postalardan Toplu Kişi Ekle / Bir Kişi Grubunu Bireysel Gruplara Böl / Doğum günü hatırlatıcısını kaldır...

Kutools'u tercih ettiğiniz dilde kullanın – İngilizce, İspanyolca, Almanca, Fransızca, Çince ve40'tan fazla başka dili destekler!

Tek tıkla Kutools for Outlook'u anında etkinleştirin. Beklemeyin, hemen indirin ve verimliliğinizi artırın!

kutools for outlook features1 kutools for outlook features2

🚀 Tek Tıkla İndir — Tüm Ofis Eklentilerini Edinin

Şiddetle Tavsiye Edilen: Kutools for Office (5'i1 arada)

Tek tıkla beş kurulum paketini birden indirin — Kutools for Excel, Outlook, Word, PowerPoint ve Office Tab Pro. Şimdi indir!

  • Tek tık kolaylığı: Beş kurulum paketinin hepsini tek seferde indirin.
  • 🚀 Her türlü Ofis görevi için hazır: İhtiyacınız olan eklentileri istediğiniz zaman yükleyin.
  • 🧰 Dahil olanlar: Kutools for Excel / Kutools for Outlook / Kutools for Word / Office Tab Pro / Kutools for PowerPoint