nicht angemeldet
Glück auf!
Ich versuche mit folgendem VBA-Code das ausgewählte Tabellenblatt in eine neue Arbeitsmappe zu kopieren (funktioniert) und dann per Email zu versenden (funktioniert leider nicht).
Sub AktuelleTabelleMailen()
ActiveWorkbook.ActiveSheet.Copy
ActiveWorkbook.SendMail _
Recipients:="tippspiel@zwergenspiegel.de", _
Subject:="Tippspiel"
ActiveWorkbook.Close savechanges:=False
End Sub
Ich nutze Excel 2003 und als Standard Email-Client "Outlook Express 6".
"Funktioniert leider nicht" bedeutet übrigens, dass die Tabelle zwar ein eine neue Arbeitsmappe kopiert wird, jedoch nicht versendet wird. Fehlermeldung: "Laufzeitfehler '1004': Die Methode 'SendMail' für das Objekt '_Workbook' ist fehlgeschlagen"
Wenn ich manuell über Datei/Senden an/Email-Epfänger gehe funktioniert der Spaß übrigens; daran dass "Outlook Express" kein echter MAPI E-Mail-Client ist, kann es also doch nicht liegen, oder?
Freundliche Grüße
zwerg Alex