Private Sub CommandButton1_Click()
Dim arr As Variant
arr = Range("b8:c10").Value
for i = 1 to ubound(arr,1)
for j= 1 to ubound(arr,2)
msgbox arr(i,j)
next j
next i
End Sub
※ 引述《kasl (小麻雀)》之銘言：
: 軟體: Excel 2003
: 版本:
: 我有個 Sheet 長的如下
: 20030101 a b c
: 20030102 d e f
: .......
: 20091215 m n o
: 20091215 x y z
: 我想要可以從外部輸入選"開始日期"、"結束日期"
: 再把此範圍中的 data 存入 Array 中
: 請問我該怎麼寫比較好
: 我不會用 VBA 裡的函數來寫，我目前是用先把全部
: 讀入 Array 再去 Array 裡抓我想的日期範圍值
: 我這樣好像多此一舉 QQ
: 請問能指導小弟我 怎麼寫比較好嗎
: 謝謝~
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.134.105.197