[算表] VBA 把 多個 sheets copy 到陣列 ?
我有個外部資料檔 我想要先把他存到陣列裡
再去計算陣列得到自己要的東西
我在 google 上看到幾個例子 可是不能用
能幫我看一下為什麼嗎 他的值丟不進去 array 裡
它寫 "物件不支持此屬性方法"
Sub main()
Dim wb As Workbook
Dim MyArray()
Set wb = GetObject("D:\選股資料.xls")
'MsgBox wb.Sheets(1).UsedRange.Rows.Count
'MsgBox wb.Sheets(1).UsedRange.Columns.Count
ReDim MyArray(1 To wb.Sheets(1).UsedRange.Rows.Count, 1 To
wb.Sheets(1).UsedRange.Columns.Count)
MyArray = wb.Sheet1(1).UsedRange <-- 應該是這行錯了
Set wb = Nothing
End Sub
--
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 122.116.227.44
→
07/12 18:08, , 1F
07/12 18:08, 1F
→
07/12 18:09, , 2F
07/12 18:09, 2F