Når du videresender eller videresender en e-mail, vil du muligvis ikke gemme en kopi i mappen Sendte poster. Denne artikel vil lære dig, hvordan du konfigurerer Outlook til at bede om at gemme en kopi eller ej med Outlook VBA.
I virkeligheden foretrækker du at gemme kopierne af de fleste almindelige e-mails i mappen Sendte elementer. Ikke desto mindre, i nogle situationer, f.eks. når du sender en e-mail igen, videresender den eller når e-mailen indeholder en meget stor vedhæftet fil, kan du synes, det er unødvendigt at gemme en kopi. Under disse omstændigheder må du håbe, at Outlook kan give dig besked og lade dig træffe valg.
Løsning: Brug indstillingen "Gem ikke"
Faktisk har Outlook ikke denne funktion. Men du kan bruge en løsning. Det er indstillingen "Gem ikke" i meddelelsesvinduet. Du kan få adgang til det ved at skifte til fanen "Valgmuligheder" og derefter klikke på knappen "Gem sendt element til" som på følgende skærmbillede:

For lettere adgang til denne mulighed kan du tilføje den til værktøjslinjen Hurtig adgang. Højreklik på den, og vælg "Føj til værktøjslinjen Hurtig adgang" i pop op-menuen.
Hvis du fra nu af ikke vil gemme en kopi, kan du blot markere afkrydsningsfeltet ud for "Gem ikke" i værktøjslinjen Hurtig adgang. Selvom denne metode er praktisk, klager de fleste brugere stadig over, at de ofte glemmer at markere afkrydsningsfeltet. Derfor længes de stadig efter en popup-meddelelse i Outlook, der spørger, om du vil gemme en kopi. For at opnå dette skal du bruge Outlook VBA. Læs videre for at få de detaljerede koder og trin.
VBA: Spørg om du vil gemme en kopi eller ej, når du sender e-mails
- For det første skal du starte Outlook og skifte til fanen "Udvikler".
- Klik derefter på “Visual Basic” -knappen, som viser et nyt vindue.
- Dobbeltklik på "ThisOutlookSession" i vinduet "Visual Basic" for at åbne projektvinduet "ThisOutlookSession".
- Næste kopi og indsæt følgende koder i den.
Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim strMsg As String
Dim nRes As Integer
strMsg = "Do you want to save a copy of this message?"
nRes = MsgBox(strMsg, vbYesNo + vbQuestion, "Confirm Saving Copy")
If nRes = vbNo Then
Item.DeleteAfterSubmit = True
End If
End Sub
- Derefter skal du underskrive denne kode som normalt og ændre makroindstillingerne for kun at aktivere digitalt signerede makroer.
- Til sidst kan du prøve. Når du klikker på “Send” -knappen, modtager du en Outlook-alarm, som det følgende billede. Hvis du vælger “Nej” -knappen, gemmes den aktuelle meddelelse ikke i mappen Sendte poster. Mens du trykker på “Ja” -knappen, gemmes denne meddelelse.
Håndter hyppige Outlook-problemer
Ligesom andre applikationer kan Outlook lide forskellige problemer, såsom pludselig nedbrud, ikke reagerer, lejlighedsvise fejlmeddelelser og så videre. Derfor, hvis du er en almindelig bruger af Outlook, bør du hellere skaffe en Outlook fil reparationsværktøjSom DataNumen Outlook Repair ved at det vil være nyttigt, når du finder ud af, at din Outlook-fil er beskadiget af ukendte årsager.
Forfatter Introduktion:
Shirley Zhang er ekspert i datagendannelse i DataNumen, Inc., som er verdens førende inden for datagendannelsesteknologier, herunder reparere SQL Server mdf database korruption og Outlook-reparationssoftwareprodukter. For mere information besøg www.datanumen.com


