Excel-File direkt versenden via VBA

Bild

Betrifft: Excel-File direkt versenden via VBA
von: Rudi
Geschrieben am: 02.03.2005 15:37:55
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

Bild

Betrifft: AW: Excel-File direkt versenden via VBA
von: GeorgK
Geschrieben am: 02.03.2005 15:59:16
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
 Bild

Beiträge aus den Excel-Beispielen zum Thema "Excel-File direkt versenden via VBA"