Kako vstaviti določeno besedilo na kazalec pri sestavljanju sporočila v Outlooku? 

Recimo, da imate nekaj posebnih besedilnih nizov, ki se pogosto uporabljajo pri sestavljanju e-poštnega sporočila, zato bi radi besedilo samodejno vstavili na trenutni položaj kazalca v telesu pošte, ne da bi jih vedno znova vnašali. V tem članku bom govoril o enostavni metodi za hitro reševanje te naloge.

Pri sestavljanju sporočila s kodo VBA pri kazalcu vstavite določeno besedilo ali trenutni datum

Pri sestavljanju sporočila s kodo VBA pri kazalcu vstavite določeno besedilo ali trenutni datum

Naslednja koda VBA vam lahko pomaga pri vstavitvi določenega besedilnega niza ali trenutnega datuma na mesto kazalca. Naredite naslednje:

1. Držite tipko ALT + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. In nato kliknite Vstavi > Moduli, kopirajte in prilepite spodnjo kodo v odprti prazen modul:

Koda VBA: Vstavite določeno besedilo ali trenutni datum na kazalec

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

Opombe: V zgornji kodi, ExtendOffice je določeno besedilo, ki ga želite vstaviti. Če želite namesto besedilnega niza vstaviti trenutni datum, spremenite besedilo v tem skriptu xSel.InsertBefore Format ("ExtendOffice") do xSel.InsertBefore Format (Zdaj, "DD / MM / LLLL").

3. Nato shranite in zaprite okno s kodo, ustvarite novo e-poštno sporočilo in v oknu za sporočila kliknite Prilagodite orodno vrstico za hitri dostop spustite in izberite Več ukaz, glej posnetek zaslona:

4. v Outlook Možnosti pogovorno okno, naredite naslednje:

(1.) Izberite Makri Iz Izberite ukaz med spustite;

(2.) Kliknite ime makra, ki ste ga vstavili;

(3.) Nato kliknite Dodaj , če želite dodati ta makro v Prilagodite orodno vrstico za hitri dostop seznamsko polje.

5. In nato kliknite OK , da zaprete pogovorno okno, je ikona makra vstavljena v Prilagodite orodno vrstico za hitri dostop. Postavite kazalec tja, kamor želite vstaviti besedilo, in nato kliknite ta gumb makra, določeno besedilo bo vstavljeno hkrati, glejte posnetek zaslona:

---

Najboljša pisarniška orodja za produktivnost

Kutools za Outlook - Več kot 100 zmogljivih funkcij za nadgradnjo vašega Outlooka

🤖 AI poštni pomočnik: Takojšnja profesionalna e-poštna sporočila z umetno inteligenco – z enim klikom do genialnih odgovorov, popoln ton, večjezično znanje. Preoblikujte pošiljanje e-pošte brez napora! ...

📧 Avtomatizacija e-pošte: Odsoten (na voljo za POP in IMAP)  /  Načrtujte pošiljanje e-pošte  /  Samodejna CC/BCC po pravilih pri pošiljanju e-pošte  /  Samodejno naprej (napredna pravila)   /  Samodejno dodaj pozdrav   /  E-poštna sporočila več prejemnikov samodejno razdeli na posamezna sporočila ...

📨 Email upravljanje: Enostaven priklic e-pošte  /  Blokiraj prevarantska e-poštna sporočila glede na teme in druge  /  Izbriši podvojena e-poštna sporočila  /  napredno iskanje  /  Združite mape ...

📁 Priloge Pro: Shrani paket  /  Batch Detach  /  Paketno stiskanje  /  Samodejno shranite   /  Samodejno loči  /  Samodejno stiskanje ...

🌟 Vmesnik Magic: 😊Več lepih in kul emojijev   /  Povečajte Outlookovo produktivnost s pogledi z zavihki  /  Minimizirajte Outlook, namesto da bi ga zaprli ...

???? Čudeži z enim klikom: Odgovori vsem z dohodnimi prilogami  /   E-poštna sporočila proti lažnemu predstavljanju  /  🕘Pokaži pošiljateljev časovni pas ...

👩🏼‍🤝‍👩🏻 Stiki in koledar: Paketno dodajanje stikov iz izbranih e-poštnih sporočil  /  Razdelite skupino stikov na posamezne skupine  /  Odstranite opomnike za rojstni dan ...

Over 100 Lastnosti Čakajte na svoje raziskovanje! Kliknite tukaj, če želite odkriti več.

Preberi več       Brezplačen prenos      Nakup