Функция Excel заполнить ячейки

Question

Рассмотрим следующие данные в Excel:

1|0.2
2|0.2
3|3.4
4|
5|1.5
6|1.8
7|
8|4.2

Напишите функцию VBA, которая просматривает выделенную область, находит пустые места и затем заполняет их числовым значением, которое передается через сигнатуру функции. Выход: Числа

1|0.2
2|0.2
3|3.4
4|0
5|1.5
6|1.8
7|0.0
8|4.2

Привет всем, у меня есть вопрос выше.

Мне было интересно, сможет ли кто-нибудь взглянуть на мой код и сказать, что не так с моим кодом.

Public Function MyFill(thisRange As Range)
Dim x As Range
Set x = thisRange
ReDim Y(x.Length)
Dim i As Integer
For Each x In thisRange
    If (x.Value = Empty) Then
        Y(i) = 0
        i = i + 1
    End If
    Y(i) = x.Value
Next x
MyFill = Y
End Function

Answer 1

Public Function MyFill(thisRange As Range)
Dim X As Range
Set X = thisRange
MyFill = X
End Function

Видимо, ответ, который я искал, намного проще, чем я думал.