Needed to update rows in an excel document for a project called Time For Water, based on data @wasatnt released.

FillRows.vb

Sub FillRows()
    For i = 1 To ThisWorkbook.Sheets.Count
     Sheets(i).Activate
    'You can add more code
    With ActiveSheet
        Dim lRow As Long
        Dim lCol As Long
        
        lRow = Cells(Rows.Count, 3).End(xlUp).Row
        lCol = Cells(1, Columns.Count).End(xlToLeft).Column
        
            For j = 2 To lRow
                For k = 1 To lCol
                    With Cells(j, k)
                        If (.Value = "") Then
                            .Value = Cells(j - 1, k).Value
                            'Debug.Print .Value
                            'Debug.Print i & ": " & j & " - " & k & " > " & lRow
                            
                        End If
                    End With
                Next k
            Next j
    End With
    Next i
    Debug.Print "done, bro"
End Sub