Signatur wird nicht aufgerufen
19.06.2015 11:57:51
Stefan
Set Mail_Object = CreateObject("Outlook.Application")
With Mail_Object.CreateItem(o)
.GetInspector
.Subject = "Bestellung einer neuen Tour mit der Nummer:" & Worksheets("Spedition").Range("I1")
.To = Sheets("Berechnung").Range("H30")
.Body = "Hiermit geben wir eine neue Tour, wie folgt in Auftrag." & Chr(13) & Chr(13) & "Für weitere Fragen stehen wir Ihnen gerne zur Verfügung."
.Attachments.Add ThisWorkbook.Path & "\" & "Angebot_Ladebordwand" & Sheets("Berechnung").Range("I1") & "_Uebersicht" & ".pdf" '
'.Send
.Display
End With
Weiß jemand, warum? Es bringt auch Nichts, wenn ich den GetInspector an eine andere Stelle setze.