Я пытаюсь разработать простой код для заполнения пустых ячеек последней непустой ячейкой, как показано на рисунке:
Function FILL(x, y)
If Not IsEmpty(y) Then
FILL = y
Else
FILL = ActiveSheet.ActiveCell.Column.End(xlUp).Select.Value
End If
End Function
Код выше возвращает # ЗНАЧЕНИЕ! вместо пустых ячеек.