Thema Datum  Von Nutzer Rating
Antwort
Rot Sortieren, Fehler Excel7 zu Excel10
 18.09.2013 08:37:07 Gebhard
Solved
18.09.2013 14:11:08 Gast42298
NotSolved

Ansicht des Beitrags:
Von:
Gebhard		 Datum:
18.09.2013 08:37:07		 Views:
1231		 Rating:
     
Antwort:
 Nein
Thema:
Sortieren, Fehler Excel7 zu Excel10

Ich habe ein makro geschrieben, das eine umfangreiche Tabelle nach 3 Krietrien sortiert. Dieses Makro funktioniert auf Ecxel7 einwandfrei. Sobald ich das makro unter Excel10 laufen lasse stürzt das Makro vollständig ab, Excel wird automatisch geschlossen. Manchmal aktiviert sich auch der debugger. Dann wird die Zeile .apply als Ursache für den Fehler angezeigt.

    Range("Datenbereich").Select
    Range(Selection, Selection.End(xlDown)).Select
    ActiveWorkbook.Worksheets(TB_Dienstplan).Sort.SortFields.Clear
    ActiveWorkbook.Worksheets(TB_Dienstplan).Sort.SortFields.Add Key:=Range("FahrerNr"), _
        SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
    ActiveWorkbook.Worksheets(TB_Dienstplan).Sort.SortFields.Add Key:=Range("Datum"), _
       SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
    ActiveWorkbook.Worksheets(TB_Dienstplan).Sort.SortFields.Add Key:=Range("Beginn"), _
        SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
    With ActiveWorkbook.Worksheets(TB_Dienstplan).Sort
        .SetRange Range("Datenbereich")
       .Header = xlYes
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
'

Hat jemand Erfahrung mit diesem Problem und vielleicht auch eine Lösung dafür?

Danke Gebhard

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Sortieren, Fehler Excel7 zu Excel10
 18.09.2013 08:37:07 Gebhard
Solved
18.09.2013 14:11:08 Gast42298
NotSolved