Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1472to1476
1472to1476
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Letzte Zeile einer Tabelle OHNE UsedRange

Forumthread: Letzte Zeile einer Tabelle OHNE UsedRange

Letzte Zeile einer Tabelle OHNE UsedRange
05.02.2016 22:25:00
Kai
Hallo ,
wie kann ich denn die letzte benutzte Zeile einer kompletten Mappe ermitteln ohne dass ich UsedRange verwenden.
UsedRange bringt mir immer ein falsches Ergebnis.
Aber auch diese Abfrage liefert mir ein falsches Ergebnis:
ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row
gleiches Ergebnis wie UsedRange
Was gibt es denn noch für Möglichkeiten ?
Danke Kai

Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Letzte Zeile einer Tabelle OHNE UsedRange
05.02.2016 22:31:22
Daniel
Hi
ne Möglichkeit wäre
Cells.Find(what:="?*", lookat:=xlwhole, LookIn:=xlvalues, SearchDirection:=xlprevious, SearchOrder:=xlByRows).Row
hat auch den Vorteil, dass du bei Bedarf entscheiden kannst, ob du in echten Leeerzellen suchen willst (dh eine Zelle mit Formel ist nicht leer) oder ob auch ein Formelergebnis "" (Leerstring) als Leer gelten soll.
Einzige Einschränkung: es sollte kein Filter aktiv sein, weil in ausgeblendeten Zellen nicht gesucht wird.
gruß Daniel

Anzeige
AW: Letzte Zeile einer Tabelle OHNE UsedRange
05.02.2016 22:43:51
Felix
Moin,
ich habe gerade folgendes verwendet:
LetzteZelle = Cells(65535, 1).End(xlUp).Row
Findet die erste Zeile von unten mit Wert.
Grüße,
Felix

AW: Letzte Zeile einer Tabelle OHNE UsedRange
05.02.2016 22:59:24
Daniel
Hi
wenn du weisst, in welcher Spalte du suchen musst, kannst du das machen.
wenn du nicht weisst in welcher Spalte die letzte befüllte zeile ist, nimmst du .Find.
gruß Daniel

Anzeige
Danke an alle, passt nun. owt
05.02.2016 23:47:20
Kai

Strg+Ende geht übrigens leichter ;-) owT
05.02.2016 23:54:41
Matthias

STRG+ENDE = Cells.SpecialCells(xlcelltypelastcell)
05.02.2016 23:59:59
Daniel
was nützt es, wenns leichter geht aber falsch ist?

Anzeige
geht doch ...
05.02.2016 22:48:06
Matthias
Hallo
Was geht denn nicht?
Tabelle1

 BCDEF
5     
6 1xx 
7 2xx 
8 3xx 
9 4xx 
10 5xx 
11 6xx 
12 7xx 
13 8xx 
14 9xx 
15 10xx 
16     


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Funktioniert doch. Option Explicit Sub tt() MsgBox ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row End Sub Sub USEDR() MsgBox ActiveSheet.UsedRange.Rows.Count End Sub Der eine Code liefert 15
UsedRange liefert 10
Gruß Matthias

Anzeige
sogar
05.02.2016 23:21:41
Michael
Hi zusammen,
Sub USEDR_cell()
Dim c As Range
Set c = ActiveSheet.UsedRange
MsgBox "Also: " & c.Rows.Count + c(1).Row - 1
End Sub
liefert auch 15.
Allerdings geht es anscheinend nicht "direkt" mit usedrange(1)
Schöne Grüße,
Michael

Anzeige
AW: sogar
05.02.2016 23:52:25
Matthias
Hallo
Das wichtigste ist ja immer die absolut klare Definition der Frage!
Das gleiche Erg. liefert aber dann auch
ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row

Das Problem bei UsedRange ist das viele es nicht kennen.
Tabelle1

 BCDEF
5     
6 UsedR1xx 
7 UsedR2xx 
8 UsedR3xx 
9 UsedR4xx 
10 UsedR5xx 
11 UsedR6xx 
12 UsedR7xx 
13 UsedR8xx 
14 UsedR9xx 
15 UsedR10xx 
16     
17     
18     
19     
20     
21     
22     
23     


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Ich habe hier in Zeile 22 eine Zelle gefärbt, dannach wieder entfernt
Nun hat aber UsedRange.Rows.Count den Wert 17.
UsedRange hat also 17 Zeilen, aber nur weil ich oberhalb der Zeile(6)
noch keine Zelle "angefasst" habe.
Das sollte man wissen!
Würde ich nun z.B. in Zeile(3) eine Zelle verändern, ändert sich auch UsedRange.Rows.Count
Gruß Matthias
Anzeige
;

Forumthreads zu verwandten Themen

Letzte beschriebene Zeile suchen
Thomas3

Guten Morgen zusammen,
ich muß aus über 1000 Listen Daten auslesen. Das ist kein Problem.
Jede Liste sollte so beschrieben werden, dass ab Zeile 13 bis je nach Eintragungen x-Zeile Spalte O gefüllt ist.
In der Spalte 1 ist in der Datenliste eine Formel hinterlegt, die sichtbar aut...
19.08.2008 08:29:00
Thread-ID: 1002780
10 Beiträge
Zeile mit Werten aus anderer Tabelle vergleichen
onkelbobby

