Findet Arbeitsblatt nicht

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Findet Arbeitsblatt nicht
von: Detlef
Geschrieben am: 14.02.2005 12:25:14
Hallo zusammen,
habe da auch mal ein Problem. Speichere per Button das aktuelle Arbeitsblatt unter aktuellen Datum ab. Klappt wunderbar. Nur wenn ich jetzt das zuletzt abgespeicherte Blatt per Button wieder aufrufen will, findet er es nicht !!
Hier der VBA Code, was mache ich falsch?
-----


Sub DateFileOpen()
Dim sName As String
sName = "C:\Eigene Dateien\A - Alt_" & Format(Date, "dd.mm.yyyy") & ".xls"
If Dir(sName) = "" Then
Beep
MsgBox "Arbeitsmappe " & sName & " nicht gefunden!"
Exit Sub
Else
Workbooks.Open sName
End If
End Sub


Sub CommandButton2_BeiKlick()
End Sub

Danke für eure Hilfe.
Bild

Betrifft: AW: Findet Arbeitsblatt nicht
von: Reinhard
Geschrieben am: 14.02.2005 14:51:51
Hi Detlef,
ich nehme an die Datei:
C:\Eigene Dateien\A - Alt_14.02.2005.xls
existiert bei dir nicht, bei mir funktionierte der Code.
Wenn sie existiert, dann setze mal anfangs des Codes ein
Chdrive "C"
Chdir "c:\eigene dateien"
(Irgendwie ging es die letzten tage mehrmals schon um diese Speicherung, wenn du das warst, dann bleib bitte hier im Thread, danke.
Gruß
Reinhard
Bild

Betrifft: AW: Findet Arbeitsblatt nicht
von: Detlef
Geschrieben am: 14.02.2005 17:10:40
Hallo Reinhard,
danke für deine Antwort, nur er findet das Blatt immer noch nicht.
Die Datei ist vorhanden, speichere sie mit folgenden Code:

Sub save()
    ChDir "C:\Eigene Dateien"
    ActiveWorkbook.SaveAs Filename:= _
        "C:\Eigene Dateien\ A - Alt_" & Format(Date, "dd.mm.yyyy") & ".xls", FileFormat:= _
        xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
        , CreateBackup:=False
End Sub

Vielleicht hast du ne Idee.
MfG Detlef
Bild

Betrifft: AW: Findet Arbeitsblatt nicht
von: Ute
Geschrieben am: 14.02.2005 17:24:39
Lass mal die Leerzeichen im Dateinamen weg.
mfg Ute
Bild

Betrifft: AW: Findet Arbeitsblatt nicht
von: Detlef
Geschrieben am: 14.02.2005 17:56:11
Danke,
ich habs selbst gemerkt, jetzt klappt es.
nicht zu glauben was ein leerzeichen ausmacht.
nochmals thanks
 Bild

Beiträge aus den Excel-Beispielen zum Thema "Findet Arbeitsblatt nicht"