Autofill empty cells with content from the first cell above the empty cells in Microsoft Excel

Autofill empty cells with content from the first cell above the empty cells in Microsoft Excel

Non Macro Solution

Select the first cell that have the content that need to be paste to the empty cells.
Scroll down to the last empty cells below the first cell that needed to be fill.
Hold shift and select the last cell.
Ctrl + D

Macro Solution

Sub fill_cells()
    Selection.SpecialCells(xlCellTypeBlanks).Select
    Selection.FormulaR1C1 = "=R[-1]C"
    Range(Cells(1, 1), Selection.SpecialCells(xlCellTypeLastCell)).Select
    Selection.Copy
    Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
End Sub

References:

My Excel Pages -- David McRitchie (Fill The Empty Cells)

Comments