Clear Cells based on User Input Box to define Row Number

[Lisa W]

Hi I have the code below which works well, however I need it to be based on both columns C & J. So if "C" is empty / blank then Clear Contents of "J". I have tried several ways to add "J" into the range without success. Any help would be greatly appreciated:

Public Sub RAG_Click()
'To Clear RAG Status and re-enter'
Dim x As Integer
ActiveSheet.Unprotect
x = InputBox("Please Enter the Row Number")
Range("C" & x).ClearContents
ActiveSheet.Unprotect
End Sub

 

[Joe4]

Ahh, will do. Do I need to do anything else?

Nope, that is it!