EXCEL認真看清楚VBA原來那個

2022-11-25 04:31:01 字數 775 閱讀 9417

1樓:匿名使用者

sub test()

dim arr, i%, n%, m%, t$n = [b65536].end(3).rowm = cells(n, 2).

end(3).rowarr = cells(m, 2).resize(n - m + 1)

n = 1

m = 1

for i = 2 to ubound(arr)if arr(i, 1) = arr(i - 1, 1) thenn = n + 1

else

if n > m then

m = n

t = arr(i - 1, 1)

end if

n = 1

end if

next

if n > m then

m = n

t = arr(i - 1, 1)

end if

[f24] = m

[c24] = t

n = 0

i = ubound(arr)

while arr(i, 1) = [c23]n = n + 1

i = i - 1

wend

[f23] = n

end sub

源**有些許錯誤,在原基礎上進行了更改。

2樓:匿名使用者

那麼囂張,你付了多少錢?!

3樓:慶年工坊

測試過的不會錯,你可以改變你的資料試一下看這個

有哪些問題要在婚前看清楚

我覺得對方的家庭,對方的脾氣習慣都要看清楚。說到另一半的出現,許多人會滔滔不絕。能真正談論愛情,什麼原則,要求,都在後面。整個人都沉浸在荷爾蒙創造的甜蜜氣氛中。無論我愛這個人還是這種愛的感覺,我都說不清楚。愛情可能是盲目的,但要找到一個終身伴侶,我們必須理性思考以下問題。出身對一個人的影響是巨大的,...

電腦二啟問題,不是自動重啟,看清楚

1全部個人認為 1 硬碟的固定螺絲有點緊 硬碟螺絲要是擰緊了會導致硬碟的直接損傷,只要固定上,手使勁擰不動就可以了 2 cpu風扇轉速問題 由於風扇的轉速是預出廠調好的,所以轉速或者該加軸油都可以歸為風扇問題 3 cpu上的矽膠不均勻 cpu和風扇之間的矽膠如果不均勻,若是多了會有很嚴重的怪問題出現...

只有金錢,才能讓你看清楚人的本質

對。愛好錢財之人。會不惜代價。不愛錢的人只會要自己愛的人或者物體 錢不可以代表一切,但是錢可以讓你看清一個人的本性及人品 誰都希望有錢,只是特別嫌棄那種滿身銅臭味的。望採納 自古有人為財死,鳥為食亡的說法 看的角度不同,結果也就不一樣了 不管是友情,親情,愛情,你拿錢砸下試試 能看清別人,不一定能看...