folgender befehl liefert mir z.b. B100 zurück
letzteZelle = Sheets(orgSheetName).Range("B" & Sheets(orgSheetName).Range("B65536").End(xlUp).Row).Address(0, 0)
wie muss ich die variable letzteZelle deklarieren?
danke euch.
Dim strLetzteZelle As String
Dim rngLetzteZelle As Range
'lang:
strLetzteZelle = Sheets(orgSheetName).Range("B" & _
Sheets(orgSheetName).Range("B65536").End(xlUp).Row).Address(0, 0)
'kürzer:
strLetzteZelle = Sheets(orgSheetName).Range("B65536").End(xlUp).Address(0, 0)
'Zelle selbst:
Set rngLetzteZelle = Sheets(orgSheetName).Range("B65536").End(xlUp)
MsgBox rngLetzteZelle.Address(0, 0)
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort