相关疑难解决方法(0)

我想使用上面单元格的值填充所有空单元格

state  name
IL     Mike 
       Sam
CA     Kate
       Bill
       Leah

应如下

   state  name
    IL     Mike 
    IL     Sam
    CA     Kate
    CA     Bill
    CA     Leah

我尝试了以下内容

Sub split()
Dim columnValues  As Range, i As Long 

Set columnValues = Selection.Area

Set i = 1
For i = 1 To columnValues.Rows.Count   
    If (columnValues(i) = "") Then
    columnValues(i) = columnValues(i - 1)
    End If
Next

End Sub

我设置时出错i.我该如何修改我的代码