Excel: Per Makro die letzte Zelle einer Spalte anspringen

Excel enthΣlt standardgemΣ▀ keine Funktion, um innerhalb einer Makroroutine oder wΣhrend der normalen Arbeit in der Tabelle die letzte Zelle einer Spalte anzuspringen. M÷chten Sie aber bei umfangreichen Tabellen per Mausklick zur letzten Zelle einer Spalte springen oder innerhalb eines Makros den letzten Eintrag finden, verwenden Sie folgendes einzeilige Makro:
»Sub Spaltenende()Wenn IstLeer(ZelleListe(16384; AktiveZelle.Spalte))
Dann ZelleListe(16384; AktiveZelle.Spalte).Ende(xlNachOben).AuswΣhlen Sonst ZelleListe(16384; AktiveZelle.Spalte).AuswΣhlen Ende Sub« Diese Routine springt zunΣchst die letzte Zelle der aktuellen Spalte an und sucht dann von unten nach oben nach der ersten Zelle, die nicht leer ist.