Can you copy cells with data only in a range? 1

[coolcarls]

I would like to copy only the cells that contain data in a selected range, and ignore cells with either a zero value or that contain nothing at all, is it possible?
Thanks in advance

 

[sfvb]

Here's an example:
Range("A1:A5&quot.Copy
Range("B1&quot.PasteSpecial Paste:=xlAll, Operation:=xlNone, _
SkipBlanks:=True, Transpose:=False

 

[sfvb]

Oops. I answered your subject line and not your post. The example I gave only works if the cells don't have data in them.