返回列表 上一主題 發帖

[發問] 有關於CountIfs的問題[已解決]

asus103

帖子
77 
主題
11 
精華
0 
積分
118 
點名
0  
作業系統
winXP 
軟體版本
office2007 
閱讀權限
20 
性別
男 
註冊時間
2010-12-24 
最後登錄
2011-3-2 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2011-1-12 18:56 | 只看該作者

[發問] 有關於CountIfs的問題[已解決]

本帖最後由 asus103 於 2011-1-13 08:48 編輯

各位大大您好
我想再程式中直接統計(如附圖)
所在列之上，並同時有相同一性別與組別的數量
以下是我所用的
Application.CountIfs(.Range(.[E1], .Cells(i, "E")), .Cells(i, "E").Value, .Range(.[f1], .Cells(i, "F")), .Cells(i + 1, "F").Value)
(i=1，每次加1)
試過幾種方式都不成功，只好再麻煩各位了
capture_01122011_184728.jpg
收藏 分享
ASUS

Hsieh

帖子
4901 
主題
44 
精華
24 
積分
4916 
點名
257  
作業系統
Windows 7 
軟體版本
Office 20xx 
閱讀權限
150 
性別
男 
來自
台北 
註冊時間
2010-4-30 
最後登錄
2024-11-28 

2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱心公益勳章2011兔年全勤獎章
2#
發表於 2011-1-12 19:10 | 只看該作者
i = 2
   Do Until .Cells(i, 4) = ""
   .Cells(i, "G") = Application.CountIfs(.Range(.[E1], .Cells(i, "E")), .Cells(i, "E"), .Range(.[F1], .Cells(i, "F")), .Cells(i, "F"))
   i = i + 1
   Loop
學海無涯_不恥下問

TOP

asus103

帖子
77 
主題
11 
精華
0 
積分
118 
點名
0  
作業系統
winXP 
軟體版本
office2007 
閱讀權限
20 
性別
男 
註冊時間
2010-12-24 
最後登錄
2011-3-2 
3#
發表於 2011-1-12 21:33 | 只看該作者
回復 2# Hsieh
Hsieh大大
對不起!!突然有一些事
我明天再修程式碼
還是先謝謝您
ASUS

TOP

asus103

帖子
77 
主題
11 
精華
0 
積分
118 
點名
0  
作業系統
winXP 
軟體版本
office2007 
閱讀權限
20 
性別
男 
註冊時間
2010-12-24 
最後登錄
2011-3-2 
4#
發表於 2011-1-13 08:48 | 只看該作者
回復 2# Hsieh
感謝Hsieh大大
問題解決了!!!
定位原來也是我的一個難題

其實這次我最大的問題是整段程式碼的邏輯結構問題
與想要減少變數使用量，使結構複雜到自己無法駕馭
只見其小，未見其大的結果當然是一團亂
幸好有您熱心的協助
謝謝
ASUS

TOP

        靜思自在 : 時時好心就是時時好日。
返回列表 上一主題