Laufzeitfehler 1004 im Macro

Bild

Betrifft: Laufzeitfehler 1004 im Macro von: Fuger Gerhard
Geschrieben am: 16.03.2005 08:50:02

Hallo!
Das unten angeführte Macro funktioniert nur wenn ich es über Macro ausführen starte. Wenn ich es über eine Schaltfläche (Übergabe Klick) starte funktioniert es nicht.
Fehlermeldung: Laufzeitfehler 1004; Die Select Methode des Range-Objekt konnte nicht ausgeführt werden.
Debuggen: Range ("J2").Select


Private Sub Übergabe_Click()
'
' Ü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\Kabel\Übergabe\Übergabe_" & _
    Format(Now, "DD" & "MM" & "YY" & "_" & "hh" & "_" & "mm") & ".xls", _
    FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
    ReadOnlyRecommended:=False, CreateBackup:=False
    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



Bitte um Hilfe!
Gerhard
Bild


Betrifft: AW: Laufzeitfehler 1004 im Macro von: u_
Geschrieben am: 16.03.2005 08:52:33

Hallo,
setze die TakeFocus-Eigenschaft des Buttons auf False.

Gruß


Bild


Betrifft: AW: Laufzeitfehler 1004 im Macro von: Fuger Gerhard
Geschrieben am: 16.03.2005 10:17:35

Hallo!
Danke für den Tipp!
Funktioniert aber leider nicht; selber Fehler!


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Laufzeitfehler 1004 im Macro"