Hi Géraldine,

If you need to do this programmatiacally, try :

Sub Tester()
Dim rng As Range

Set rmg = Range("A1:B20") '<<========== CHANGE
With rng
.SpecialCells(xlCellTypeBlanks).FormulaR1C1 _
= "=R[-1]C"
.Value = .Value
End With

End Sub


---
Regards,
Norman



"Kanga" wrote in message
...
Hi,
I have pivot tables that I need to convert into plain columns. So I copy
and
paste the values into a new worksheet. Is there a way that I can (with a
macro) fill in the blank cells with the value located in the cell right
above? Keeping in mind that the cell length will vary...
Thanks in advance!
Géraldine