Dear Excel community,
Currently I have a column that looks like this,
<colgroup><col width="64" style="width:48pt"> </colgroup><tbody>
</tbody>
Is there a VBA that can help populate the blank cells above to become the following:
<colgroup><col width="64" style="width:48pt"> </colgroup><tbody>
</tbody>
My existing formula is as such but it only will fill if I select the column up till the row I want
On Error Resume Next
With Selection.SpecialCells(xlCellTypeBlanks)
.FormulaR1C1 = "=R[+1]C"
.Value = .Value
End With
End Sub
Help greatly appreciated!! Thank you!!
Currently I have a column that looks like this,
Mango |
Apple |
Orange |
Pear |
<colgroup><col width="64" style="width:48pt"> </colgroup><tbody>
</tbody>
Is there a VBA that can help populate the blank cells above to become the following:
Mango |
Apple |
Apple |
Apple |
Orange |
Orange |
Orange |
Pear |
Pear |
Pear |
<colgroup><col width="64" style="width:48pt"> </colgroup><tbody>
</tbody>
My existing formula is as such but it only will fill if I select the column up till the row I want
On Error Resume Next
With Selection.SpecialCells(xlCellTypeBlanks)
.FormulaR1C1 = "=R[+1]C"
.Value = .Value
End With
End Sub
Help greatly appreciated!! Thank you!!