Herbers Excel-Forum - das Archiv

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
Excel-Beispiele zum Thema "Anhängen aktueller Datei"
Aktueller Arbeitsblattname in Formel