How do I use countblank in a macro, I got as follows but it gives me an error

Sub Clear()
If CountBlank(ActiveCell.Resize(1, 19)) 0 Then
Range("A1").Select
Else
Range("B1").Select
End If
End Sub