HERBERS Excel-Forum - das Archiv
Bei Email die Datei benennen...
Christoph

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
AW: Bei Email die Datei benennen...
Tobias

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

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

Gruss

Tobias
AW: Bei Email die Datei benennen...
Christoph

Ja ok ich glaubs euch ;-)
Nachdem ich jetzt schon lange genug dran rum probiere.
Danke nochmals
Gruß Chris
AW: Bei Email die Datei benennen...
Christoph

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
AW: Bei Email die Datei benennen...
Tobias

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
AW: Bei Email die Datei benennen...
Christoph

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
AW: Bei Email die Datei benennen...
Tobias

Genauso wars von mir auch gemeint gewesen :)

Gruss

Tobias
Bei Email die Datei benennen...
Christoph

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
AW: Bei Email die Datei benennen...
Tobias

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

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

Gruss

Tobias
AW: Bei Email die Datei benennen...
Christoph

Ja ok ich glaubs euch ;-)
Nachdem ich jetzt schon lange genug dran rum probiere.
Danke nochmals
Gruß Chris
AW: Bei Email die Datei benennen...
Christoph

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
AW: Bei Email die Datei benennen...
Tobias

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
AW: Bei Email die Datei benennen...
Christoph

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
AW: Bei Email die Datei benennen...
Tobias

Genauso wars von mir auch gemeint gewesen :)

Gruss

Tobias
Dialog-Beispiele
Bewerten Sie hier bitte das Excel-Portal