Why not
For Each cell In Range("B7:B100")
If LCase(cell.Value) = "0" Then
cell.Resize(1, 5).ClearContents
End If
Next
to delete B:F for rows where the cell in B contains 0.
--
Regards,
Tom Ogilvy
"trward79" <(E-Mail Removed)> wrote in message
news:6CF6BEBD-3D99-4220-A300-(E-Mail Removed)...
> Nevermind, I set the followin in place
>
> For Each cell In Range("B7:F100")
> If LCase(cell.Value) = "0" Then
> cell.Resize(1, 5).ClearContents
> End If
> Next
>
>
>
> "trward79" wrote:
>
>> I have a spreadsheet that has alot of 0.00 values in a range of B8:F95 I
>> need
>> these values to be cleared so I can print with no values in place.
|