Bagaimana cara memasukkan teks tertentu pada kursor saat menulis pesan dalam pandangan? 

Misalkan, Anda memiliki beberapa string teks tertentu yang sering digunakan saat membuat pesan email, jadi, Anda ingin memasukkan teks pada posisi kursor saat ini di badan email secara otomatis tanpa mengetiknya secara manual berulang kali. Artikel ini, saya akan berbicara tentang metode mudah untuk menyelesaikan tugas ini dengan cepat.

Masukkan teks tertentu atau tanggal saat ini di kursor saat menulis pesan dengan kode VBA

Masukkan teks tertentu atau tanggal saat ini di kursor saat menulis pesan dengan kode VBA

Kode VBA berikut dapat membantu Anda memasukkan string teks tertentu atau tanggal saat ini di posisi kursor, lakukan seperti ini:

1. Tahan ALT + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Dan kemudian, klik Menyisipkan > Modul, salin dan tempel kode di bawah ini ke dalam modul kosong yang dibuka:

Kode VBA: Masukkan teks tertentu atau tanggal sekarang di kursor

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

Note: Pada kode di atas, ExtendOffice adalah teks spesifik yang ingin Anda sisipkan, jika Anda perlu memasukkan tanggal sekarang alih-alih string teks, harap ubah teks dalam skrip ini xSel.InsertBefore Format ("ExtendOffice") untuk xSel.InsertBefore Format (Sekarang, "DD / MM / YYYY").

3. Kemudian, simpan dan tutup jendela kode, buat email baru, dan di jendela Pesan, klik Sesuaikan Bilah Alat Akses Cepat drop down, dan pilih Lebih Banyak Perintah, lihat tangkapan layar:

4. di Pilihan Outlook kotak dialog, lakukan operasi berikut:

(1.) Pilih Macro dari Pilih perintah dari turun;

(2.) Klik nama makro yang telah Anda sisipkan;

(3.) Kemudian, klik Add tombol untuk menambahkan makro ini ke Sesuaikan Bilah Alat Akses Cepat kotak daftar.

5. Dan kemudian, klik OK tombol untuk menutup kotak dialog, sekarang, ikon makro telah dimasukkan ke dalam Sesuaikan Bilah Alat Akses Cepat. Letakkan kursor di tempat Anda ingin memasukkan teks, lalu klik tombol makro ini, teks tertentu akan dimasukkan sekaligus, lihat tangkapan layar:

---

Alat Produktivitas Kantor Terbaik

Kutools untuk Outlook - Lebih dari 100 Fitur Canggih untuk Meningkatkan Outlook Anda

🤖 Asisten Surat AI: Email profesional instan dengan keajaiban AI--satu klik untuk mendapatkan balasan jenius, nada sempurna, penguasaan multibahasa. Ubah email dengan mudah! ...

📧 Email Otomatis: Di Luar Kantor (Tersedia untuk POP dan IMAP)  /  Jadwal Kirim Email  /  Auto CC/BCC Sesuai Aturan Saat Mengirim Email  /  Penerusan Otomatis (Aturan Lanjutan)   /  Tambah Salam Otomatis   /  Secara Otomatis Membagi Email Multi-Penerima menjadi Pesan Individual ...

📨 email Management: Mengingat Email dengan Mudah  /  Blokir Email Penipuan berdasarkan Subjek dan Lainnya  /  Hapus Email Duplikat  /  Pencarian  /  Konsolidasi Folder ...

📁 Lampiran Pro: Penyimpanan Batch  /  Pelepasan Batch  /  Kompres Batch  /  Penyimpanan otomatis   /  Lepaskan Otomatis  /  Kompres Otomatis ...

🌟 Antarmuka Ajaib: 😊Lebih Banyak Emoji Cantik dan Keren   /  Tingkatkan Produktivitas Outlook Anda dengan Tampilan Tab  /  Minimalkan Outlook Daripada Menutup ...

👍 Keajaiban sekali klik: Balas Semua dengan Lampiran Masuk  /   Email Anti-Phishing  /  🕘Tampilkan Zona Waktu Pengirim ...

👩🏼‍🤝‍👩🏻 Kontak & Kalender: Batch Tambahkan Kontak Dari Email yang Dipilih  /  Bagi Grup Kontak menjadi Grup Individual  /  Hapus Pengingat Ulang Tahun ...

Lebih 100 Fitur Tunggu Eksplorasi Anda! Klik Di Sini untuk Menemukan Lebih Banyak.

Baca Selengkapnya       Free download      Pembelian