Macro copia e incolla

[marino51]

senza usare "finezze", ripeti il codice sotto riportato per le colonne che ti interessano
cambiando la colonna "A" indicata nel codice, con la colonna che ti interessa
(se ho capito bene la domandona)

Range("A4").Select
Selection.Copy
Range("A5:A" & UR).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
  :=False, Transpose:=False
Application.CutCopyMode = False