Hvordan indsættes specifik tekst ved markøren, når man skriver en besked i Outlook? 

Hvis du antager, at du har nogle specifikke tekststrenge, der bruges ofte, når du komponerer e-mail-beskeden, så du vil gerne indsætte teksten ved den aktuelle position af markøren i postteksten automatisk uden manuelt at skrive dem igen og igen. Denne artikel vil jeg tale om en nem metode til hurtig løsning af denne opgave.

Indsæt specifik tekst eller aktuel dato ved markøren, når du skriver en besked med VBA-kode

Indsæt specifik tekst eller aktuel dato ved markøren, når du skriver en besked med VBA-kode

Følgende VBA-kode kan hjælpe dig med at indsætte en bestemt tekststreng eller aktuel dato på markørpositionen, gør venligst som denne:

1. Hold nede ALT + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.

2. Klik derefter på indsatte > Moduler, kopier og indsæt nedenstående kode i det åbne blanke modul:

VBA-kode: Indsæt specifik tekst eller aktuel dato ved markøren

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

Bemærk: I ovenstående kode, ExtendOffice er den specifikke tekst, du vil indsætte. Hvis du har brug for at indsætte den aktuelle dato i stedet for tekststrengen, skal du ændre teksten i dette script xSel.InsertBefore Format ("ExtendOffice") til xSel.InsertBefore Format (Nu, "DD / MM / ÅÅÅÅ").

3. Gem derefter og luk kodevinduet, opret en ny e-mail, og klik i vinduet Besked Tilpas værktøjslinjen Hurtig adgang drop down, og vælg Mere kommando, se skærmbillede:

4. I Outlook Options dialogboksen, skal du udføre følgende handlinger:

(1.) Vælg Makroer fra Vælg kommando fra falde ned;

(2.) Klik på det makronavn, du har indsat;

(3.) Klik derefter på Tilføj knappen for at tilføje denne makro til Tilpas værktøjslinjen Hurtig adgang listefelt.

5. Klik derefter på OK for at lukke dialogboksen. Makroikonet er nu indsat i Tilpas værktøjslinjen Hurtig adgang. Sæt markøren, hvor du vil indsætte teksten, og klik derefter på denne makroknap, den specifikke tekst indsættes med det samme, se skærmbillede:

---

Bedste kontorproduktivitetsværktøjer

Kutools til Outlook - Over 100 kraftfulde funktioner til at superlade din Outlook

🤖 AI Mail Assistant: Øjeblikkelige pro-e-mails med AI-magi – et klik for geniale svar, perfekt tone, flersproget beherskelse. Forvandl e-mailing ubesværet! ...

📧 Email Automation: Ikke til stede (tilgængelig til POP og IMAP)  /  Planlæg Send e-mails  /  Auto CC/BCC efter regler ved afsendelse af e-mail  /  Automatisk videresendelse (avancerede regler)   /  Tilføj automatisk hilsen   /  Opdel automatisk e-mails med flere modtagere i individuelle meddelelser ...

📨 Email Management: Genkald nemt e-mails  /  Bloker svindel-e-mails af emner og andre  /  Slet duplikerede e-mails  /  Avanceret søgning  /  Konsolider mapper ...

📁 Vedhæftede filer Pro: Batch Gem  /  Batch adskilles  /  Batch komprimere  /  Automatisk gem   /  Automatisk afmontering  /  Automatisk komprimering ...

🌟 Interface Magic: 😊 Flere smukke og seje emojis   /  Boost din Outlook-produktivitet med fanebaserede visninger  /  Minimer Outlook i stedet for at lukke ...

👍 Wonders med et enkelt klik: Besvar alle med indgående vedhæftede filer  /   Anti-phishing e-mails  /  🕘Vis afsenderens tidszone ...

👩🏼‍🤝‍👩🏻 Kontakter og kalender: Batch Tilføj kontakter fra udvalgte e-mails  /  Opdel en kontaktgruppe til individuelle grupper  /  Fjern fødselsdagspåmindelser ...

Over 100 Features Afvent din udforskning! Klik her for at finde mere.

Læs mere       Gratis download      Køb