I have a range of cells named "Reuse_Estimate" (B22:B24 in my worksheet) that
need to have something entered in all cells. Once a value is entered in all
cells, I need to check that the range named "Reuse_Total" is a specific
value. I have the code for the latter, but am not sure how to check that the
Reuse_Estimate ranges are not blank. Any suggestions?

Thanks

Hi Barb

You can use the counta function

Sub test()
If Application.WorksheetFunction.CountA(Range("Reuse_Estimate")) = 3 Then
'Do nothing
Else
MsgBox "Please fill in all cells"
End If
End Sub


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Barb Reinhardt" <(E-Mail Removed)> wrote in message
news:07EF586E-D6A7-4758-BCAD-(E-Mail Removed)...
>I have a range of cells named "Reuse_Estimate" (B22:B24 in my worksheet) that
> need to have something entered in all cells. Once a value is entered in all
> cells, I need to check that the range named "Reuse_Total" is a specific
> value. I have the code for the latter, but am not sure how to check that the
> Reuse_Estimate ranges are not blank. Any suggestions?
>
> Thanks