SAMCRO2014
Board Regular
- Joined
- Sep 3, 2015
- Messages
- 160
I am trying to copy a value in a cell to the blank cells below. I have the following:
Dim LastRow As Long
LastRow = PLSR.Cells(Rows.Count, 2).End(xlUp).Row
Copy Employee number in Column A to blank cells below
With Range("A1:A" & LastRow)
.SpecialCells(xlBlanks).FormulaR1C1 = "=R[-1]C"
.Value = .Value
End With
I keep getting a value of #REF . I can't see why. What I am missing?
Dim LastRow As Long
LastRow = PLSR.Cells(Rows.Count, 2).End(xlUp).Row
Copy Employee number in Column A to blank cells below
With Range("A1:A" & LastRow)
.SpecialCells(xlBlanks).FormulaR1C1 = "=R[-1]C"
.Value = .Value
End With
I keep getting a value of #REF . I can't see why. What I am missing?