wrong numbers of arguments or invalid property

[Tom31]

Hi, all!

Got some issues with my macro.
It is a very basic, simple macro, but for some reason, it stops working:

Is there any chance anyone knows how to fix it?

Here below is the PrintScreen from Excel, and macro itself.

Range.jpg



Sub Performances_Clear()

Dim Answer As Integer


Answer = MsgBox("Do you want to delete the data?", vbYesNo + vbCritical, "Delete Data")

If Answer = vbYes Then

range ("C6:C105")
range("C111:C210").ClearContents
range("F6:F105").ClearContents
range("F111:F210").ClearContents

range("C6:C105").ClearComments
range("C111:C210").ClearComments
range("F6:F105").ClearComments
range("F111:F210").ClearComments

range( _
"G6:G105,H6:H105,I6:I105,J6:J105,K6:K105,L6:L105,M6:M105,N6:N105,G111:G210,H111:H210,I111:I210,J111:J210,K111:K210,L111:L210,M111:M210,N111:N210" _
).Select
Selection.ClearContents

range( _
"G6:G105,H6:H105,I6:I105,J6:J105,K6:K105,L6:L105,M6:M105,N6:N105,G111:G210,H111:H210,I111:I210,J111:J210,K111:K210,L111:L210,M111:M210,N111:N210" _
).Select
Selection.ClearComments

range("C6").Select

Else: MsgBox "Canceled"

End If

[rorya]

It looks like you have named something 'range' - probably a variable or function. That's not a good idea, so I suggest you change its name to something else.

[Tom31]

It looks like you have named something 'range' - probably a variable or function. That's not a good idea, so I suggest you change its name to something else.

Thank you, sir! I did indeed!