Excel-File direkt versenden via VBA

Forumthread: Excel-File direkt versenden via VBA
1 Beitrag zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Excel-File direkt versenden via VBA

02.03.2005 16:37:55

Rudi

Liebe Excelianer
Ich habe ein Excel-Formular, welches ich direkt über eine Befehlsschaltfläche an einen bestimmten E-Mail-Empfänger versenden möchte.
Wie geht das?
Optional soll der Benutzer auswählen können, ob er eine Lese- und/oder Empfangsbestätigung erhalten möchte.
Danke für eure Hilfe.
Gruss Rudi

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Excel-File direkt versenden via VBA

02.03.2005 16:59:16

GeorgK

AW: Excel-File direkt versenden via VBA

02.03.2005 16:59:16

GeorgK

Hallo,
versuchs mal hiermit
In Ai steht der Tabellenname
In A2 Mailempfänger
In A3 Betreff


Sub SendTab()
Dim wks As Worksheet
Application.ScreenUpdating = False
Set wks = ActiveSheet
Worksheets(Range("A1").Value).Copy
ActiveWorkbook.SendMail wks.Range("A2").Value, wks.Range("A3").Value
ActiveWorkbook.Close savechanges:=False
Application.ScreenUpdating = True
End Sub

...Hans
Gruß
GeorgK