Note: The other languages of the website are Google-translated. Back to English

Hogyan válaszoljak normálisan az Outlook küldött elemek mappájába? 

Normál esetben, amikor az Elküldött elemek mappában található Válasz funkció elemre kattint, és újabb üzenetet küld az Ön számára elküldött személyek számára, a saját e-mail címe megjelenik a Címzett mezőben, a következő képernyőkép szerint. Ez bosszantó lehet, ha minden alkalommal megváltoztatja a címet. Hogyan tudná az Outlook használni az eredeti címzett címét, nem pedig a sajátját?

doc válasz küldött e-maileket 1

Válaszoljon az Elküldött elemek mappába az Outlook Válasz az összes funkcióval

Válaszoljon normálisan az Elküldött elemek mappába az Outlookból, VBA kóddal


Válaszoljon az Elküldött elemek mappába az Outlook Válasz az összes funkcióval

Az Outlookban a Válasz mindenkinek funkció segítségével megoldhatja ezt a problémát, kérjük, tegye a következőket:

Ha meg kell válaszolnia az elküldött e-mailt az elküldésre, hogy megőrizze az eredeti címzett címét, kattintson a gombra Válasz mindenkinek gombra, és az eredeti címzett címe a Nak nek mező a következő képernyőképen látható:

doc válasz küldött e-maileket 2


Válaszoljon normálisan az Elküldött elemek mappába az Outlookból, VBA kóddal

Valamikor elfelejtheti a Válasz mindenkinek funkció az elküldött üzenet megválaszolásakor, így az alábbi VBA-kód segíthet a Normál válaszadásban az Elküldött elemek mappában a Válasz funkció használatával. Tegye a következő lépésekkel:

1. Tartsa lenyomva a ALT + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.

2. Az Microsoft Visual Basic for Applications ablakban kattintson duplán ThisOutlookSession tól Project1 (VbaProject.OTM) ablaktáblán nyissa meg a módot, majd másolja és illessze be a következő kódot az üres modulba.

VBA-kód: Válaszoljon normálisan az Elküldött elemek mappába az Outlookból:

Option Explicit
Private WithEvents GExplorer As Explorer
Private WithEvents GMailItem As MailItem
Private Sub Application_Startup()
    Set GExplorer = Application.ActiveExplorer
End Sub
Private Sub GExplorer_SelectionChange()
   On Error Resume Next
   Set GMailItem = GExplorer.Selection.Item(1)
End Sub
Private Sub GMailItem_Reply(ByVal Response As Object, Cancel As Boolean)
Dim xResponse As MailItem
Dim xRecipients As Outlook.Recipients
Dim xRecipient As Outlook.Recipient
Dim i As Integer
Dim xTo As String, xCC As String, xBCC As String, xName As String
On Error Resume Next
If Application.ActiveExplorer.CurrentFolder <> Session.GetDefaultFolder(olFolderSentMail) Then
    Exit Sub
End If
Cancel = True
Set xResponse = GMailItem.Reply
Set xRecipients = GMailItem.Recipients
For i = xRecipients.Count To 1 Step -1
    Set xRecipient = xRecipients.Item(i)
    xName = xRecipient.Name
    If Left(xName, 1) = "'" Then
        xName = Mid(xName, 2, Len(xRecipient.Name) - 2)
    End If
    Select Case xRecipient.Type
        Case olTo
            xTo = xName & ";" & xTo
        Case olCC
            xCC = xName & ";" & xCC
        Case olBCC
            xBCC = xName & ";" & xBCC
    End Select
Next
With xResponse
    .To = xTo
    .CC = xCC
    .BCC = xBCC
End With
xResponse.Recipients.ResolveAll
xResponse.Display
End Sub

doc válasz küldött e-maileket 3

3. Ezután mentse el a kódot, és indítsa újra az Outlook programot a kódhatás eléréséhez, amikor rákattint Válasz e-mail újraküldéséhez Elküldött elemek mappában az eredeti címzett címe a Címzett mezőben jelenik meg, amire szüksége van.


Kutools for Outlook - 100 speciális funkciót hoz az Outlookba, és sokkal könnyebbé teszi a munkát!

  • Auto CC / BCC szabályok szerint e-mail küldéskor; Automatikus továbbítás Több e-mail egyedi; Autómatikus válasz csere szerver és további automatikus funkciók nélkül ...
  • BCC figyelmeztetés - üzenet megjelenítése, amikor megpróbál válaszolni az összesre ha az e-mail címed szerepel a BCC listában; Emlékeztessen a hiányzó mellékletekre, és további funkciók emlékeztetnek ...
  • Válasz (minden) az összes melléklettel az e-mail beszélgetésben; Válasz sok e-mailre másodpercek alatt; Automatikus üdvözlet hozzáadása amikor válasz; Dátum hozzáadása a tárgyhoz ...
  • Mellékleteszközök: Az összes levél összes mellékletének kezelése, Automatikus leválasztás, Tömörítsen mindent, Átnevezés, Összes mentése ... Gyorsjelentés, Számolja ki a kiválasztott leveleket...
  • Erőteljes levélszemét szokás szerint; Távolítsa el az ismétlődő leveleket és névjegyeket... Lehetővé teszi, hogy okosabban, gyorsabban és jobban végezze el az Outlook programot.
lövés kutools outlook kutools fül 1180x121
shot kutools outlook kutools plus tab 1180x121
 
A megjegyzések rendezése szerint
Hozzászólások (0)
Még nincs értékelés. Legyen Ön az első, aki értékel!
Még senki sem írt megjegyzést
Hagyja meg észrevételeit
Feladás vendégként
×
Értékeld ezt a bejegyzést:
0   Karakterek
Javasolt helyek

Kövess minket

Copyright © 2009 - www.extendoffice.com. | Minden jog fenntartva. Powered by ExtendOffice. | Oldaltérkép
A Microsoft és az Office logó a Microsoft Corporation védjegyei vagy bejegyzett védjegyei az Egyesült Államokban és / vagy más országokban.
Sectigo SSL védi