Übergabe Range-Objekt
04.08.2019 11:09:28
Jens
ich bin dabei, in meinem Code mehr mit Objekten zu arbeiten....
Warum führt folgender einfacher Test schon zu einer Fehlermeldung 'Objekt erforderlich' bei Aufruf der Funktion?
Auch die Überwachung von Range("A1:B10") zeigt definitiv ein Objekt/Range an.
Public Function fctLastRow2(Rng As Range) As Long
fctLastRow2 = Rng.Find(What:="*", after:=Rng.Cells(1, 1), LookIn:=xlValues, SearchOrder:= _
xlByRows, SearchDirection:=xlPrevious).Row
End Function
Sub test()fctLastRow2 (Range("A1:B10"))
MsgBox fctLastRow2
End Sub
Danke, Jens