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

erste leere Zeile finden?

Forumthread: erste leere Zeile finden?

erste leere Zeile finden?
08.03.2007 10:03:00
{mskro}
Hallo Excelfreunde,
ich verstehe mal wieder die Welt nicht. Warum gibt mir die Befehlszeile nicht die erste leere Zeile zurück?
Sub test()
intRow = Cells(Rows.Count, 1).End(xlUp).Row + 1
End Sub

Gruß Manfred
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: erste leere Zeile finden?
08.03.2007 12:38:00
Harald
Hi,
Dein Code gibt die erste leere Zelle (nicht Zeile) in Spalte A zurück
Probiers mal so (hat den Nachteil das es auch bei leeren Zellen greift, die lediglich formatiert sind)
Sub zeile()
MsgBox UsedRange.SpecialCells(xlCellTypeLastCell).Row + 1
End Sub

Gruss Harald
Anzeige
nun gehts doch
08.03.2007 14:06:28
{mskro}
Hallo Harald,
natürlich die Zelle, sorry.
Aber es hatte nicht funktioniert. Ich hatte es im dazugehörigen Tabellenblatt stehen und nach dem Eintragen in ein separtes Modul funktionierte es dann doch. Ich wusste gar nicht, das das ausschlaggebend sein könnte.
Danke und Gruss
Manfred
Anzeige

Forumthreads zu verwandten Themen

erste leere ZELLE in Bereich (flexibel)
Dirk

Hallo an alle EXCEL-Spezialisten,
habe mal wieder ein VBA-Problem, das ich nicht gelöst bekomme u. suche ein Makro für den CommandButton "Ziel-2 / Bereich1" aus der UF (s. Blatt 'Quelle'):
Ich habe im Blatt 'Ziel-2' in A4 den Text "Beginn1" u. in A7 "Ende1" - diese sollen sozusagen als...
30.01.2008 18:17:00
Thread-ID: 947019
5 Beiträge
Anzeige
Button soll Zelle prüfen ggfs. Zellbereich leeren
André

Hallo Leute,
vollgendes Problem:
Ich habe einen CommandButton, der folgendes machen soll:
***
Wenn Click, dann prüfe Wert in Zelle D6
wenn Wert = "frei"oder "krank" oder "Url", dann leere Zellen im Bereich D7:D43
wenn Wert= "früh", dann schreibe in Zelle D21:D23 "Mittag...
18.09.2008 16:29:48
Thread-ID: 1010740
9 Beiträge
Mehrere Werte und Formeln übertragen VBA
Dennis
Hallo!
Ich versuche unsere Excel Tabelle zu optimieren. (https://www.herber.de/bbs/user/154995.xlsx)
Und zwar tragen wir hier Werte in Tabelle1 ein und anhand dieser Werte berechnen sich einige andere Sachen.
Früher wurde alles per Hand in eine Zeile eingetragen und dann die Formeln runt...
06.09.2022 12:56:20
Thread-ID: 1897394
2 Beiträge
Anzeige
Letzte leere Zeile in einem Zeilenbereich ermittel
Werner

Hallo,
ich möchte mit VBA einen Text in eine mehrspaltige Zeile übernehmen und zwar in die erste leere verfügbare Zeile. Die Zeilen sind nicht immer in allen Spalten belegt. Das heißt, dass die letzte Zeile auch leere Zellen haben kann.
Mit meinem Code ermittel ich bisher irgendwie nur...
07.05.2019 17:28:15
Thread-ID: 1691333
16 Beiträge
Suchformular stürzt ab :(
Andre
Hi :)
https://www.herber.de/bbs/user/152811.xlsm
alles kappt super - aber wenn die Spalte H der ID 2 länger ist dann kommt es zur folgendem Fehler:
Der Text ist zu lange in der Spalte H - (sind ca 4500 Zeichen)
Ist es zu viel beim Einlesen in die Listbox in der Userform1
Wie ka...
03.05.2022 10:39:18
Thread-ID: 1881974
6 Beiträge
Anzeige
Nummerierung
Ramadani
Hallo zusammen
Ich hab da ein Problem bei dem ich leider nicht mehr weiter komme und auch nichts passendes im Internet finde.
Und zwar geht es um folgendes:
Ich habe eine Liste wo fortlaufend neue Daten aufgenommen werden. Hierfür habe ich eine UserForm erstellt, um die benötigten Daten...
25.04.2022 23:17:47
Thread-ID: 1880914
5 Beiträge
Anzeige
Zweite Leere Zeile löschen
Benji

Hallo zusammen,
wie man eine leere Zeile löscht, ist mir bewusst. Sub LeereZeilenLoeschen() Dim i As Long Application.ScreenUpdating = False For i = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row To 1 Step -1 If Application.WorksheetFunction.CountA(Rows(i)) = 0 Then Rows(i).Delete...
30.07.2015 13:29:05
Thread-ID: 1439353
3 Beiträge
Zweite Leere Zeile löschen
Benji

Hallo zusammen,
wie man eine leere Zeile löscht, ist mir bewusst. Sub LeereZeilenLoeschen() Dim i As Long Application.ScreenUpdating = False For i = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row To 1 Step -1 If Application.WorksheetFunction.CountA(Rows(i)) = 0 Then Rows(i).Delete...
30.07.2015 15:09:49
Thread-ID: 1439403
2 Beiträge
Zweite Leere Zeile löschen
Benji

Hallo zusammen,
wie man eine leere Zeile löscht, ist mir bewusst. Sub LeereZeilenLoeschen() Dim i As Long Application.ScreenUpdating = False For i = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row To 1 Step -1 If Application.WorksheetFunction.CountA(Rows(i)) = 0 Then Rows(i).Delete...
31.07.2015 08:59:11
Thread-ID: 1439548
2 Beiträge
Zweite Leere Zeile löschen
Benji

Hallo zusammen,
wie man eine leere Zeile löscht, ist mir bewusst. Sub LeereZeilenLoeschen() Dim i As Long Application.ScreenUpdating = False For i = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row To 1 Step -1 If Application.WorksheetFunction.CountA(Rows(i)) = 0 Then Rows(i).Delete...
31.07.2015 08:59:29
Thread-ID: 1439549
1 Beitrag
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