VB數(shù)組賦值定義？

arr(n)=cells(k,"k").row

這里獲得行號(hào)沒問題，問題出在數(shù)組上限可能溢出

過程開始只定義了arr(1to10)

如果j循環(huán)中，符合條件的單元格超過10個(gè)，那么arr(n)就溢出了

而已經(jīng)被注釋掉的redimpreservearr(n)放在那里也沒用，應(yīng)當(dāng)放在n=n+1之后，隨時(shí)擴(kuò)充arr上限才行