[VB6] Chiarimento del IF...Else

[leomac]

Yuppie!!
Tutto apposto, ho risolto:

Sub Macro1()
conta = Application.WorksheetFunction.CountA(Range("A2:B3"))
If Range("B2") = 0 And conta > 0 Then
MsgBox "Attenzione!!"

avevo provato anche con CountIf ma trovavo problemi se le celle erano occupate da caratteri.
Grazie a tutti!!