Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1340to1344
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 Zeile finden
03.12.2013 22:07:41
Albert
Guten Abend zusammen,
ich versuch grad die letzte beschriebene Zeile in einer Spalte zu finden.
Nun hab ich mich mal so versucht, aber irgendwie klappt das nicht.
Könntet ihr mir bitte weiterhelfen?
With Sheets("Hilfe")
.Cells(Rows.Count, 5).End(xlUp).Offset(1, 0).Select
.Cells(Rows.Count, 5).End(xlUp).Row.Value = "x"
End with
Danke und Gruß
A.

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

Betreff
Datum
Anwender
Anzeige
Gelöst... owt
03.12.2013 22:59:06
Albert
so gelöst
With Sheets("Hilfe")
.Cells(.Rows.Count, 5).End(xlUp).Offset(1).Value = "x"
End with

AW: Letzte Zeile finden
03.12.2013 23:07:38
Mustafa
Hallo Albert,
so sollte es gehen :
Dim lngLetzte As Long
With Sheets("Hilfe")
lngLetzte = .Cells(Rows.Count, 5).End(xlUp).Row             'Zeilennummer in lngLetzte  _
schreiben
.Cells(Rows.Count, 5).End(xlUp).Offset(1, 0) = lngLetzte    'Wert von lngLetzte in 1. Leerzelle  _
schreiben
End With
End Sub
Die Select Anweisung wäre in diesem Falle unnötig.
Diese Codezeile :
.Cells(Rows.Count, 5).End(xlUp).Row.Value = "x"
sucht die Zeilennummer und versucht der "Zeilennummer" den Wert x zu geben welches zu einem Fehler führt.
Rückmeldung obs hilft wäre Nett.
Gruß aus der Domstadt Köln.
Anzeige

310 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige