Slik legger du automatisk til hilsener for å svare på meldinger med Outlook VBA

Generelt, når vi svarer på en e-post, blir vi vant til å legge til hilsener. Noen håper til og med at Outlook automatisk kan legge til hilsener avhengig av mottakernavnet. Faktisk kan det realiseres med Outlook VBA. Denne artikkelen vil introdusere det i detalj.

Som normalt, når vi svarer på en e-post, vil vi alltid skrive noen hilsener i begynnelsen av meldingsteksten. Du kan føle det litt tungvint siden du ikke vil skrive den samme hilsen hver gang. I virkeligheten kan du unngå det via Outlook "Quick Parts"-funksjonen, som lar deg lagre de samme hilsenene som Quick Part. Siden den gang kan du sette den inn direkte uten å måtte skrive manuelt.Legg til hilsener via hurtigdeler

Denne funksjonen er imidlertid ikke i stand til å identifisere mottakeren automatisk, så den kan ikke legge til en personlig hilsen, nemlig inkluderer mottakernavnet. Noen brukere ønsker også å gjøre det helt automatisk selv uten at de setter inn manuelt. Fokusert på denne typen krav, her er en rask metode for å oppnå det via Outlook VBA.

Legg automatisk til hilsener for å svare på meldinger

  1. For det første, start Outlook og bytt til "Utvikler" -fanen.
  2. Deretter må du klikke på "Visual Basic" -knappen.
  3. Deretter vil et nytt vindu vises. Så i den, bør du åpne en tom modul eller sette inn en ny modul.
  4. Neste i den nye modulen kan du kopiere og lime inn følgende VBA-koder i den.
Sub AutoAddGreetingtoReply() Dim oMail As MailItem Dim oReply As MailItem Dim GreetTime As String Velg sak Application.ActiveWindow.Class Sak olInspector Set oMail = ActiveInspector.CurrentItem Sak olExplorer Set oMail = ActiveExplorer.Selection.Item Sak(1) Slutt Velg Sak 0.3 til 0.5 GreetTime = "God morgen!" Sak 0.5 til 0.75 GreetTime = "God ettermiddag!" Case Else GreetTime = "God kveld!" End Select Set oReply = oMail.Reply With oReply .HTMLBody = " Kjære " & oMail.SenderName & ", " & GreetTime & .HTMLBody .Display End With End Sub

VBA-koder - Legg automatisk til hilsener for å svare på meldinger

  1. Etter det kan du gå ut av det gjeldende vinduet og endre makroinnstillingene. Klikk på "Makrosikkerhet"-knappen og sett deretter makronivået til lavt.
  2. Senere må du legge til det nye VBA-prosjektet på båndet eller Quick Access Toolbar. Her vil vi ta Quick Access Toolbar som et eksempel.
  • Først klikker du pil ned i verktøylinjen for hurtigtilgang og velger "Flere kommandoer".
  • I popup-vinduet legger du deretter til den nye makroen til Quick Access Toolbar ved å følge trinnene vist i bildet nedenfor.Legg til AutoAddGreetingtoReply Macro til Quick Access Toolbar
  1. Til slutt kan du prøve.
  • Først velger du en e-post og trykker på makroknappen i hurtigtilgangsverktøylinjen.Klikk på makroknappen
  • Da dukker det opp en ny svarmelding. Hilsener er automatisk lagt til meldingsteksten, som det følgende bildet.Automatiske hilsener

Hold Outlook godt beskyttet

Siden Outlook er sårbart, må vanlige brukere ha støtt på flere problemer. Hvis vi står overfor disse irriterende feilene, kan vi smart bruke det innebygde reparasjonsverktøyet, scanpst.exe, som kan håndtere de små problemene. Hvis du støter på alvorlige problemer, som Outlook-e-postskade, vil ikke innboksverktøyet være til mye hjelp. Du vil bli bedt om å ty til mer erfarne og intelligente verktøy, som f.eks DataNumen Outlook Repair.

Forfatterintroduksjon:

Shirley Zhang er en datagjenopprettingsekspert innen DataNumen, Inc., som er verdensledende innen datagjenopprettingsteknologier, inkludert reparere korrupt SQL mdf-fil og Outlook-reparasjonsprodukter. For mer informasjon besøk www.datanumen. Med

Ett svar på "Hvordan legge til hilsener automatisk for å svare på meldinger med Outlook VBA"

  1. Jeg tror denne makroen kan bli superforbedret hvis den utløses fra svarhandlingen i stedet for fra en annen knapp

Legg igjen en kommentar

Din e-postadresse vil ikke bli publisert. Obligatoriske felt er merket *