Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 17:40:39
16.10.2025 17:25:38
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Speichern unter Zelleintrag

Forumthread: Speichern unter Zelleintrag

Speichern unter Zelleintrag
Fritz_W
Hallo Forumsbesucher,
wie kann ich erreichen, dass die Arbeitsmappe, falls der Wert in Zelle O4 der Tabelle1 nicht "" ist, nur unter dem in Zelle O4 eingegebenen Wert als Dateiname gespeichert werden kann?
mfg
Fritz
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Speichern unter Zelleintrag
06.03.2012 15:40:13
marcl
Hallo Fritz,
If Cells(4,15) "" Then
ActiveWorkbook.Save As Filename:="Dein Pfad/" & Cells(4,15) & ".xls", Fileformat:=xlExcel8
End If
Gruß
marcl
AW: Speichern unter Zelleintrag
06.03.2012 15:56:16
Fritz_W
Hallo marcl,
zunächst vielen Dank für die erneute Hilfe.
Beim Einfügen des Codes erscheint folgende Anweisung rot eingefärbt:
ActiveWorkbook.Save As Filename:="Dein Pfad/" & Cells(4,15) & ".xls", Fileformat:=xlExcel8
Gruß
Fritz
P.S. Kann man auf die Pfadangabe nicht verzichten?
Das Speichern soll immer im gleichen Ordner erfolgen, aus der die Mappe geöffnet wurde.
Ich möchte, dass die Datei immer im gleichen Ordner abgespeichert
Anzeige
AW: Speichern unter Zelleintrag
06.03.2012 16:11:19
marcl
Hallo Fritz,
verusche mal
ActiveWorkbook.Save As Filename:=Activeworkbook.path & "/" & Cells(4,15) & ".xls", Fileformat:=xlExcel8
Gruß
marcl
AW: Speichern unter Zelleintrag
06.03.2012 16:21:20
Fritz_W
Hallo marcl,
jawohl, so geht das auch ohne Pfadangabe, prima. Vielen Dank.
Noch eine Frage: Was muss ich verändern, um das Makro aus einer anderen Tabelle als Tabelle1 ausführen zu können.
mfg
Fritz
P.S.:
Ich habe nun auch herausgefunden, wieso das Makro nicht lief:
bei
ActiveWorkbook.Save As
musste ich das Leerzeichen entfernen.
Anzeige
AW: Speichern unter Zelleintrag
06.03.2012 16:28:15
Reinhard
Hallo Fritz,
With ActiveWorkbook     'ThisWorkbook ?
.SaveAs Filename:=.Path & "/" & .Worksheets("Tabelle1").Cells(4, 15) & ".xls", FileFormat:= _
xlExcel8
End With

Gruß
Reinhard
AW: Speichern unter Zelleintrag
06.03.2012 16:39:28
Fritz_W
Hallo Reinhard,
das klappt so hervorragend, vielen Dank.
mfg
Fritz
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige