Zeilenzähler
08.03.2005 11:49:31
Sergej
ich verwende folgenden Code, um zuleztbenuzte Zelle in der Spalte 6 zu ermitteln!!
Sub Zeilenzeller
Dim gn As Range
Set gn = ThisWorkbook.Sheets("Protokol").Cells(Rows.Count, CInt(6)).End(xlUp)
If IsEmpty(gn) = True Then
MsgBox "Keine Zelle mit Inhalt in Spalte 6 "
Else
ThisWorkbook.Sheets("Dummy").Range("B1") = rng.Row
ThisWorkbook.Sheets("Dummy").Range("B3") = rng.Address(False, False)
End If
End Sub
Dieser Code beginnt in der ersten Zeile in der 6-te Spalte zu zählen.
ich aber brauche, dass erst ab der Zeile Nr.10 gezählt wird !!!
Wie lässt es sich machen?
Ich bedanke mich in Voraus!!!
Anzeige