首頁猿問如何實現(xiàn)以下內(nèi)容，求解～

如何實現(xiàn)以下內(nèi)容，求解～

數(shù)據(jù)結(jié)構(gòu) API

阿波羅的戰(zhàn)車 2022-12-21 19:15:17

在一列中0-9個數(shù)字重復(fù)但不連續(xù)出現(xiàn)，比如1在B1出現(xiàn)，后又在B23出現(xiàn)，B34出現(xiàn)，一直重復(fù)，如果要要計算出最后一次出現(xiàn)的數(shù)字到現(xiàn)在有幾行沒出現(xiàn)。這一列的數(shù)字會不段更新添加重復(fù)。如果1在B1和B22出現(xiàn)，但數(shù)據(jù)已經(jīng)輸入到B43了，我要計算B43到B22之間的行數(shù)，如果在輸入到B44時又出現(xiàn)1，結(jié)果為0，以后就這樣循環(huán)下去了，0-9個數(shù)字都要分別計算。

查看完整描述

2 回答

陪伴而非守候

TA貢獻1757條經(jīng)驗獲得超8個贊

可以使用rightb函數(shù)

RIGHTB(text,num_bytes)

語法：
text：表示要從中提取指定字節(jié)數(shù)的文本。
num_bytes：表示提取字符的個數(shù)，按字節(jié)計算。

D1=rightb(C1,14)
D2=rightb(C2,14)

反對回復(fù) 2022-12-25

開滿天機

TA貢獻1786條經(jīng)驗獲得超13個贊

用這個宏就可以很好地解決。（第一次出現(xiàn)的數(shù)字，結(jié)果為 -1）

Function look(target As Range) As Integer
targetValue = target.Text
i = 1
found = False
look = -1
stat = target.Row()
While stat - i > 0 And Not found
If target.Offset(-i, 0).Text = targetValue Then
look = i - 1
found = True
End If
i = i + 1
Wend
End Function

比如數(shù)據(jù)在A列，那在其他列，比如C列的C1輸入 =look(A1)，向下復(fù)制即可。