Sub rauf()
Cells(Selection.Row - 1, Selection.Column).Select
End Sub
Schönen Gruß,
Andi
AW: Cursor bewegen
11.05.2005 15:46:30
Hajo_Zi
Hallo Tinu,
falls Du es so meinst wie Andi geschrieben hat, in VBA kann zu 99% auf select usw. verzichtet werden.
Selection.Offset(-1,0).select
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel Das Forum lebt auch von den Rückmeldungen.
Betriebssystem Windows 2000 SP4 und Excel Version 2000 SP3.
"Wer Rechtschreibfehler findet, darf sie behalten!" Dies gilt auch für Bert.
Anzeige
AW: Cursor bewegen
11.05.2005 15:51:42
Tinu
Hallo Hajo
auch Deine Version funktioniert. Besten Dank für den Hinweis!
Gruss
Tinu
AW: Cursor bewegen
11.05.2005 15:47:14
Tinu
Hallo Andi
klappt bestens! vielen Dank!
Tinu
AW: Cursor bewegen
11.05.2005 16:29:42
Tinu
Hallo nochmals
Ich hab noch eine Anschlussfrage:
Wie sieht der Code aus, wenn ich einen ganzen Bereich markiert habe und per Makro in die erste Zelle unterhalb des Bereiches springen möchte?
Beispiel:
A1 bis C5 markiert.
per Makro auf A6 springen.
Gruss
Tinu
AW: Cursor bewegen
11.05.2005 16:31:10
Tinu
Hallo nochmals
Ich hab noch eine Anschlussfrage:
Wie sieht der Code aus, wenn ich einen ganzen Bereich markiert habe und per Makro in die erste Zelle unterhalb des Bereiches springen möchte?
Beispiel:
A1 bis C5 markiert.
per Makro auf A6 springen.
Gruss
Tinu
Anzeige
AW: Cursor bewegen
11.05.2005 16:51:11
IngGi
Hallo Tinu,
geht das vielleicht?
Cells(Selection.Row + Selection.Rows.Count, Selection.Column).Select
Gruß Ingolf
AW: Cursor bewegen
11.05.2005 17:04:34
Tinu
Hallo Ingolf,
nach "Selection.Rows.Count," musste ich noch "-1" einfügen. Jetzt klappt's!
besten Dank und Gruss
Tinu