Herbers Excel/VBA-Archiv
relativer verweis funktioniert nicht
- relativer verweis funktioniert nicht von Achi vom 29.09.2003 15:27:04
- AW: relativer verweis funktioniert nicht - von Panicman am 29.09.2003 15:36:43
- Korrektur !!! - von Panicman am 29.09.2003 15:45:05
- Korrektur !!! - von Panicman am 29.09.2003 15:45:05
- AW: relativer verweis funktioniert nicht - von Stephan am 29.09.2003 15:38:38
- AW: relativer verweis funktioniert nicht - von Achi am 29.09.2003 16:50:16
- AW: relativer verweis funktioniert nicht - von Panicman am 29.09.2003 17:17:25
- AW: relativer verweis funktioniert nicht - von Panicman am 29.09.2003 17:17:25
- AW: relativer verweis funktioniert nicht - von Achi am 29.09.2003 16:50:16
- AW: relativer verweis funktioniert nicht - von Panicman am 29.09.2003 15:36:43
 |
Betrifft: relativer verweis funktioniert nicht
von: Achi
Geschrieben am: 29.09.2003 15:27:04
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
 |
Betrifft: AW: relativer verweis funktioniert nicht von: Panicman
Geschrieben am: 29.09.2003 15:36:43
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
| |
Betrifft: Korrektur !!! von: Panicman
Geschrieben am: 29.09.2003 15:45:05
muß heißen: Range("K37").Select
Tschuldigung
Holger
| |
Betrifft: AW: relativer verweis funktioniert nicht von: Stephan
Geschrieben am: 29.09.2003 15:38:38
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
| |
Betrifft: AW: relativer verweis funktioniert nicht von: Achi
Geschrieben am: 29.09.2003 16:50:16
@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.
| |
Betrifft: AW: relativer verweis funktioniert nicht von: Panicman
Geschrieben am: 29.09.2003 17:17:25
Hallo Achi,
Stephan hat nur das ".row" vergessen.
Range("B37:K" & Range("K65536").End(xlUp).Row).Select
dann klapps
Gruß
Holger
| |