Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
316to320
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
316to320
316to320
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

relativer verweis funktioniert nicht

relativer verweis funktioniert nicht
29.09.2003 15:27:04
Achi
hallo,
ich habe folgende vba-sortierung:


Sub sortby_targetgroup_date()
' sortby_targetgroup_date Makro
Range("B37:k327").Select
Selection.Sort Key1:=Range("H53"), Order1:=xlAscending, Key2:=Range("C53" _
), Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom
Range("b27").Select
End Sub


nun will ich meine range so eingeben, dass auch neu eingetragene inhalte sofort mit in die sortierung aufgenommen werden. habe es schon mit dem relativen verweis versucht, der funktioniert aber leider irgendwie nicht.
hoffe, ich hab mich einigermassen verstaendlich ausdruecken koennen. danke schonmal fuer eure hilfe

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: relativer verweis funktioniert nicht
29.09.2003 15:36:43
Panicman
Hallo Achi,

wenn es nur zusammenhängede Einträge gibt (also keine LEERZEILEN) kannst du das so machen:
Range("B37").Select
Range(Cells(37, 2), Selection.End(xlDown)).Select

Gruß
Holger
Korrektur !!!
29.09.2003 15:45:05
Panicman
muß heißen: Range("K37").Select
Tschuldigung

Holger
AW: relativer verweis funktioniert nicht
29.09.2003 15:38:38
Stephan
Hallo Achi,
ich gehe davon aus, dass "Deine Range"
"Range("B37:k327")" ist, und dass mit
"sofort mit in die sortierung aufgenommen werden" keine automatische
Sortierung nach neuem Werte-Eintrag ist;
dann könnte die Range automatisch angepasst werden durch:
Range("B37:K" & Range("K65536").End(xlUp)).Select
Bedingung ist aber, dass unter dem zu sortierenden Bereich keine anderen
Werte stehen. Sonst muss der Wert K65536 entsprechend verändert werden!
Viel Erfolg!
Mit freundlichem Gruß
Stephan
Anzeige
AW: relativer verweis funktioniert nicht
29.09.2003 16:50:16
Achi
@stephan
hat leider nicht funktioniert, methode range ist fuer das objekt _global fehlgeschlagen...was auch immer das heisst
ich benoetige einfach einen befehl, der mir eben neue eintraege auch gleich in mein sortier-makro mit aufnimmt.
AW: relativer verweis funktioniert nicht
29.09.2003 17:17:25
Panicman
Hallo Achi,

Stephan hat nur das ".row" vergessen.
Range("B37:K" & Range("K65536").End(xlUp).Row).Select

dann klapps

Gruß
Holger

303 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige