Letzte benutzte Zelle per VBA aus Bereich ermitteln?

11/10/2007 - 13:02 von Reiner | Report spam
Hallo zusammen,
ich muß aus einem Bereich B3:B29 die letzte benutzte Zelle ermitteln.
Die letzte benutzte Zeile aus der Spalte kann ich nicht benutzen, da
unterhalb des
Bereiches noch Werte stehen die nicht berücksichtigt werden dürfen.
Im Bereich stehen Textwerte!
Ich danke euch im voraus.
MfG
Reiner
 

Lesen sie die antworten

#1 Lorenz Hölscher
11/10/2007 - 13:38 | Warnen spam
Hallo Reiner,

ich wüßte nicht, daß so ein Objekt (die *zeitlich* zuletzt benutzte
Zelle oder die ràumlich zuunterst stehende?) bei Excel automatisch
mitgeführt würde. Du könntest es aber selber mitprotokollieren:

Dim rngLetzteZelle As Range

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Set rngLetzteZelle = Target
End Sub


Dieser Code muß in dem zugehörigen Tabellen(!)-Modul stehen.
Allerdings wird jeder(!) Wechsel zu einer anderen Zelle, also auch
ohne Änderung deren Inhalts, protokolliert. Ein Ereignis für die
Zellànderung in einer Tabellenzelle fàllt mir so nicht ein. Du
könntest auf das passende Workbook-Ereignis zurückgreifen:

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As
Range)
MsgBox "Sheet change: " & Sh.Name
End Sub

Dieser Code muß in "DieseArbeitsmappe" stehen. Wenn Du auf
rngLetzteZelle zugreifen will, muß die Deklaration natürlich "public"
und in einem echten Modul stehen.

tschö, Lorenz

Ähnliche fragen