Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1504to1508
1504to1508
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Letzte ausgefüllte Zeile ermitteln.

Forumthread: Letzte ausgefüllte Zeile ermitteln.

Letzte ausgefüllte Zeile ermitteln.
14.07.2016 18:37:27
Daniel
Hallo Leute,
ich denke für euch ist es eine Kleinigkeit.
Ich suche ein Makro das mir folgendes ausgibt:
Beispiel:
0 A B C D
1 h
2 a
3 b
4
5
jetzt möchte ich, dass das Makro mir ermittelt das in Zeile 3 der letzte Wert in A ist. Nun möchte ich das er mir die 3 abspeichert als Variable.
Wofür ich das brauche?
Um einen Bereich festlegen zu können innerhalb des Makros.
Danke im Vorraus :)

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Letzte ausgefüllte Zeile ermitteln.
14.07.2016 18:44:36
Hajo_Zi
LoLetzte = IIf(IsEmpty(Cells(Rows.Count, 1)), Cells(Rows.Count, 1).End(xlUp).Row, Rows.Count)

AW: Letzte ausgefüllte Zeile ermitteln.
14.07.2016 19:01:38
Daniel
Besten dank funktioniert super.
Ich weiß nicht wieso ich grad nicht drauf komme, wie bekomme ich das jetzt in die Range?
Die Spalte ist immer die selbe "J" also soll da jetzt anstelle des x J loletzte
Bsp: J13 loletzte ist als 13 ermittelt worden
loletzte = IIf(IsEmpty(Cells(Rows.Count, 1)), Cells(Rows.Count, 1).End(xlUp).Row, Rows.Count)
wb.Sheets(1).Range("A3:x").Copy
Danke nochmal ! :)

Anzeige
AW: Letzte ausgefüllte Zeile ermitteln.
14.07.2016 19:03:12
Hajo_Zi
wb.Sheets(1).Range("A3:x" & Loletzte).Copy
Gruß Hajo

AW: Letzte ausgefüllte Zeile ermitteln.
14.07.2016 19:06:01
Daniel
Danke Hajo :)

AW: Letzte ausgefüllte Zeile ermitteln.
14.07.2016 19:08:45
Werner
Hallo Daniel,
Sub Daniel()
Dim loLetzte As Long
Dim Inhalt As Variant
loLetzte = Sheets("Tabelle1").Cells(Rows.Count, 1).End(xlUp).Row
Inhalt = Sheets("Tabelle1").Cells(loLetzte, 1).Value
MsgBox "Letzte belegte Zeile ist Zeile: " & loLetzte
MsgBox "In der letzten Zelle steht: " & Inhalt
End Sub
Das Tabellenblatt mußt du ggf. anpassen. Die Variable Inhalt habe ich mal als Variant definiert, da ich letztlich nicht weiß was in den Zellen steht.
Gruß Werner
Gruß Werner

Anzeige
AW: Letzte ausgefüllte Zeile ermitteln.
14.07.2016 19:17:02
Hajo_Zi
diese Zeile
loLetzte = Sheets("Tabelle1").Cells(Rows.Count, 1).End(xlUp).Row
liefert das falsche Ergebnis falls letzte Zelle in Spalte gefüllt.
Gruß Hajo

AW: Letzte ausgefüllte Zeile ermitteln.
14.07.2016 19:21:16
Werner
Hallo Hajo,
danke für den Hinweis.
Gruß Werner

Anzeige
AW: Letzte ausgefüllte Zeile ermitteln.
14.07.2016 19:38:17
Daniel
Es hat alles funktioniert :)
Ich kann mir nur Bedanken!

Forumthreads zu verwandten Themen

Thin Client und VBA
Lukas
Hallo
Kann mir jemand sagen ob bei einer Umstellung auf ein Thin Client System mit Problemen zu rechnen ist. ich meinen Excel Makros. Ich mein jetzt nicht das wenn in einem Makro ein Pfad auf die Festplatte angegeben ist das man den ändern muss ist mir schon klar. Würde bspw. solche Sub's Lau...
07.03.2017 22:27:19
Thread-ID: 1546061
10 Beiträge
Schleifen und unterschleifen
Carsten

