用VBA写以下程序:用for和dowhile循环语句写
如果,单元格中有信息,不做处理。
如果单元格中没有信息,填充上一个单元格的信息:相当于Excel单元格中的下拉复制
题主要的代码如下
Sub copycell()
For i = 2 To 10
If Range("B" & i).Value = "" Then
Range("B" & i).Value = Range("B" & (i - 1)).Value
End If
Next
End Sub