letzte zelle doppelklick
23.01.2010 20:25:32
murat
Guten Abend,
ich habe ein makro das die letzte zeille einer spalte mir anzeigt und in einer msgbox ausgibt.
ich möchte das auf die zelle doppelt geklickt wird. d.h letzte zelle finden und doppelklick
Sub Schaltfläche5_KlickenSieAuf()
Dim letzteZelle As Long
letzteZelle = Worksheets("Tabelle1").Cells.Find(What:="*", _
After:=[B1], SearchDirection:=xlPrevious).Row
MsgBox "Letzte Zelle: " & Cells(letzteZelle, 2).Address
End Sub
vielen dankmurat