Error 1004:Method 'Range' of object '_Worksheet' failed

Dim i As Integer

Dim aps As Worksheet
Set aps = ThisWorkbook.Worksheets("Data")

i = ThisWorkbook.Worksheets(2).Range("c6000").End(xlUp).Row - 1

aps.Range(Cells(2, 12), Cells(i, 12)).ClearContents

getting an error at te end of line.. any suggestions?

Hi & welcome to the board.
Try

Please Login or Register  to view this content.

Thank you so much! It's working

You're welcome & thanks for the feedback