[µo°Ý]countifªº¨Ï¥Î[¤w¸Ñ¨M]
- ©«¤l
- 77
- ¥DÃD
- 11
- ºëµØ
- 0
- ¿n¤À
- 118
- ÂI¦W
- 0
- §@·~¨t²Î
- winXP
- ³nÅ骩¥»
- office2007
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2010-12-24
- ³Ì«áµn¿ý
- 2011-3-2
|
[µo°Ý]countifªº¨Ï¥Î[¤w¸Ñ¨M]
¥»©«³Ì«á¥Ñ asus103 ©ó 2011-1-11 19:21 ½s¿è
¹ï¤£°_!!!!!!
°Ý¤@ӫܲ³æªº°ÝÃD
sheet2ªºEÄæ¬O©Ê§O
¬°¦ó¤U¦C¦¡¤lµLªk²Îp¨k¥ÍÁ`¼Æ
With Sheets("sheet2")
fb = WorksheetFunction.CountIf(.Cells(, 5), "=¨k")
End With |
|
ASUS
|
|
|
|
|
- ©«¤l
- 77
- ¥DÃD
- 11
- ºëµØ
- 0
- ¿n¤À
- 118
- ÂI¦W
- 0
- §@·~¨t²Î
- winXP
- ³nÅ骩¥»
- office2007
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2010-12-24
- ³Ì«áµn¿ý
- 2011-3-2
|
|
ASUS
|
|
|
|
|
- ©«¤l
- 77
- ¥DÃD
- 11
- ºëµØ
- 0
- ¿n¤À
- 118
- ÂI¦W
- 0
- §@·~¨t²Î
- winXP
- ³nÅ骩¥»
- office2007
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2010-12-24
- ³Ì«áµn¿ý
- 2011-3-2
|
¦^´_ 2# Hsieh
·PÁÂHsieh¤j¤j
WorksheetFunction.CountIf(.Cells(, 5), "=¨k")
Application.CountIf(.Columns(5), "¨k")
«ä¦Ò¹L³o¨â¦æªº®t§O¡A¦pªG§Ú°µ³o¼Ëªº±À½×¥i¥H¶Ü?
1. .Cells(, 5) ¬O¥Nªí²Ä5Ä椤ªº¬Y¤@®æ¦Ó«D²Ä5Äæ¥þ³¡¡AYn¬Ý¥þ³¡¶·°t¦X°j°é
2. Application.µ¥¦PWorksheetFunction.(¦]¬°»¡©ú¤¤¥u¦³WorksheetFunction.CountIf³oºØ¥Îªk)¥NªíEXCEL¤u§@ªí¨ç¼Æ
¦pªG¬OVB¡BVBAªº¨ç¼Æ«h¥iª½±µ¤Þ¥Î¡C
©êºp!!§Ú¤@ª½¤À¤£²MApplication.µ¥¦PWorksheetFunction.ªºÃö«Y¡A
¦b±zªºµ{¦¡¤¤¡A«Ü¤Ö¬Ý¨ìWorksheetFunction¡A®É±`¬Ý¨ìApplication¡A
¦ýVBA»¡©ú¤¤«o¬Û¤Ï
·PÁ±zªº¥j¹D¼ö¸z |
|
ASUS
|
|
|
|
|