Leerbereich zwischen Zellen auswählen

[VBATartar]

Hallo Leute,

die ganze Geschichte hier wurde zwar erfolgreich von SNB gelöst. Mich würde aber trotzdem folgendes brennend interessieren, was hier im Thread vom Fragesteller auch schon angesprochen wurde.

Kann man den Index des Areas-Bereiches, in dem sich eine aktive Zelle befindet direkt bestimmen? Oder muss man hier immer auf die for-each Schleife zurückgreifen?

[Kuwer]

Hallo,

Kann man den Index des Areas-Bereiches, in dem sich eine aktive Zelle befindet direkt bestimmen? Oder muss man hier immer auf die for-each Schleife zurückgreifen?

nein, das geht nicht direkt.

Gruß Uwe

[VBATartar]

Danke für Deine klare und kompetente Antwort!

[schauan]

Hallöchen,

auch wenn's nicht gefragt war - man könnte zumindest den Bereich um die leere Zelle ohne Schleife und ohne Areas ermitteln. Das Makro hat noch Verbesserungspotential, siehe Hinweise.

Code:

Sub LeererBereich()
'Gibt den leeren Bereich um eine Zelle im leeren Bereich aus
'Hinweise:
'Für A1 leer und aktive Zelle in A1 oder damit zusammenhängendem Bereich der Spalte Änderung nötig
'Für Unterdrückung einer Ausgabe bei Ausführung in einer gefüllten Zelle  Änderung nötig
MsgBox Range(Cells(ActiveCell.End(xlUp).Row + 1, ActiveCell.Column), Cells(ActiveCell.End(xlDown).Row - 1, ActiveCell.Column)).Address
End Sub