Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

VBA: Zeilenbereich über Indices angeben

Forumthread: VBA: Zeilenbereich über Indices angeben

VBA: Zeilenbereich über Indices angeben
18.05.2005 13:00:16
Karsten
Hallo,
ich möchte einen konkreten Bereich von Zeilen sortieren.
Über ein aufgezeichnetes Makro habe ich folgenden Befehl ermittelt:
Worksheets(2).Rows("7:11").Sort Key1:=Worksheets(2).Cells(ErsteZeile, 6), Order1:=xlAscending, Header:=xlNo, OrderCustom:=sortierliste, MatchCase:=False, Orientation:=xlTopToBottom
Soweit funktioniert das.
Das Problem sind nun die Rows("7:11"). Ich möchte beide Zahlenwerte durch Indices ersetzen (um statt der konkreten Zahlen auch Variablen schreiben zu können). Probiert habe ich nun Varianten wie:
Rows(7, 11),
Range(Rows(7), Rows(11))
und noch ein paar. Ich bekomme dann immer folgende Meldung:
1004: Anwendungs- oder objektdefinierter Fehler
Kennt jemand die Lösung?
Muchas gracias,
Karsten
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA: Zeilenbereich über Indices angeben
18.05.2005 13:33:13
Reinhard
Hallo Karsten,
r1=7
r2=11
worksheets(2).range(cells(r1,1),cells(r2,256)).sort...
genauso ungetestet geht ggfs auch
worksheets(2).rows(r1:r2).sort
Gruß
Reinhard
AW: VBA: Zeilenbereich über Indices angeben
18.05.2005 14:08:03
Karsten
Hallo Reinhard,
deine erste Variante ergibt leider wieder den Fehler 1004 (was für
mich nicht nachvollziehbar ist, theoretisch sollte das gehen,
aber Excel meckert es halt an).
Die beiden Variablen sind korrekt belegt (nach Meinung des
Debuggers).
Die untere Variante verursacht einfach einen Syntaxfehler. Bei der
war ich auch schon mal.
Gruß,
Karsten
Anzeige
AW: VBA: Zeilenbereich über Indices angeben
18.05.2005 14:23:49
Reinhard
Hallo Karsten,

Sub tt()
zei = 7
'Worksheets(2).Activate
r1 = 7
r2 = 11
Rows(r1 & ":" & r2).Sort Key1:=Cells(zei, 6), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub

lief eben problemlos, warum das andere nicht geht, habs probiert, k.A.
Gruß
Reinhard
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige