返回列表 上一主題 發帖

如何用儲存格的顏色來加總或計算一欄裡的資料總和和個數

register313
　頭銜: 麻辣 路人甲

大學生Rank: 4

帖子
967 
主題
0 
精華
0 
積分
1001 
點名
0  
作業系統
WIN XP 
軟體版本
OFFICE 2003 
閱讀權限
50 
性別
男 
來自
台北 
註冊時間
2010-11-29 
最後登錄
2022-5-17 

2012龍年全勤獎章熱烈參與勳章
1# 跳轉到 »
發表於 2012-5-30 15:31 | 顯示全部帖子
本帖最後由 register313 於 2012-5-30 21:22 編輯

回復 1# almond

VBA:
  1. Sub YY()
  2. [A11] = 0
  3. [A12] = 0
  4. For Each A In [A1:A10]
  5.   If A.Interior.ColorIndex = 3 Then   'If A.Font.ColorIndex = 3 Then
  6.      [A11] = [A11] + A
  7.      [A12] = [A12] + 1
  8.   End If
  9. Next
  10. End Sub
複製代碼
一般區:

1.選B1,定義x=GET.CELL(63,Sheet1!A1)
2.B1=x 往下複製到B10
3.A11=SUMIF(B1:B10,3,A1:A10)
4.A12=COUNTIF(B1:B10,3)

TOP

        靜思自在 : 盡多少本份，就得多少本事。
返回列表 上一主題