Bei Email die Datei benennen...

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Label
Bild

Betrifft: Bei Email die Datei benennen... von: Christoph
Geschrieben am: 22.03.2005 09:22:13

Hallo,

ich habe mich gestern schon damit auseinandergesetzt eine DAtei ohne sie zu Speichern zu benennen. Aber ohne Erfolg.

wenn ich jetzt die DAtei per Email mittels:

ActiveWorkbook.SendMail Recipients:="xxx@yyy.de", _
Subject:=Label1.Caption + " " + .Label36.Caption + Tabelle3.Label43.Caption

abschicke, dann wird die Mappe mit Standartnamen abgespeichert.
Ich würde sie gerne bevor sie in den Anhang kommt benennen.
Geht das?

Gruß Chris

Bild


Betrifft: AW: Bei Email die Datei benennen... von: Tobias Marx
Geschrieben am: 22.03.2005 09:36:46

Servus!

Wie gesagt, nur durch speichern, glaubs uns doch endlich :)


Sub tab_benennen()
  ActiveWorkbook.SaveAs ("pupsi.xls")
End Sub


Gruss

Tobias


Bild


Betrifft: AW: Bei Email die Datei benennen... von: Christoph
Geschrieben am: 22.03.2005 09:46:33

Ja ok ich glaubs euch ;-)
Nachdem ich jetzt schon lange genug dran rum probiere.

Danke nochmals

Gruß Chris


Bild


Betrifft: AW: Bei Email die Datei benennen... von: Christoph
Geschrieben am: 22.03.2005 09:52:40

Aber wenn ich mit Emailfunktion arbeite, dann wird die Datei ja abgespeichert und in den Anhang gestellt, und kann man die bei dem Abspeichern hier nicht benennen, das war meine eigentliche Frage.

Gruß Chris


Bild


Betrifft: AW: Bei Email die Datei benennen... von: Tobias Marx
Geschrieben am: 22.03.2005 09:54:19

Servus!

Mit dem Code, den ich dir gerade eben geschrieben hatte, kannst du die Datei unter einem beliebigen Namen, den du statt pupsi.xls ist, speichern, ohne dass er was fragt oder sonstwas. Dann kannst du ihn ja auch gleich per eMail verschicken.

Gruss

Tobias


Bild


Betrifft: AW: Bei Email die Datei benennen... von: Christoph
Geschrieben am: 22.03.2005 10:02:36

Ich habs jetzt!

ActiveWorkbook.SaveAs ("C:\" + Label1.Caption + " - " + Label36.Caption + ".xls")
ActiveWorkbook.SendMail Recipients:="xxx@yyy.de", _
Subject:=Label1.Caption + " " + Label36.Caption + Tabelle3.Label43.Caption
Kill "C:\" + Label1.Caption + " - " + Label36.Caption + ".xls"

Funktioniert wunderbar

Gruß Chris


Bild


Betrifft: AW: Bei Email die Datei benennen... von: Tobias Marx
Geschrieben am: 22.03.2005 10:04:04

Genauso wars von mir auch gemeint gewesen :)

Gruss

Tobias


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Spalten zusammen fügen"