Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
664to668
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
664to668
664to668
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

VBA rows.count

VBA rows.count
12.09.2005 09:44:11
Sascha
Me.cmdLieferscheinnummer.Value = Cells(Rows.Count, 2).End(xlUp).Offset(1, -1).Text
Mit disem Befehl bestimme ich die letzte beschriebene Zelle in der Spalte B und lese dann den Wert der darunter liegenden Zelle in der Spalte A aus.
Kann ich diesen Befehl so ändern dass auch mehrere Spalten gleichzeitig auf die letzte beschriebene Zelle überprüft werden können, also nicht nur Spalte B sondern den Bereich der Spalten B bis AN überprüft werden? Ich brauch halt den Wert der Zelle der Spalte A aus der nächsten freien Zeile

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

Betreff
Datum
Anwender
Anzeige
AW: VBA rows.count
12.09.2005 10:00:00
Manfred
Hallo Sascha,
Das geht in etwa so

Sub letzteZeile()
Dim i As Integer, j As Long
j = 1
For i = 2 To 40   '40 entspricht Spalte AN
If Cells(Rows.Count, i).End(xlUp).Row > j Then
j = Cells(Rows.Count, i).End(xlUp).Row
End If
Next
Me.cmdLieferscheinnummer.Value = Cells(j + 1, 1)
End Sub

Gruß Manfred
AW: VBA rows.count
12.09.2005 10:32:02
Sascha
Super Danke schön, hat funktioniert.
Anzeige

149 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige