[ ‰‚ß‚Ä‚Ì•û‚Ö | ˆê——(ÅVXV‡) | ‘S•¶ŒŸõ | ‰ß‹ŽƒƒO ]
@
wu•¶Žš”‚ª‘½‚‚Ä COUNTIFŠÖ”‚ªŽg‚¦‚È‚¢v‚ÌVBA‚Ö‚Ì”½‰f‚ɂ‚¢‚ÄxiVBA‰SŽÒj
‚¨Šè‚¢’v‚µ‚Ü‚·B
h=COUNT(INDEX(0/SUBSTITUTE(”͈Í,ŒŸõ•¶Žš,1),0))h
‚ðVBA‚É‘g‚Ýž‚ñ‚ÅŽg‚¨‚¤‚Æ‚µ‚½‚Æ‚±‚ëA
SUBSTITUTE‚Ŕ͈Í(—á@A1:A5)Žw’è‚ð‚·‚é‚ÆAuŒ^‚ªˆê’v‚µ‚Ü‚¹‚ñv‚ÆExcelŠÖ”‚Ì‚¨ì–@‚É”½‚µ‚Ä‚¢‚é‚炵‚A‘g‚Ýž‚Þ‚±‚Æ‚ª‚Å‚«‚Ü‚¹‚ñ‚Å‚µ‚½(’Êí‚ÉExcel‚ÌŠÖ”‚Æ‚µ‚ÄŽg‚¤ê‡‚É‚Í–â‘è‚È‚©‚Á‚½‚Ì‚Å‚·‚ªc)B
1,‚Ç‚È‚½‚©Aã‹L‘g‚݇‚킹ŠÖ”‚ðAVBA‚ÅŽg‚¦‚½•û‚¢‚ç‚Á‚µ‚á‚¢‚Ü‚·‚Å‚µ‚傤‚©H@‚¢‚ç‚Á‚µ‚á‚¢‚Ü‚µ‚½‚çAƒTƒ“ƒvƒ‹‚ðŒ©‚¹‚Ä’¸‚¯‚ê‚ÎK‚¢‚Å‚·B
2,‚â‚肽‚¢‚±‚Æ‚Æ‚µ‚Ä‚ÍAucountif‚ÅAconcatenate‚µ‚½s‚Ì’†‚Éd•¡‚·‚és‚ª–³‚¢‚©ƒ`ƒFƒbƒN‚·‚év‚Æ‚¢‚¤‚±‚Æ‚ð‚µ‚½‚¢‚Å‚·B
‚½‚¾Aconcatenate‚µ‚½s‚Ì•¶Žš”‚ª255•¶Žš‚ð’´‚¦‚Ä‚µ‚Ü‚Á‚½‚½‚ßA‚»‚Ì‘Îô‚Æ‚µ‚Äã‹L‘g‚݇‚킹ŠÖ”‚ð–Íõ‚µ‚Ä‚¢‚½‚Ì‚Å‚·‚ªA
‰½‚©‘ã‚í‚è‚Æ‚È‚éŠÖ”‘g‚݇‚킹‚Í–³‚¢‚Å‚µ‚傤‚©H
VBA‚É‘g‚Ýž‚Ý‚½‚¢‚½‚ßAVBA‚Å‚Å‚«‚邱‚Æ‚Å‚ ‚ê‚΂悢‚Ì‚Å‚·‚ªcB
‚æ‚낵‚‚¨‚Ë‚ª‚¢‚µ‚Ü‚·B
ƒ Žg—p ExcelFExcel2013AŽg—p OSFWindows10 „
2.
‚â‚肽‚¢‚±‚Æ‚ªƒsƒ“‚Æ‚±‚È‚¢‚Å‚·B
256•¶Žš‚à‘‚©‚È‚‚Ä‚à‚æ‚¢‚Ì‚ÅA‹ï‘Ì“I‚È•µˆÍ‹C‚ª‚í‚©‚郌ƒCƒAƒEƒg‚ð’ñŽ¦‚µ‚Ä‚à‚炦‚Ü‚¹‚ñ‚©H
‚½‚Æ‚¦‚ÎA
___A___B___C__ 1 ‚ ‚¢ ‚¤ 2 ‚¦ ‚¨ ‚© 3 ‚« ‚ ‚¯ 4 ‚± ‚³ ‚µ 5 ‚· ‚¹ ‚»
A1:C5‚ð‚·‚×‚Ä•¶ŽšŒ‹‡‚µ‚½‚¤‚¦‚ÅA"‚‚¯‚±"‚ªŠÜ‚Ü‚ê‚Ä‚¢‚é‚©”»’肵‚½‚¢
‚Ý‚½‚¢‚ÈŠ´‚¶‚Å’ñŽ¦‚Å‚«‚Ü‚¹‚ñ‚©H
i‚à‚±‚È‚Qj 2019/07/16(‰Î) 23:41
[ ˆê——(ÅVXV‡) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.