Hi,
ich versuche folgendes in meine Datei einzubauen.
Tabelle 2 enthält Adressdaten und eine Infospalte. In diese Infospalte kann der Wert "S" oder der Wert "A" eingetragen werden.
In Tabelle 1 sind auch diverse Adressdaten gepflegt. Alle Adressen in Tabelle 1 sind auch in Tabelle 2...
29.08.2008 10:37:00
Thread-ID: 1005722
3 Beiträge
zeile ermitteln, werte prüfen
sonja

hallo ihr lieben,
ich hoffe ihr könnt mir auch dieses mal wieder helfen.
ich möchte in einer zeile (die sich ständig ändert letzte beschriebene zeile minus 6)
in jeder spalte prüfen ob der wert kleiner als ... ist, wenn dies zutrifft sollte sich eine userform
mit einem hinweis...
10.10.2008 16:55:00
Thread-ID: 1015638
11 Beiträge
Letzte Zeile Finden und Daten einfügen
Eddie

Hallo @ all ...
Ich würde gerne in meinen aktiven Sheet die letzte Zeile Finden, wo etwas steht, und dann 5 Zeilen tiefer noch den Text 'ENDE' in der A'ten Spalte einfügen
Da mit den Suchen ist ja kein Problem, aber Ihn dann sagen das er 5 Zeilen runter gehen soll schon :-)
Sub su...
20.10.2008 15:17:00
Thread-ID: 1017692
4 Beiträge
Anzeige
Letzte Zeile Finden und Daten einfügen
Eddie

Hallo @ all ...
Ich würde gerne in meinen aktiven Sheet die letzte Zeile Finden, wo etwas steht, und dann 5 Zeilen tiefer noch den Text 'ENDE' in der A'ten Spalte einfügen
Da mit den Suchen ist ja kein Problem, aber Ihn dann sagen das er 5 Zeilen runter gehen soll schon :-)
Sub su...
20.10.2008 15:28:24
Thread-ID: 1017698
2 Beiträge
Letzte Zelle & Mittelwert
Frank

Hallo,
ich möchte den Mittelwert von z.B. A2 bis A(XYZ) ermitteln.
Die Letzte Zelle kann ich aus der Variable Letzte_Vlinie auslesen.
Wie muß die Befehlszeile in einem Makro aussehen damit xyz durch den Inhalt der Variable ersetzt wird.
Gruß und danke
Frank
05.11.2008 09:22:11
Thread-ID: 1021766
5 Beiträge
VBA - Summe unter letzter Zeile bilden
mgr

hallihallo!
ich hab jetzt schon ziemlich lang rumgesucht, komm aber leider nicht zum durchbruch. dabei - so unterstelle ich - hab ich ein problem, das schon viele gehabt haben müssten und das wahrscheinlich auch nicht unlösbar ist.
ich habe eine tabelle mit einer variablen anzahl von ze...
07.11.2008 13:39:07
Thread-ID: 1022657
3 Beiträge
Letzten Zeilenwert
Andre´

Hallo alle zusammen,
wie kann ich den letzten Zeilenwert der 2.Zeile in einer MSGBox angeben also: 11.11.2008
(dazwischen sind leere Zellen)
Tabelle1

 ABCDEFG1wee  dfgh   2trtrt  recht  11.11.20083Uhuu  Prod &n...
18.11.2008 22:31:00
Thread-ID: 1025804
10 Beiträge
Zeilen einfügen vor Zeile mit Wert XX in Spalte D
NetMare

Hallo zusammen,
ich möchte gern per script eine Zeile an bestimmten Stellen einfügen.
Das Einfügen klappt ja über
Worksheets("Tabelle1").Rows(7).Insert
ganz gut...
Ich habe mehrere Zeilen in der Liste mit unterschiedlichen Dingen die ich mir auch über scripte erstellen lasse...
25.11.2008 11:49:00
Thread-ID: 1027648
2 Beiträge
Formel für letzter Zeilenwert
Andre´

Hallo alle zusammen,
gibt es eine Formel, die mir den letzten Zeilenwert anzeigt.
Tabelle1

 BCDEFGHIJKLMN3 = letzter Zeilenwert() AnnePeter12.01.2008       Ändern4 = letzter Zeilenwert() FranzPetraLutz15.05.2008   ...
05.12.2008 07:44:00
Thread-ID: 1030336
8 Beiträge
Letzten Zeilen Wert mit Variabel Zeile
Andre´

Hallo alle zusammen,
mit nachfolgenden Makro wird der letzte Zeile Wert der 2.Zeile angezeigt:
Sub Let() Dim LoLetzte As Long LoLetzte = IIf(IsEmpty(Cells(2, Columns.Count)), Cells(2, Columns.Count).End(xlToLeft).Column, _ Columns.Count) MsgBox Cells(2, LoLetzte) End Sub
jetzt m...
07.12.2008 19:21:00
Thread-ID: 1030898
4 Beiträge
Letzte Zeile mit bestimmten Wert finden
Harald

Hallo und schönen Abend
Ich suche in einer Spalte die Zeile mit dem letzten Vorkommen eines bestimmten Wertes. Im Netz habe ich folgenden Code gefunden.
Sub suchen() Set Ws1 = Sheets("Dummy") Call Find_Last("9999999999.999") End Sub
Sub Find_Last(FindString As String) Dim Rng A...
07.12.2008 19:37:02
Thread-ID: 1030899
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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