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

Freie Zelle finden

Freie Zelle finden
11.01.2006 17:13:32
Frank
Wieder eine Frage von mir.
Wie kann ich über ein Makro die erste freie zelle in einer zeile finden?
Danke!!!!!!!

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Freie Zelle finden
11.01.2006 17:22:51
Ramses
Hallo
Bei deinem Level sollte auch Google bzw. die Recherche kein Problem sein.
Anyway
x = Range("IV1").End(xltoleft).column + 1
bringt die erste leere Spalte in Zeile 1
Alternativ mit Variablen
x = Range("IV" & Variable).End(xltoleft).column + 1
Gruss Rainer
AW: Freie Zelle finden
11.01.2006 17:22:53
Marc
Hallo,
hier wird z.B. die erste frei Zelle unter Spalte A gesucht.

Sub erste_frei()
Dim lRow As Long
With ActiveSheet
Range("A65536").End(xlUp).Offset(1, 0).Select
End With
End Sub

AW: Freie Zelle finden
11.01.2006 17:30:19
Panicman
Halo Frank,
versuchs mal hiermit: x = zeile

Sub Makro1()
x = 1
If IsEmpty(Cells(x, 1)) = True Then
Cells(x, 1).Select
Else
Cells(x, Cells(x, 1).End(xlToRight).Column + 1).Select
End If
End Sub

Gruß
Holger
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige