Ugrás a tartalomra

Hogyan lehet automatikusan hozzáadni a személyre szabott üdvözletet az Outlook válaszakor?

Normális esetben, amikor egy e-mailre válaszolunk az Outlook programban, manuálisan kell hozzáadnunk az üdvözletet. Valójában az eredeti üzenet tartalmazza a címzett adatait, például a feladó nevét. Ebben a cikkben két módszert mutatok be a személyre szabott üdvözlet automatikus hozzáadásához, amikor az Outlook-ban válaszol.

Automatikusan hozzáadhat személyre szabott üdvözletet, amikor VBA-val válaszol

Személyre szabott üdvözlés automatikus hozzáadása, amikor a Kutools for Outlook segítségével válaszol


nyíl kék jobb buborék Automatikusan hozzáadhat személyre szabott üdvözletet, amikor VBA-val válaszol

A következő VBA-kód automatikusan hozzáadhat személyre szabott üdvözletet, amikor válaszol az üzenetekre az Outlookban. A következőket teheti:

1. Válassza ki azt az e-mail üzenetet, amelyre válaszolni fog.

2. megnyomni a más + F11 gombokkal nyissa meg a Microsoft Visual Basic for Applications ablakot.

3. Kattintson a betétlap > Modulok, és illessze be a következő VBA kódot az új modul ablakba.

VBA: Válaszoljon személyre szabott üdvözléssel

Sub ReplyWithGreeting()
Dim oMItem As Outlook.MailItem
Dim oMItemReply As Outlook.MailItem
Dim sGreetName As String
Dim iGreetType As Long
On Error Resume Next
Select Case TypeName(Application.ActiveWindow)
Case "Explorer"
Set oMItem = ActiveExplorer.Selection.Item(1)
Case "Inspector"
Set oMItem = ActiveInspector.CurrentItem
Case Else
End Select
On Error GoTo 0
If oMItem Is Nothing Then GoTo ExitProc
On Error Resume Next
iGreetType = InputBox("How to greet:" & vbCr & vbCr & "Type '1' for name, '2' for time of day")
On Error GoTo 0
If iGreetType = False Then GoTo ExitProc
If iGreetType = 1 Then
sGreetName = oMItem.SenderName
ElseIf iGreetType = 2 Then
Select Case Time
Case Is < 0.5
sGreetName = "Good morning"
Case 0.5 To 0.75
sGreetName = "Good afternoon"
Case Else
sGreetName = "Good evening"
End Select
Else
GoTo ExitProc
End If
Set oMItemReply = oMItem.Reply
With oMItemReply
.HTMLBody = "<span style=""font-size : 10pt""><p>Hi " & sGreetName & ",</p></span>" & .HTMLBody
.Display
End With
ExitProc:
Set oMItem = Nothing
Set oMItemReply = Nothing
End Sub

4. megnyomni a F5 Kattintson vagy kattintson futás gombra a VBA futtatásához. Megjelenik egy párbeszédpanel, ahogy az alábbi képernyőkép látható. Írja be az 1. vagy a 2. szót az igényei alapján, majd kattintson a gombra OK gombot.

1. típus a címzett nevével való üdvözléshez: 2. típus üdvözléshez a napszakkal:

Megjegyzések: Az Outlook 2013-ban ez a VBA-kód nem működik, ha az Olvasópanelen válaszol az üzenetekre. Kattintson a gombra itt megtudhatja, hogyan tilthatja le a válaszolást az Outlook 2013 olvasópaneljében.


nyíl kék jobb buborék Személyre szabott üdvözlés automatikus hozzáadása, amikor a Kutools for Outlook segítségével válaszol

Előfordulhat, hogy egyes felhasználók nem szeretnek VBA-kódot alkalmazni az Outlookban. Ezért bemutatom a második módszert: Kutools for Outlook's Auto Greeting segédprogram személyre szabott üdvözletet ad hozzá minden válaszoló üzenethez.

Kutools az Outlook számára tucatnyi hasznos funkció hozzáadásával egyszerűsíti a napi e-mail kommunikációt az Outlook segítségével. KATT ide      Ingyenes letöltése most

1. Kattintson a Kutools > Opciók.

2. A Beállítások párbeszédpanelen lépjen a Válasz lapon ellenőrizze a Üdvözlet hozzáadása válaszkor opcióba írja be a Hi <kifejezést > az alábbi mezőbe, és kattintson a gombra OK gombot.

Mostantól, amikor az Outlook programban válaszol az üzenetekre, a személyre szabott üdvözlet automatikusan bekerül az e-mail törzsébe, a következő képernyőképen:

Megjegyzések: Az Outlook 2013 alkalmazásban ez a segédprogram nem működik, ha az Olvasópanelen válaszol az üzenetekre. Kattintson a gombra itt megtudhatja, hogyan tilthatja le a válaszolást az Outlook 2013 olvasópaneljében.

Ingyenesen letölthető a Kutools for Outlook


Bemutató: személyre szabott üdvözlet automatikus hozzáadása az Outlook válaszakor

típus: Ebben a videóban, Kutools lapot hozzáadta Kutools az Outlook számára. Ha szüksége van rá, kattintson itt 60 napos ingyenes próbaidőszak korlátozás nélkül!

A legjobb irodai hatékonyságnövelő eszközök

Népszerű szolgáltatások: Ismétlődések keresése, kiemelése vagy azonosítása   |  Üres sorok törlése   |  Oszlopok vagy cellák kombinálása adatvesztés nélkül   |   Kerek Formula nélkül ...
Szuper keresés: Több kritérium VLookup    Többértékű VLookup  |   VLookup több munkalapon   |   Fuzzy Lookup ....
Speciális legördülő lista: Gyors legördülő lista létrehozása   |  Függő legördülő lista   |  Többszörösen válassza ki a legördülő listát ....
Oszlopkezelő: Adjon meg egy adott számú oszlopot  |  Oszlopok mozgatása  |  Kapcsolja be a Rejtett oszlopok láthatósági állapotát  |  Tartományok és oszlopok összehasonlítása ...
Kiemelt funkciók: Rács fókusz   |  Design nézet   |   Nagy Formula bár    Munkafüzet és lapkezelő   |  Erőforrás-könyvtár (Auto szöveg)   |  Dátumválasztó   |  Kombinálja a munkalapokat   |  Cellák titkosítása/dekódolása    E-mailek küldése listánként   |  Szuper szűrő   |   Speciális szűrő (félkövér/dőlt/áthúzott szűrés...) ...
A 15 legjobb eszközkészlet12 szöveg Eszközök (Szöveg hozzáadása, Karakterek eltávolítása,...)   |   50 + Táblázatos Típusai (Gantt-diagram,...)   |   40+ Praktikus képletek (Számolja ki az életkort a születésnap alapján,...)   |   19 beszúrás Eszközök (Helyezze be a QR-kódot, Kép beszúrása az útvonalból,...)   |   12 Átalakítás Eszközök (Számok szavakig, Valuta átváltás,...)   |   7 Egyesítés és felosztás Eszközök (Haladó kombinált sorok, Hasított sejtek,...)   |   ... és több

Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz.  Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...

kte lap 201905


Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi, Pl can you help to edit the above to have only first name of the recipient and the greetings shall be 'Hi' only? Example:if senders e-mail is , my reply should have - Hi John
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations