Herbers Excel-Forum - das Archiv

Curserrücksprung



Excel-Version: 9.0 (Office 2000)
nach unten

Betrifft: Curserrücksprung
von: Uwe Haupt


Geschrieben am: 21.05.2002 - 09:49:25

Hallo Excelprofis 21.05.02
Suche ein Makro, welches dafür sorgt, dass der Curser bei erreichen z.B. der Spalte „ BP“
jedes Mal automatisch in die z.B. Spalte „H“ eine Zeile tiefer zurückspringt. Tabellenlängen
sind unterschiedlich, bestehen meist aus 1000 – 6000 Zeilen. Cursorrücksprung muss über
die ganze Tabellenlänge funktionieren.
Hab leider keine Ahnung von VBA. 1000 Dank im Voraus Gruß Uwe.

nach oben   nach unten

Re: Curserrücksprung
von: @lex


Geschrieben am: 21.05.2002 - 10:15:38

Hallo Uwe

Folgender Code sollte helfen:

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Dim iRow As Integer
If Target.Column = 68 Then
iRow = ActiveCell.Row
Cells(iRow + 1, 8).Select
End If
End Sub

Einfügen mit :
Alt+F11 im Project-Explorer doppelklick auf die entsprechende Tabelle und den Code reinkopieren.

Viel Spaß,
Alex

 nach oben