[算表] 二維陣列初始值的設定
軟體:Excel 2007
我需要一個 2列 3行的二維陣列存放資料,並且要設定初始值如下:
Sub Cala()
Dim MyArray()
ReDim MyArray(2, 3)
MyArray = Array(Array("Mary", "Mat", 108), _
Array("John", "Sci", 131))
MsgBox UBound(MyArray, 1)
MsgBox UBound(MyArray, 2)
End Sub
在MsgBox UBound(MyArray, 2) 會出現陣列索引超出範圍的錯誤,
請問2維陣列初始值設定的程式碼,是哪邊有問題呢?
謝謝
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 1.162.224.46
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1449333025.A.60A.html
※ 編輯: Fmajor (1.162.224.46), 12/06/2015 00:34:29
→
12/06 00:52, , 1F
12/06 00:52, 1F
→
12/06 01:05, , 2F
12/06 01:05, 2F
→
12/06 01:06, , 3F
12/06 01:06, 3F
→
12/06 01:07, , 4F
12/06 01:07, 4F
→
12/06 01:19, , 5F
12/06 01:19, 5F
→
12/06 01:19, , 6F
12/06 01:19, 6F
→
12/06 01:19, , 7F
12/06 01:19, 7F
→
12/06 01:53, , 8F
12/06 01:53, 8F
請問如果有10多筆數據的話
MyArray = [{"Mary","Mat",108;"John","Sci",131;......}]
這一串程式碼會很長,請問有辦法拆開讓程式碼比較好閱讀嗎?
大概類似這樣
MyArray = [{"Mary","Mat",108;
"John","Sci",131;
"Tom",Pas",134;
......
"Sam","Lon",13}]
※ 編輯: Fmajor (1.162.224.46), 12/06/2015 02:00:21
→
12/06 12:44, , 9F
12/06 12:44, 9F
→
12/06 12:45, , 10F
12/06 12:45, 10F
請問是這個意思嗎? MyArray = Evaluate("{"Mary","Mat",108;"John","Sci",131}")
因為我試好幾個方式都是語法錯誤
※ 編輯: Fmajor (114.25.108.70), 12/06/2015 18:31:04
→
12/06 18:44, , 11F
12/06 18:44, 11F
測試出來了!!!結果正確,感謝s大,請問要怎麼斷句呢?
MyArray = Evaluate("{"Mary","Mat",108; _
"John","Sci",131}")
我是用上面這種方式或是 "" & "", 出來都是語法錯誤
再麻煩指點一下,感謝~
※ 編輯: Fmajor (114.25.108.70), 12/06/2015 19:21:51
→
12/06 19:29, , 12F
12/06 19:29, 12F
→
12/06 19:30, , 13F
12/06 19:30, 13F
原來是 A " & _ " B 這樣斷句呀@@
難怪我怎麼斷都錯,請問&前面的雙引號,和_後面的雙引號是一對的嗎?
還是&前面的雙引號,是和Evaluate("{ 這個雙引號一對呢?
感謝s大的指導,又學到一課了
※ 編輯: Fmajor (114.25.108.70), 12/06/2015 19:40:30
※ 編輯: Fmajor (114.25.108.70), 12/06/2015 19:43:38
→
12/06 20:01, , 14F
12/06 20:01, 14F
因為我想如果後面有引號的話,前面也要加引號才對,
原本Evaluate( "{""Mary"",""Mat"",108;
變成Evaluate(""{""Mary"",""Mat"",108;" & _
(前後都要加引號這樣才會一對)
所以語法一直錯誤
※ 編輯: Fmajor (114.25.108.70), 12/06/2015 20:10:24
※ 編輯: Fmajor (114.25.108.70), 12/06/2015 20:15:28
→
12/06 21:05, , 15F
12/06 21:05, 15F
Office 近期熱門文章
PTT數位生活區 即時熱門文章