Anhängen aktueller Datei

Bild

Betrifft: Anhängen aktueller Datei
von: Arbeiter
Geschrieben am: 13.04.2005 12:04:55
Hallo erstmal,
ich habe ein Formular erstellt in dem es den Button "versenden" gibt. Diesen Biutton habe ich auch mit einer fixen Email Adresse verlinkt. Jedoch möchte ich, dass er beim öffnen des "Mail" Fensters das aktuell geöffnete Formular mit der bestehenden Änderung direkt mit als Anhang verschickt. Gibt es eine Möglichkeit den Button so zu konfigurieren?
Vielen Dank im Voraus
Mit freundlichen Grüssen
Der Arbeiter

Bild

Betrifft: AW: Anhängen aktueller Datei
von: Xelleron (Dennis)
Geschrieben am: 17.04.2005 08:50:34
So geht das:
...
ActiveWorkbook.ActiveSheet.Copy
ActiveWorkbook.SaveAs Range("A1").Value & ".xls"
ActiveWorkbook.SendMail Reciepients:=Empfänger, _
Subject:=Range("A1").Value
ActiveWorkbook.Close savechanges:=False
....
Gruß Dennis
 Bild

Beiträge aus den Excel-Beispielen zum Thema "Anhängen aktueller Datei"