Hi liebes Forum,

ich habe folgendes Problm und finde keine Lösung.

Ich suche in einem Workbook nach einem Eintrag "Note" (die Zelle des Eintrags "Note" darf varieren )

Set RangNote = Range(Cells(1, 1), Cells(ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row, ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Column)).Find("Note")
IntNote = RangNote.offset(?????,0).value

in den Zeilen direkt darunter befinden sich die einzelnen Noten der unterschiedlichen Fächer.
Die Anzahl der Zeilen ist uunbekannt 
in der allerletzen Zeile befindet sich allerdingst die Gesamtnote.
Wie kann ich einen Offset auf die letzte Zeile finden?

Danke für eure Hilfe

Grüße

Frank