Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Erstellte Makros in Excel2003 auch in Exce2000 funktionsfähig





Frage

Hallo Leute Ich habe im Excel 2003 ein Makro erstellt. Leider musste ich feststellen, dass auf Arbeitsplätzen mit Excel 2000 das Makro eine Fehlermeldung verursacht. Kann mir jemand einen Tipp geben, wie ich diese FEhlermeldung eliminieren kann. Besten Dank schon jetzt für die wertvollen Tipps Daniel

Antwort 1 von Saarbauer

Hallo,

da deine Angaben zum Problem sehr dünn sind, du benutzt wahrscheinlich eine Funktion, die Excel 2000 nicht kennt.

Es ware sinnvoll mal im "Viaual-Basic-Editor" dein Makro aufzumachen und zu starten. dann wirst du sehen wo das Programm hänengen bleibt und du kannst vielleicht feststellen was für ein Fehler vorliegt.

Grundsätzlich wäre es auch sinnvoll die Fehlermeldung hier mit anzugeben, da wir keine Hellseher sind.

Gruß

Helmut

Antwort 2 von dhafner

Hallo Helmut

Das mit der Fehlermeldung anzeigen ist im Moment nicht möglich, da ich auf meine Rechner das Excel 2003 installiert habe. Ich habe nur die Meldung per Telefon erhalten und gemäss dieser Auskunft ist das Makro beim Befehl "Rang ("B2") oder ähnlich hängen geblieben. Bei mir auf dem Rechner funktioniert alles einfandfrei. Es muss mit dem Excel 2000 zusammenhängen, jedoch der Befehl Rang hat schon im Excel 97 existiert. Ich habe dir zur Analyse das Makro unten angefügt. Ich hoffe es gibt dir mehr ausschluss.

Sub Sortieren_Rang_FeldA()
´
´ Sortieren_Rang_FeldA Makro

´
ActiveSheet.Unprotect
Cells.Select
Selection.Sort Key1:=Range("B2"), Order1:=xlAscending, Key2:=Range("D2") _
, Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal, DataOption2 _
:=xlSortNormal
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowFormattingRows:=True, AllowSorting:=True
End Sub

Gruss
Daniel

Antwort 3 von schnallgonz

salve Daniel,

versuch es mal so:

 Selection.Sort Key1:=Range("B2"), Order1:=xlAscending, Key2:=Range("D2") _
, Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom


Die Optionen
DataOption1:=xlSortNormal, DataOption2 _
:=xlSortNormal 

gab es für Excel97 wohl noch nicht.

mfg
schnallgonz

Ich stimme mit der Mathematik nicht überein.
Ich meine, dass die Summe von Nullen eine gefährliche Zahl ist. (S.J. Lec)

Signatur und Textformatierungen wurden mit SNTool V1.2.13 erstellt


Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: