求解excel vba範圍資料統計的方法

Question

各位高手好：
小弟於sheet1建立如下表格
日期 名稱1 名稱2 名稱3
94/5/1 11 21 31
94/5/2 12 22 32
94/5/3 13 23 33
94/5/4 14 24 34
94/5/5 15 25 35
94/5/6 16 26 36
94/5/7 17 27 37
94/5/8 18 28 38
94/5/9 19 29 39

於sheet2建立
起始 年 月 日
終止 年 月 日
希望由以上表格內輸入0年0月0日可得到該範圍間的累計數量
如於sheet2輸入
起始 94 年 5 月 2 日
終止 94 年 5 月 6 日
可於sheet3得到
名稱 累計數量
名稱1 70(=12+13+14+15+16)
名稱2 120(=22+23+24+25+26)
名稱3 170(=32+33+34+35+36)
該如何辦到ㄋ
希望各位高手位小弟解惑
感恩耶…..

Answer 1

sheet1的內容和你寫的一樣…
而sheet2的內容如下：都在A欄喔
起始年月日
終止年月日
名稱1
名稱2
名稱3
而程式如下…
Sub text()
Dim s1, s2, s3
s1 = 0: s2 = 0: s3 = 0
For i = 2 To 9 '其中2到9可以隨資料不同而都大
If Sheet1.Cells(i, 1).Value >= Sheet2.Cells(1, 2).Value And Sheet1.Cells(i, 1).Value <= Sheet2.Cells(2, 2).Value Then
s1 = s1 + Sheet1.Cells(i, 2).Value
s2 = s2 + Sheet1.Cells(i, 3).Value
s3 = s3 + Sheet1.Cells(i, 4).Value
End If
Next i
Sheet2.Cells(3, 2).Value = s1
Sheet2.Cells(4, 2).Value = s2
Sheet2.Cells(5, 2).Value = s3
End Sub

把此程式碼，放入一個巨集即可

2005-09-09 22:23:16 補充：
什麼樣的問題？
我在我的電腦跑過了…是ｏｋ的…
你要不要說說看是什麼樣的訊息呢？

Answer 2

ABCDEFGH1日期名稱1名稱2名稱3起始終止21994/5/11121311994/5/21994/5/631994/5/2122232名稱1名稱2名稱341994/5/31323337012017051994/5/414243461994/5/515253571994/5/616263681994/5/717273791994/5/8182838101994/5/9192939F4輸入=SUMIF($A$2:$D$10,">="&$F$2,B2:B10)-SUMIF($A$2:$D$10,">"&$G$2,B2:B10)F4 欄位如果出現日期格式，請修改儲存格格式為G/通用規格可直接往右複製，完成後，將 F~H 欄位剪下，貼在 Sheet2，這樣就完成!!綠色色塊部分可剪下，貼在 Sheet3

Answer 3

對不起大大你的程式碼似乎有問題喔

2005-09-13 11:27:43 補充：
跑起就是沒結果,而卻把
94/5/2 12 22 32
94/5/3 13 23 33
94/5/4 14 24 34
94/5/5 15 25 35
變成
94/5/2 0 22 32
94/5/3 0 23 33
94/5/4 0 24 34
94/5/5 0 25 35

2005-09-15 08:03:36 補充：
哥哥雄寶貝 你好:
對不起喔
小弟想要的是excel vba的程式碼