如何合併陣列 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » 如何合併陣列

返回列表下一主題上一主題發帖

[發問] 如何合併陣列

大學生 Rank: 4

帖子: 1018
主題: 15
精華: 0
積分: 1058
點名: 0
作業系統: win7 32bit
軟體版本: Office 2016 64-bit
閱讀權限: 50
性別: 男
來自: 桃園
註冊時間: 2012-5-9
最後登錄: 2022-9-28

6^# 跳轉到 »

發表於 2013-5-16 20:24 | 只看該作者

回復 4# sunnyso
兩個二維Array，不使用For，合併為一個
我只想的到借用工作表...
把兩個 Array 丟到儲存格再拿出來...

但是我感覺這樣比For沒有效率

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

5^#

發表於 2013-5-12 20:47 | 只看該作者

回復 4# sunnyso
待我再想一想有無!!!

感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限, 一天1元的贊助,人人有能力.

高中生 Rank: 3 Rank: 3

帖子: 605
主題: 92
精華: 0
積分: 648
點名: 0
作業系統: windows
軟體版本: 7
閱讀權限: 50
性別: 男
來自: macau
註冊時間: 2013-4-5
最後登錄: 2019-2-10

熱烈參與勳章好學求知勳章

4^#

發表於 2013-5-12 19:46 | 只看該作者

回復 3# GBKEE

感謝大大, 請問有沒有不用迴圈的方法.

ss

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

3^#

發表於 2013-5-12 17:42 | 只看該作者

回復 1# sunnyso

Option Explicit
Sub EX()
Dim A As Variant, B As Variant, C As Variant, I As Integer
A = Array(Array("A1", "B1", "C1"), Array("A2", "B2", "C2"), Array("A3", "B3", "C3"))
B = Array(Array("A4", "B4", "C4"), Array("A5", "B5", "C5"))
C = A
For I = 0 To UBound(B)
ReDim Preserve C(0 To UBound(C) + 1)
'ReDim 陳述式在程序層次中用來重新配置動態陣列變數的儲存空間。
'Preserve 當改變原有陣列最後一維的大小時，仍然保有原來的資料的關鍵字
C(UBound(C)) = B(I)
Next
End Sub

複製代碼

感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限, 一天1元的贊助,人人有能力.

中學生 Rank: 2

帖子: 231
主題: 55
精華: 0
積分: 293
點名: 0
作業系統: winxp
軟體版本: office2003
閱讀權限: 20
性別: 男
來自: KEELUNG
註冊時間: 2010-7-24
最後登錄: 2018-8-28

2^#

發表於 2013-5-12 05:52 | 只看該作者

回復 1# sunnyso

大大您好：
不知引用array是否
符合大大的須求
c=array(a,b)

靜思自在 : 真正的愛心，是照顧好自己的這顆心。

返回列表下一主題上一主題