Copy&Past Cell Value from one Column to another using VBA

[bdb1974]

Hello all,

I'm trying to paste values from D9:D to F9:F on the same sheet for

thanks,

bdb

[bdb1974]

Ok, I found this.

Sub TestDis()
Sheets("Yard").Range("D9:D866").Copy
Sheets("Yard").Range("F9:F866").PasteSpecial (xlPasteValues)
Application.CutCopyMode = False
End Sub

This works fine.

bdb