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

Jak normálně odpovídat ve složce odeslaných položek z Outlooku? 

Normálně, když kliknete na funkci Odpovědět ve složce Odeslané položky pro odeslání další zprávy pro lidi, které jste odeslali, zobrazí se vaše vlastní e-mailová adresa v poli Komu jako následující snímek obrazovky. To může být nepříjemné pro vás při každé změně adresy. Jak může aplikace Outlook použít adresu původního příjemce, ne vaši?

e-maily s odpovědí na dokumenty 1

Normálně odpovídejte ve složce Odeslané položky z Outlooku pomocí funkce Odpovědět všem

Normálně odpovídejte ve složce Odeslané položky z Outlooku pomocí kódu VBA


Normálně odpovídejte ve složce Odeslané položky z Outlooku pomocí funkce Odpovědět všem

V Outlooku Odpovědět všem funkce vám pomůže tento problém vyřešit, proveďte toto:

Pokud potřebujete odeslaný e-mail odpovědět a odeslat znovu, abyste si uchovali adresu původního příjemce, klikněte prosím Odpovědět všem tlačítko a adresa původního příjemce je umístěna na Na pole jako následující snímek obrazovky:

e-maily s odpovědí na dokumenty 2


Normálně odpovídejte ve složce Odeslané položky z Outlooku pomocí kódu VBA

Někdy můžete zapomenout na Odpovědět všem funkce při odpovídání na odeslanou zprávu, takže níže uvedený kód VBA vám pomůže normálně odpovědět ve složce Odeslané položky pomocí funkce Odpovědět. Postupujte podle následujících kroků:

1. Podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

2. V Microsoft Visual Basic pro aplikace okno, dvakrát klikněte ThisOutlookSession z Project1 (VbaProject.OTM) v podokně otevřete režim a poté zkopírujte a vložte následující kód do prázdného modulu.

Kód VBA: Normálně odpovídejte ve složce Odeslaná pošta z Outlooku:

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

e-maily s odpovědí na dokumenty 3

3. Poté uložte kód a restartujte aplikaci Outlook, aby se efekt kódu projevil hned po kliknutí odpověď znovu odeslat e-mail Odeslané položky složky, zobrazí se podle potřeby adresa původního příjemce v poli Komu.


Kutools pro Outlook - přináší do aplikace Outlook 100 pokročilých funkcí a usnadňuje práci!

  • Auto CC / BCC podle pravidel při odesílání e-mailů; Automatické předávání Více e-mailů podle zvyku; Automatická odpověď bez serveru Exchange a dalších automatických funkcí ...
  • Varování BCC - zobrazit zprávu, když se pokusíte odpovědět všem pokud je vaše e-mailová adresa v seznamu BCC; Připomenout, když chybí přílohya další připomínající funkce ...
  • Odpovědět (Vše) Se všemi přílohami v e-mailové konverzaci; Odpovězte na mnoho e-mailů během několika sekund; Automatické přidání pozdravu při odpovědi; Přidat datum do předmětu ...
  • Nástroje pro přílohy: Spravujte všechny přílohy ve všech e-mailech, Automatické odpojení, Komprimovat vše, Přejmenovat vše, Uložit vše ... Rychlá zpráva, Počítat vybrané e-maily...
  • Výkonné nevyžádané e-maily podle zvyku; Odeberte duplicitní e-maily a kontakty... Umožní vám dělat chytřejší, rychlejší a lepší v Outlooku.
záběr kutools outlook kutools tab 1180x121
shot kutools outlook kutools plus karta 1180x121
 
Komentáře (0)
Zatím žádné hodnocení. Buďte první, kdo ohodnotí!
Zatím zde nejsou žádné komentáře
Zanechat své připomínky
Odesílání jako host
×
Ohodnoťte tento příspěvek:
0   Postavy
Doporučená umístění

Sociální sítě

Copyright © 2009 - www.extendoffice.com. | Všechna práva vyhrazena. Poháněno ExtendOffice. | |. | Sitemap
Microsoft a logo Office jsou ochranné známky nebo registrované ochranné známky společnosti Microsoft Corporation ve Spojených státech a / nebo jiných zemích.
Chráněno Sectigo SSL