返回列表 上一主題 發帖

請教2D Array reversed 問題

cmo140497

帖子
95 
主題
29 
精華
0 
積分
150 
點名
0  
作業系統
windows2003 
軟體版本
office 2003 
閱讀權限
20 
性別
男 
來自
Kaoshiung 
註冊時間
2010-11-5 
最後登錄
2018-2-8 
1# 跳轉到 » 正序看帖
打印
tT
發表於 2013-1-29 19:57 | 只看該作者

請教2D Array reversed 問題

Dear 大大及版主 :
不好意思,有一問題請教2D 陣列數值,該如何做Columns的翻轉,Rows則不變,希望各位高手及版主不吝指導,感恩!



2D Array filp 問題_2013-01-29.zip (14.01 KB)
收藏 分享

stillfish00

帖子
1018 
主題
15 
精華
0 
積分
1058 
點名
0  
作業系統
win7 32bit 
軟體版本
Office 2016 64-bit 
閱讀權限
50 
性別
男 
來自
桃園 
註冊時間
2012-5-9 
最後登錄
2022-9-28 
4#
發表於 2013-1-30 09:32 | 只看該作者
回復 3# cmo140497
將Range中的所有儲存格的值一次性取出到陣列
對陣列個別元素做處理(速度較快) , 再將陣列中的值一次性賦予儲存格
這是增進程式效率的技巧 , 當你處理上千上萬筆大量資料時
就能明顯比較出速度的不同

TOP

cmo140497

帖子
95 
主題
29 
精華
0 
積分
150 
點名
0  
作業系統
windows2003 
軟體版本
office 2003 
閱讀權限
20 
性別
男 
來自
Kaoshiung 
註冊時間
2010-11-5 
最後登錄
2018-2-8 
3#
發表於 2013-1-30 08:50 | 只看該作者
回復 2# chin15


    Dear 大大 : 小弟對陣列實在不懂,大家的手法都不同,冒昧請教一個問題,range也算是陣列的一種嗎?陣列數值之使用,是要先將數值代入陣列,再將陣列的數值做處理,再取出使用嗎?
感謝您的指導。

TOP

chin15

帖子
227 
主題
3 
精華
1 
積分
273 
點名
0  
作業系統
XP 
軟體版本
XP 
閱讀權限
20 
性別
女 
註冊時間
2011-3-22 
最後登錄
2013-1-29 
2#
發表於 2013-1-29 21:15 | 只看該作者
  1. Dim a, b(1 To 5, 1 To 5), i%, j%
  2.     a = [a1:e5]
  3.     For i = 1 To 5
  4.         For j = 1 To 5
  5.             b(i, j) = a(i, 6 - j)
  6.         Next j, i
  7.         [g1].Resize(5, 5) = b
複製代碼

TOP

        靜思自在 : 原諒別人就是善待自己。
返回列表 上一主題