nachdem ich nach einer halben Stunde probieren nicht zu einem Ergebnis komme,
poste ich hier mal. Ich möchte einen Range mit einer Variablen füllen, damit
ich genau bis zur letzten benutzten Zelle zähle.
Im Detail möchte ich anstatt der zweiten Zeile so arbeiten:
Set rngBereich = Range("D7:ENumOfRow")
Egal wie, es klappt nicht, anscheinend kriege ich die richtige Syntax nicht hin!
Sub aaa
NumOfRow = ActiveCell.SpecialCells(xlLastCell).Row
Set rngBereich = Range("D7:E100")
rngBereich.ClearContents
End Sub