Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
452to456
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
452to456
452to456
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Code für mail bringt Fehler.....

Code für mail bringt Fehler.....
15.07.2004 08:24:15
Peter
Hallo und Guten Morgen an alle,
hat jemand trotz der frühen Stunde die Muße mir zu helfen?.....mit nachstehendem Code will ich eine Datei an eine vorbelegte Adresse als Anhang mailen....funzt auch soweit,....jedoch wenn ich nach dem öffnen des mail-fensters nicht sende, sondern schließe, bringt er bei der Zeile .send ne Fehlermeldung.....wie kann ich diese verhindern?

Sub WorkbookMailen()
Dim OutApp, Nachricht As Object
Dim Datei As String
Set OutApp = CreateObject("Outlook.Application")
InitializeOutlook = True
Datei = ThisWorkbook.FullName
Set Nachricht = OutApp.CreateItem(0)
With Nachricht
.To = "leibing@baugeld-team.de"
.Subject = "Kundendatei Stand: " & Date
.Attachments.Add Datei
.Body = "Vertrauliche Information" & Chr(10) & "von Ident-Nr: " & Name
.display
.Send
End With
OutApp.Quit
Set OutApp = Nothing
End Sub

Danke
Peter S.

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Code für mail bringt Fehler.....
sergiesam
Hi,
Send liefert einen Fehler, wenn nicht gesendet wurde. du kannst damit auf das Abbrechen eines Sendens reagieren. Solltest du es ignorieren wollen, ignoriere einfach den Fehler:
...
.display
on error resume next 'bei Fehler gehe einfach zur nächsten anweisung
.send
on error goto 0 'Setze Fehlerbehandlung wieder zurück
...
Gruß,
Sam
Vielen Dank funzt gut.......o.T.
15.07.2004 11:49:31
Peter
.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige