eMail-Attachment "entzippen"
gerwas
kann mir jemand einen Tipp geben wie ich einen Dateianhang (gezipptes PDF.Dokument) einer email aus Outlook per VBA entpacken und ablegen kann? Bisher habe ich das Dokument immer unkomprimiert bekommen und folgendermaßen abgelegt:
Sub pdf_verarbeiten(Dokument) '(übergeben wird das Attachments-Objekt)
With Dokument
datei = Dokument.Filename
pfad = "c:\temp\"
.SaveAsFile pfad & datei
End With
End Sub
mfg gerwas