Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1644to1648
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
letzte beschriebene Zeile suchen
24.09.2018 09:45:03
Steph
Guten Morgen,
ich würde gerne die letzte Zeile in Spalte 6 in einer Tabelle suchen und diesen Wert +1 erhöhen. Allerdings scheitert es leider schon am Suchen der letzten Zeile ...
Mein Code bisher folgender:
Private Sub CommandButton1_Click()
Dim leZeile As String
With Sheets("Datenbank").UsedRanged
leZeile = .Cells(Rows.Count, 6).End(xlUp).Row + 1
End With
MsgBox (leZeile)
End Sub

Kann mir jemand dabei weiterhelfen?
Viele Grüße,
Steph

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: letzte beschriebene Zeile suchen
24.09.2018 09:47:53
Nepumuk
Hallo Steph,
so:
Private Sub CommandButton1_Click()
Dim leZeile As Long
With Worksheets("Datenbank")
leZeile = .Cells(.Rows.Count, 6).End(xlUp).Row + 1
End With
MsgBox CStr(leZeile)
End Sub

Gruß
Nepumuk
AW: letzte beschriebene Zeile suchen
24.09.2018 09:55:09
Steph
Hallo Nepumuk,
vielen Dank! Ich habe mich etwas umständlich ausgedrückt glaube ich. Ich sehe jetzt, welches die letzte beschriebene Zeile ist. Allerdings brauche ich aus der letzten beschriebenen Zeile den Wert aus Spalte 6. Kann ich dafür einfach leZeile.value benutzen?
AW: letzte beschriebene Zeile suchen
24.09.2018 09:59:47
Nepumuk
Hallo Steph,
na dann:
Private Sub CommandButton1_Click()
Dim vntValue As Variant
With Worksheets("Datenbank")
vntValue = .Cells(.Rows.Count, 6).End(xlUp).Value
End With
MsgBox CStr(vntValue)
End Sub

Gruß
Nepumuk
Anzeige
AW: letzte beschriebene Zeile suchen
24.09.2018 10:06:19
Steph
Vielen, vielen Dnak Nepumuk! :)

313 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige