Try

Columns("A").Value = Columns("A").Value
Columns("D").Value = Columns("D").Value
Columns("Z").Value = Columns("Z").Value


--

HTH

Bob

"FIRSTROUNDKO via OfficeKB.com" <u15639@uwe wrote in message
news:a7430a13612b2@uwe...
Hi,

Is it possible to do a "Column Array" so you can copy paste special
Column's
A, D, Z

As

Range("A:A,D:D,Z:Z").SELECT
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False

Does not work

--
Message posted via http://www.officekb.com