Hallo VBA-Gemeinde,
ich versuche in EXCEL-VBA eine Datentabelle auszuwerten.
Bei der Datentabelle handelt es sich um eine Liste mit
Spalte A ==> Artikelnummer
Spalte B ==> Datum
Spalte C ==> Nummer
Spalte D ==> Lager
Spalte E ==> Menge
Jede Artikel...
02.05.2018 23:44:11
Thread-ID: 1622576
3 Beiträge
Anzeige
VBA Fehler -2147417848
Grünauer

Hallo Experten, hallo Helfer,
ich komme einfach nicht weiter bei meiner benötigten Datei und bevor ich jetzt ganz verzweifle meine Bitte an Euch eine Blick darauf zu werfen. Ihr habt bestimmt die Lösung dafür.
Beim Schließen der Excel Datei soll in der "Tabelle1aktiv" jeder Datensatz de...
12.12.2016 14:29:30
Thread-ID: 1529720
2 Beiträge
Anzeige
VBA script mit 2 Quelldateien
Andreas Hofmann
Servus zusammen,
ich habe ein VBA-Problem und komme einfach nicht auf die Lösung. Ich habe nun 2 Tage mit chatGTP gesprochen und jede Menge Code-Vorschläge erhalten, aber die Spalte U wird in der Zieldatei einfach nicht befüllt. Ich bin kein VBA-Fachmann und tue mich schwer in der Lösungsfindung...
26.01.2024 16:05:34
Thread-ID: 1962253
2 Beiträge
Daten dynamisch kopieren von Datei zu Datei
Peter Pak
Hallo,
ganz kurz gesagt. Ich habe nicht viel Ahnung von VBA und habe folgendes Problem bei dem mir hoffentlich jemand helfen kann.
Ich lade mir aus einem Programm wöchentlich immer eine Datei "Anlage" im Excelformat welche eine feste Größe an Spalten von 33 hat. Jedoch hat diese Datei jed...
04.04.2016 11:22:43
Thread-ID: 1485743
2 Beiträge
VBA für Organisation einer Mitgliederliste
ISchae
Hallo an alle,

benötige mal wieder Schwarmwissen für eine vielleicht etwas kompliziertere Sache.

Beispieldatei: https://www.herber.de/bbs/user/179814.xlsx

Ich möchte in dieser Mitgliederliste mit Makros arbeiten und folgendes soll passieren:
Ausgangstabellenblatt ist "...
10.12.2025 13:27:39
Thread-ID: 2022032
4 Beiträge
Code anpassen-suchen-zusammenzählen
Becker

Hallo Leute!
Habe ein Problem, und hoffe irgendeiner kann mir helfen.
Da ich der Anfänger bit traue ich mich noch nicht selber den Code von Klaus-Dieterman (s.u.) zu verändern.
Ich habe in Tabelle1 eine Liste mit Artikel Numer(ab A2), Artiken Name (ab B2) und Stück Anzahl (ab C2)
24.04.2008 23:36:29
Thread-ID: 972125
3 Beiträge
VBA letzte Zeile finden und Leerzeichen in der Zeile löschen
Robert

Hallo,
wahrscheinlich eine ganz einfache Geschichte, aber ich beiße mir gerade die Zähne aus :-)
Ich importiere Daten aus einer Outlook Mail in ein Tabellenblatt. Dummerweise importiere ich dabei wohl auch hinter jeden der getrennten Datensätze ein Leerzeichen mit und das stört eigentli...
02.12.2019 18:29:01
Thread-ID: 1726786
3 Beiträge
Programmierteil für mehrere Tabellen wiederholen
Hans

Servus ihr lieben Excelaner,
ich habe folgendes Problem und bräuchte euren Rat dazu:
Es existiert eine Excel-Mappe mit 1. einer Tabelle "Abfrage" - hier wird per Knopfdruck eine SQL-Abfrage von unserer Datenbank vorgenommen und die Spalten in "Abfrage" werden anschließend mit Daten gefü...
20.12.2016 13:41:05
Thread-ID: 1531058
1 Beitrag
Letzte beschriebene Zelle finden
Lutz

Hallo Excelfreunde,
wie kann man mittels VBA über eine UF in einem Sheet die letzte beschriebene Zelle in Spalte H ermitteln und danach den Inhalt der darunter liegenden Zeilen
löschen und evl. durch Zeilenumbruch vergrößerte Zeilen wieder auf die
Standardhöhe bringen!
Gibt es d...
12.03.2006 20:43:57
Thread-ID: 743390
6 Beiträge
Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum