Функция VBA для заполнения пустых ячеек последним непустым значением - PullRequest
0 голосов
/ 04 февраля 2020

Я пытаюсь разработать простой код для заполнения пустых ячеек последней непустой ячейкой, как показано на рисунке:

enter image description here

Function FILL(x, y)

If Not IsEmpty(y) Then

FILL = y

Else

FILL = ActiveSheet.ActiveCell.Column.End(xlUp).Select.Value

End If

End Function

Код выше возвращает # ЗНАЧЕНИЕ! вместо пустых ячеек.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...