Das Archiv des Excel-Forums

relativer verweis funktioniert nicht

Bild

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
Bild


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


Bild


Betrifft: Korrektur !!!
von: Panicman
Geschrieben am: 29.09.2003 15:45:05

muß heißen: Range("K37").Select
Tschuldigung

Holger


Bild


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


Bild


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.


Bild


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


 Bild

Excel-Beispiele zum Thema " relativer verweis funktioniert nicht"

SVERWEIS auf geschlossene Arbeitsmappe aus Makro aufrufen download Per VBA einen Verweis zu einer *.DLL erstellen download
Benutzerdefinierte SVERWEIS-Funktion über mehrere Bereiche download VBE-Verweis löschen download
Arbeitszeittabelle und SVERWEIS-Formel download Verweise anhand einer Kopfzeile erkennen download
Zugriff über SVERWEIS() auf eine Artikelliste download Verweise auf Zellen in geschlossener Arbeitsmappe erstellen download
SVERWEIS-Formel über mehrere Fundstellen download SVERWEIS-, WVERWEIS- und Matrixformel-Beispiele download
SVERWEIS, WVERWEIS, INDEX, VERGLEICH und Zielwertsuche download Zweidimensionale Matrix mit der SVERWEIS-Funktion durchsuchen download
Hyperlinks zu SVERWEIS-Bezugstabellen anlegen download SVERWEIS als Ereignisprozedur download
Integragtion von SVERWEIS in eine Namens-Funktion download SVERWEIS unter Verwendung mehrer Kriterien download
Dynamischer Blattname in SVERWEIS-Formel download Kommentartexte über SVERWEIS ermitteln und anzeigen download
Aus dem vorhergehenden Blatt einen SVERWEIS-Wert liefern download Mit SVERWEIS Fundstellen ab vorgegebenen Zeilen abrufen download
Datenermittlung über SVERWEIS aus zweitem Tabellenblatt download Nur SVERWEIS eintragen, wenn Wert vorhanden download
SVERWEIS-Funktion ohne Berücksichtigung leerer Zellen download Übernahme einer Grafik gem. SVERWEIS download
Der Einsatz der SVERWEIS-Funktion in einem Ausgabeblatt download Beispiele für den Einsatz der Funktion SVERWEIS download