inhalt einer exceldatei per mail schicken
31.08.2003 22:59:04
PeterO
will mit diesen code das aktuelle blatt als mail verschicken,
Sub BerichtAlsEMailVersenden1()
Dim Empfaenger, Titel As String
' E-Mailadresse
Empfaenger = "test@test.de"
' Titel
Titel = "Tabelle1"
' Name der Datei "A3"
ActiveWorkbook.Worksheets("Tabelle1").Copy
Application.Dialogs(xlDialogSendMail).Show Empfaenger, Titel
ActiveWorkbook.Close savechanges:=False
End Sub
aber bei der zeile :
Application.Dialogs(xlDialogSendMail).Show Empfaenger, Titel
gibt er immer eine fehlermeldung!
arbeite mit excel xp und windows xp
bitte um hilfe.
gruß
peter
Anzeige