请问一下，EXCEL中如何实现An=An-1，但是如果An-1等于空，则An=An-2,直到得到一个非空的值

显示全部楼层 · 2011-3-9 16:06:42

n-1、n-2是下标吧？通过加一个宏，把n作为参数，调用下面的代码，就可以了。Private Sub getNotNull(n As Integer)
Dim iCol As Integer
iCol = n - 1
Do While Cells(1, iCol).Value = ""
iCol = iCol - 1
If iCol = 0 Then
Exit Do
End If
Loop
If iCol >= 1 Then
Cells(1, n).Value = Cells(1, iCol).Valu

千问 · 2011-3-9 16:06:42

An-1不可能等于空，应该是等于0吧？没明白楼主的意思。可以这样想，如果想要等于0,那就An=An-N(N=An)。