Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
200to204
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
200to204
200to204
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Ermitteln der ersten freien Zeile.

Ermitteln der ersten freien Zeile.
10.01.2003 16:16:36
Michael
hallo spezialisten!
ich bin vba-anfänger und hätte ein anliegen.
möchte via usaform daten in eine tabelle eingeben. mein problem ist, wie ermittle ich die erste freie zeile in der tabelle.
wenn ich die daten in die textbox (10 stück) eingegeben habe, möchte ich nach der betätigung des buttons "speichern", dass die daten in der ersten freien zeile meiner tabelle "daten" (beginnend z.b. von A1 bis A10) gespeichert werden und das userform anschließend gelöscht wird aber aufgerufen bleibt.
habe nach meinen beschränkten möglichkeiten schon einiges versucht, funktioniert aber leider nicht. ersuche um hilfestellung.

mein derzeitiger stand:

Private Sub Speichern_Click()

Dim z As Double
z = 1

Do Until IsEmpty(Sheets("Daten").Cells(1, 1).Value)
z = 1

Loop

Set ws = Worksheets("Daten")
ws.Cells(2, 1) = X
ws.Cells(2, 2) = Y
....

Unload Me

End Sub

Das Ermitteln der ersten freien Zeile funktioniert nicht!!!!!

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Ermitteln der ersten freien Zeile.
10.01.2003 16:47:56
Chris
Hallo Michael

letztefreiezeile = Range("A65536").End(xlUp).Row + 1

Gruss
Chris

Anzeige

303 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige