VBA Fehler?

Bild

Betrifft: VBA Fehler? von: Fuger Gerhard
Geschrieben am: 14.02.2005 15:23:19

Leider funktionierts noch nicht. Finde aber den Fehler nicht!
Fehlermeldung: Laufzeitfehler 1004
Auf die Datei konnte nicht zugegriffen werde.


Sub Übergabe()
'
' Übergabe Makro
' Makro am 14.02.2005 von Fuger aufgezeichnet
'
'
    ActiveWorkbook.Save
    Selection.AutoFilter Field:=10, Criteria1:="<>"
    Rows("2:102").Select
    Selection.Copy
    Workbooks.Add
    ActiveSheet.Paste
    Range("J2").Select
    Application.CutCopyMode = False
    ActiveWorkbook.SaveAs Filename:= _
    "C:\Dokumente und Einstellungen\Administrator\Desktop\Kaindl\Übergabe\Überg" & Format(Now, "ddmmyy_hh:mm") & ".xls"
    ActiveWindow.Close
    Range("A4:C102").Select
    Selection.ClearContents
    Range("I4:J102").Select
    Selection.ClearContents
    Selection.AutoFilter Field:=10
    ActiveWindow.SmallScroll Down:=-21
    Application.Goto Reference:="Sortierbereich"
    ActiveWindow.SmallScroll Down:=-99
    Selection.Sort Key1:=Range("A3"), Order1:=xlAscending, Key2:=Range("B3") _
        , Order2:=xlAscending, Key3:=Range("I3"), Order3:=xlAscending, Header:= _
        xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
    Range("A22").Select
    ActiveWorkbook.Save
End Sub



Das ist das gesamte Makro. Vieleicht findet jemand den Fehler! Datenspeicher ist nicht möglich.

Danke
Fuger Gerhard
Bild


Betrifft: AW: VBA Fehler? von: DieterB
Geschrieben am: 14.02.2005 17:21:42

Hallo Fuger,

kannst du auf den Ordener zugreifen?
Oder ist er für dich gesperrt?
Oder ist vielleicht die Datei schreibgeschützt?

Gruß

DieterB


Bild


Betrifft: AW: VBA Fehler? von: DieterB
Geschrieben am: 14.02.2005 17:23:41

Und nochwas,

wo genau taucht der Fehler auf (Zeile)
ist sie gelb markiert, hast du den Debugger mal im
Einzelschritt ausgeführt??

Gruß

DieterB


 Bild

Beiträge aus den Excel-Beispielen zum Thema "VBA Fehler?"