avviso nel caso alcuni campi fossero vuoti

[Pirelli72]

Ammesso che io abbia 3 fogli e debba controllare le celle A1,A2,A3 di ciascun foglio:

For Each C In Application.Worksheets
  For Each R In C.Range("A1:A3")
   If R.Value = 0 Then
   MsgBox ("Attenzione")
   End If
Next R
Next C

Qualcosa del genere?