Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
984to988
984to988
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Speichern unter mit Zellinhalt als Dateiname

Speichern unter mit Zellinhalt als Dateiname
18.06.2008 12:24:00
Kurti
Hallo liebe Excel-Profis,
ich brauch mal wieder Hilfe. Hab folgendes Makro gebastelt, um die Mappe mit dem Inhalt von A1 als Dateiname zu speichern.

Sub SpeichernUnterDialogAufrufen()
Application.Dialogs(xlDialogSaveAs).Show
fileSaveName = Application.GetSaveAsFilename(Worksheets("Tabelle1").Range("A1"), fileFilter: _
_
="Text Files (*.xls), *.xls")
If fileSaveName  False Then
ActiveWorkbook.SaveAs fileSaveName
End If
End Sub


Funktioniert aber nicht richtig, der neue Name aus A1 wird nur eingesetzt, wenn man beim 1. Fenster auf Abbrechen klickt. Was ist falsch? Kann mir bitte jemand helfen. Danke im Voraus
Kurti

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Speichern unter mit Zellinhalt als Dateiname
18.06.2008 12:35:00
Johannes
Hi Kurti,
loesch' einfach folgende Zeile raus:

Application.Dialogs(xlDialogSaveAs).Show


Gruesse,
Johannes

AW: Speichern unter mit Zellinhalt als Dateiname
18.06.2008 12:53:00
Kurti
Hallo Johannes,
klappt prima.
=Wiederholen("Danke";1000)
Anzeige

345 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige