Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 17:19:09
Formel mit Index-Funktion
24.04.2024 16:19:42
SummeWenn / SummeWenns mit Bedingung wenn kleiner als dann
24.04.2024 14:48:50
"Eingabefeld" zwischen zwei Zeilen geht nicht weg.
24.04.2024 14:40:10
Zeilenumbrüche in Textbox zählen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
232to236
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
232to236
232to236
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

erste freie Zelle in variablen Bereich ermitteln

erste freie Zelle in variablen Bereich ermitteln
18.03.2003 08:14:49
Florian Siever
und dort einen wert eintragen.
Habe folgendes Problem :
Ich habe ein Userform und mittels eines DropDownfeldes wähle ich einzelne Werte aus, denen jeweils ein bestimmter bereich der tabelle zugewiesen ist. ( BSP : A2:E7, A9:E14 usw. ).
Sobald ich diesen bereich habe, will ich in diesen bereich, und zwar in die erste freie zelle, einen wert aus einer textbox eintragen. Nun habe ich das Problem, das ich irgendwie die erste freie zelle dieses bereiches bestimmen muss.
kann mir da wer helfen ?
ich habe hier zwar schon gesucht, aber nichts passendes gefunden.
Danke
Florian

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

Betreff
Datum
Anwender
Anzeige
Re: erste freie Zelle in variablen Bereich ermitteln
18.03.2003 08:51:32
Ron Andres
Hi,
Du kannst ne Schleife benutzten. In der Form:
i = 1
Do while Cells(i,y) <> ""
i = i+1
Loop

i ist die Zeilennummer, y die Spaltennummer

Die Schleife läuft solange, bis die erste Leere Zelle gefunden wurde.

Re: erste freie Zelle in variablen Bereich ermitteln
18.03.2003 13:13:46
Klaus-Dieter
Hallo Florian,

es geht auch ohne Schleife:


Option Explicit

Sub leere_Zelle()

' Sucht in Spalte A nach der ersten leeren Zelle

' und gibt die Zeilennummer in Zelle B1 aus

Dim LeereZelle As Integer

LeereZelle = Range("A1").End(xlDown).Row + 1

Cells(1, 2) = LeereZelle

End Sub

Code eingefügt mit: Excel Code Jeanie

Gruß Klaus-Dieter
Klaus-Dieter's Excel und VBA Seite

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige