Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
348to352
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
348to352
348to352
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Datei Speichern

Datei Speichern
08.12.2003 10:56:14
Pete
Hallo Forum!

Möchte eine Datei in einen Pfad speichern, ohne im Makro den Pfad anzugeben. Es müsste eine ähnliche Formulierung sein wie Application.Path sein.
Die Speicherung soll entweder über eine Abfrage des Speicherortes oder im selben Pfad wie die xls Datei erfolgen.

Jetzt verwende ich folgendes Makro:


Private Sub Export_Click()
Set tb2 = Worksheets("tabelle2")
Dim sFile As String
Dim bCell As Double
tb2.Copy
sFile = Path & "H:\3_Studenten\Lübbe\Tabelle_Fzg_Bewegung\testtext.txt"
ActiveWorkbook.SaveAs _
Filename:=sFile, _
FileFormat:=xlTextWindows
ActiveWorkbook.Close savechanges:=False
MsgBox "Weiter"
End Sub


Wer kann helfen?
Danke, Pete!

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datei Speichern
08.12.2003 11:02:15
Nike
Hi,
ein Ansatz:
ChDir "H:\3_Studenten\Lübbe\Tabelle_Fzg_Bewegung\"
Application.Dialogs (xlDialogSaveAs)

Bye

Nike
AW: Datei Speichern
08.12.2003 11:10:00
Pete
Hallo Nike!

Der Ansatz ist gut. Würde aber gern noch das Format in txt ändern.

MfG Pete
AW: Datei Speichern
08.12.2003 11:14:01
Nike
Hi,

brauchst dann nur im Dialog den Dateityp umzustellen ;-)

Bye

Nike
AW: Datei Speichern
08.12.2003 11:16:06
Pete
Hallo Nike!

Stimmt, hatte daran gar nicht gedacht.

Danke!!!
Pete

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige