Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
840to844
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
840to844
840to844
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

"speicherort" sub funktioniert nicht

"speicherort" sub funktioniert nicht
28.01.2007 19:01:10
holger
Hallo Excilianer
Mein "Sub" funktioniert nicht mehr, speichername und alles funktioniert nur den Ort den ich mit ChDir auswähle wird nicht angenommen, mein "Sub" sieht so aus

Sub speichern()
Dim Dateiname
ChDir "G:\USER\WB5\Bewohner"
Dateiname = Application.GetSaveAsFilename(InitialFileName:="LN & PZB " & ActiveWorkbook.Sheets("Name").Cells(12, 2).Value & "_" & _
Date & ".xls", _
fileFilter:="alle Dateien (*.*), *.*")
If Dateiname <> False Then
meineansicht
MsgBox "CareArrange wird jetzt beendet"
ThisWorkbook.SaveAs Dateiname
normalansicht
End If
Application.Quit
End Sub

Wer kann mir da helfen?
Gruß und Dank
Holger

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: "speicherort" sub funktioniert nicht
28.01.2007 19:38:21
so?
ChDrive "G"
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige