Fill in the blanks!

Try this

On Error Resume Next
Range("A1:D5").SpecialCells(xlCellTypeBlanks).Value = 0
On Error GoTo 0


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


"Bhupinder Rayat" <BhupinderRayat@discussions.microsoft.com> wrote in message
news:2B709652-2ADB-456F-8387-6B562A48C8A8@microsoft.com...
>

This way works great as well.


Apologies for the repeated thread, I wasn't getting the prompt box to say my
message had been posted.

Thanks again,

Pinda.

"Ron de Bruin" wrote:

> Try this
>
> On Error Resume Next
> Range("A1:D5").SpecialCells(xlCellTypeBlanks).Value = 0
> On Error GoTo 0
>
>
> --
> Regards Ron de Bruin
> http://www.rondebruin.nl
>
>
> "Bhupinder Rayat" <BhupinderRayat@discussions.microsoft.com> wrote in message
> news:2B709652-2ADB-456F-8387-6B562A48C8A8@microsoft.com...
> >
>
>
>