Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Speicherdialog für Dateiexport

Forumthread: Speicherdialog für Dateiexport

Speicherdialog für Dateiexport
13.07.2005 16:49:11
Finn
Grüßt euch,
Ich versuche im moment ein Programm zu optimieren, mit dem ich aus einer Excel- tabelle Daten auslese und in das CAD Format "dxf" formatiere.
Die Routine dafür ist auch schon voll funktionsfähig, nur wird der speicherort für die neu erstellte datei bis jetzt ausschließlich über ein Textfeld eingegeben.
Gibt es eine Möglichkeit eine Datei die über das Speichern unter Dialogfeld abzuspeichern?
Das heißt ein Fenster das den Dateibaum des Rechners anzeigt und so die Auswahlmöglichkeit des speicherorts erleichtert?
Die Text datei wird bis jetzt über
"open Textbox1.text for output as #1"
und dann über "print#1, " befehle erzeugt.
Vielen Dank schonmal im Vorraus
Fin(n) :-)
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Speicherdialog für Dateiexport
13.07.2005 16:59:17
MichaV
Hi Fin(n)
GetSaveAsFilename-Methode

Zeigt das Standarddialogfeld Speichern unter an und bekommt einen Dateinamen vom Benutzer, ohne jedoch irgendwelche Dateien zu speichern.
Syntax
Ausdruck.GetSaveAsFilename(InitialFilename, FileFilter, FilterIndex, Title, ButtonText)
Beispiel zur GetSaveAsFilename-Methode
In diesem Beispiel wird das Dialogfeld Speichern unter mit einem Dateifilter für Textdateien angezeigt. Wenn der Benutzer einen Dateinamen wählt, wird dieser in einem Meldungsfeld angezeigt.
fileSaveName = Application.GetSaveAsFilename( _
fileFilter:="Text Files (*.txt), *.txt")
If fileSaveName False Then
MsgBox "Save as " & fileSaveName
End If
In Deinem Falle dann Open fileSaveName for Output usw.
Gruss- Micha
Anzeige
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18