Delete zeros in Excel...

[scubadiver007]

This is a part of my code

    With xlSheet
        .Range("D6").CopyFromRecordset rst
        
    End With

Can I include an extra command in there to delete all whole cases of zeros before saving the sheet?

 

[steveboydon]

Replace(.Range("D6"),"0","")

Dirty but has worked for me in the past. However, I normally do it by cell reference.


Hope this helps

Steve