返回列表 上一主題 發帖

[發問] EXCEL VBA的陣列在迴圈中怎麼設定它是變動的

[發問] EXCEL VBA的陣列在迴圈中怎麼設定它是變動的

各位大大,
小的昨天那個問題之後又出現一個新的問題,
由於是改現行的程式所以有許多的迴圈在運作,
麻煩各位大大了,
謝謝!!!

問題來了:陣列怎麼在迴圈中設定呢??

for i=1 to x
陣列=(??,??)<--這個要怎麼去設定它呢?
next
ALK

回復 1# alexlkklin


    1維:
for i=1 to x
陣列(i)= 值
next

   2維:
for i=1 to x
for j = 1 to y
陣列(i,j)= 值
next
next
懂得發問,答案就會在其中

今日の一秒は  明日にない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

TOP

回復 2# kimbal
大大,
和您請教一個問題,
您的這個陣列是變動的大小嗎?
小的可能沒有說清楚,
小的是想要一個隨著迴圈而變動陣列範圍大小,
再麻煩大大您了,
謝謝!!!
ALK

TOP

回復 2# kimbal
大大再和您請教一個問題(昨天發問的)
如下................................................
小的目前在練習陣列的運用,
由於是把現行手上的程式拿來修改,
所以有些地方不清楚要怎麼修改,
請各位大大指導,
謝謝!!!

這個是我把一張表丟上自定的陣列中
TBOMcl = Sheets("表1").Range("a1").End(xlToRight).Column
TBOMro = Sheets("表1").Range("a65535").End(xlUp).Row     

在經過一系列的運算後,我要把陣列中的一欄取出做SUMIF的運算
Set rg7po = Range(Sheets("表1").[q2], Sheets("表1").[q65535].End(xlUp)) [這行是我原本定義做SUMIF索引值的]
小的的問題來了
Set rg7po = Range(Sheets("表1").[q2], Sheets("表1").[t65535].End(xlUp))
怎麼定義=後面的這個部份-紅色字的部份(這個在以前在小的檔案上是一個SHEET,目前己把這個SHEET讀進陣列中)
ALK

TOP

        靜思自在 : 道德是提昇自我的明燈,不該是呵斥別人的鞭子。
返回列表 上一主題