Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Tore einfügen

Forumthread: Tore einfügen

Tore einfügen
24.10.2004 18:48:07
Erich
Hallo,
ich gebe im Moment in meinem BL-Programm die geschossenen Tore in den Spalten K:L ein.

Private Sub Worksheet_Change(ByVal Target As Range)
Select Case Target.Column
Case 11
Cells(Target.Row, Target.Column + 1).Select
Case 12
Cells(Target.Row + 1, 11).Select
End Select
End Sub

Bei dem obigen Makro springt der Cursor nach der L-Eingabe in die nächste K-Zeile, obwohl diese u.U. schon ausgefüllt ist.
Der Cursor sollte aber in die nächste freie K-Zeile springen.
Wer hilft mir ?
Gruß Erich Müller
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tore einfügen
24.10.2004 20:09:44
Klaus-Dieter
Hallo Erich,
versuche es mal so:
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Dim z As Integer
Select Case Target.Column
Case 11
Cells(Target.Row, Target.Column + 1).Select
Case 12
z = Target.Row
Do While Cells(z, 11) <> ""
z = z + 1
Loop
Cells(z, 11).Select
End Select
End Sub

Das ist jetzt nur für Sprünge von L nach K programmiert, ich denke das reicht so?
Gruß Klaus-Dieter

Anzeige
Danke Klaus-Dieter
25.10.2004 02:05:54
Erich
.
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige