I have a sheet that in column A i will list equipment then in other columns have questions with drop down for yes/no. What I want to do is keep the drop downs from working if column A is empty or blank. I have tried this code but it doesn't function correctly. Thanks

If WorksheetFunction.CountA(Range("A" & RowNum)) < 1 Then
Range("F" & RowNum & ":O" & RowNum).Select
Selection.ClearContents
Range("F" & RowNum).Select
MsgBox "Must have equipment to have a value"
End If