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

Cum să răspundeți în mod normal în dosarul articolelor trimise din Outlook? 

În mod normal, când faceți clic pe funcția Răspuns în folderul Elemente trimise pentru a trimite un alt mesaj suplimentar pentru persoanele pe care le-ați trimis, propria dvs. adresă de e-mail va fi afișată în câmpul Către după cum se arată în următoarea captură de ecran. Acest lucru poate fi deranjant pentru schimbarea adresei de fiecare dată. Cum ar putea face Outlook să utilizeze adresa destinatarului original, nu a ta?

doc răspunsuri trimise e-mailuri 1

Răspundeți în mod normal în folderul Elemente trimise din Outlook cu funcția Răspundeți tuturor

Răspundeți în mod normal în folderul Elemente trimise din Outlook cu cod VBA


Răspundeți în mod normal în folderul Elemente trimise din Outlook cu funcția Răspundeți tuturor

În Outlook, Răspunde la toate funcția vă poate ajuta să rezolvați această problemă, vă rugăm să procedați astfel:

Când trebuie să răspundeți la e-mailul trimis pentru a fi trimis din nou pentru a păstra adresa destinatarului original, faceți clic pe Răspunde la toate , iar adresa destinatarului original este localizată la La câmpul după cum se arată în următoarea captură de ecran:

doc răspunsuri trimise e-mailuri 2


Răspundeți în mod normal în folderul Elemente trimise din Outlook cu cod VBA

Uneori, puteți uita Răspunde la toate caracteristică atunci când răspundeți la mesajul trimis, astfel încât codul VBA de mai jos vă poate ajuta să răspundeți în mod normal în folderul Elemente trimise utilizând funcția Răspuns. Faceți pașii următori:

1. Țineți apăsat butonul ALT + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. În Microsoft Visual Basic pentru aplicații fereastră, faceți dublu clic Această sesiune Outlook de la Project1 (VbaProject.OTM) pentru a deschide modul, apoi copiați și lipiți următorul cod în modulul gol.

Cod VBA: Răspundeți în mod normal în folderul Elemente trimise din Outlook:

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 răspunsuri trimise e-mailuri 3

3. Apoi, salvați codul și reporniți Outlook pentru a obține efectul de cod, acum, când faceți clic răspuns pentru a retrimite un e-mail Obiecte trimise dosar, adresa destinatarului original este afișată în câmpul Către după cum aveți nevoie.


Kutools pentru Outlook - aduce 100 de caracteristici avansate în Outlook și face munca mult mai ușoară!

  • Auto CC / BCC prin reguli la trimiterea e-mailului; Auto înainte Mai multe e-mailuri personalizate; Răspuns automat fără server de schimb și mai multe funcții automate ...
  • Avertisment BCC - afișați mesajul când încercați să răspundeți la toate dacă adresa dvs. de e-mail se află în lista BCC; Amintiți-vă când lipsesc atașamentele, și mai multe caracteristici de reamintire ...
  • Răspundeți (Toate) Cu toate atașamentele din conversația prin e-mail; Răspunde la multe e-mailuri în secunde; Adăugare automată felicitare când răspundeți; Adăugați o dată în subiect ...
  • Instrumente de atașament: gestionați toate atașamentele din toate e-mailurile, Detașare automată, Comprimă toate, Redenumiți toate, Salvați toate ... Raport rapid, Numărați mesajele selectate...
  • E-mailuri nedorite puternice după obicei; Eliminați e-mailurile și persoanele de contact duplicate... Vă permit să faceți mai inteligent, mai rapid și mai bine în Outlook.
shot kutools outlook kutools fila 1180x121
shot kutools outlook kutools plus fila 1180x121
 
Comentarii (0)
Încă nu există evaluări. Fii primul care evaluează!
Nu există comentarii postate aici încă
Lăsa comentarii
Postare ca invitat
×
Evaluează această postare:
0   Caractere
Locații sugerate

Urmărește-ne

Copyright © 2009 - www.extendoffice.com. | Toate drepturile rezervate. Cu sprijinul ExtendOffice. | Harta site-ului
Microsoft și sigla Office sunt mărci comerciale sau mărci comerciale înregistrate ale Microsoft Corporation în Statele Unite și / sau în alte țări.
Protejat de Sectigo SSL