ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] ½Ð±ÐEXCEL ,³øªí¤º ³æ¤@²£«~ ·í¤ë¾P°âª÷ÃB¥[Á`

[µo°Ý] ½Ð±ÐEXCEL ,³øªí¤º ³æ¤@²£«~ ·í¤ë¾P°âª÷ÃB¥[Á`

½Ð±Ð
§Ú¦³¤@­Ó­q³æ³øªí ¤¤¶¡³¡¤ÀÄæ¦ì¬Ù²¤¤£key

AÄæ       EÄæ            MÄæ
¤é´Á  ²£«~:T«ò     Á`»ù
1/1   ²£«~:¯Ý³¹
2/1
3/1
4/1
¥H¦¹Ãþ±À

§Úªº»Ý­nªº¬O¤@­Ó¤½¦¡ ¦ý§Ú³]«Ü¤[ ³£¤£¹ï
Ä´¦p¾ã­Ó2¤ë¥÷³øªí ­n¦C¥X ³æ¤@²£«~"T«ò"¨Cµ§Á`»ùªº¥[Á`¬O¦h¤Ö,´N¬O³æ¤@²£«~¾P°âÃB¤ë¥[Á`
§Ú¤£·|³]©w«ü©w¤ë¥÷¦b¨ç¼Æ¸Ì


³Â·Ð¦U¦ì¤j¤j¸Ñ´b ÃØÂI!

¦^´_ 1# athenahu
¸Õ¸Õ¬Ý¡G
1. ¦bÄæN(·s¼W¸É§U¦C¡i¤ë¥÷¡j)
¤½¦¡¡G=MONTH(A2)
¦V¤U©Ô

2. ¿ï¨ú¥þ³¡½d³ò
«ö Ctrl+Shift+F3
¤Ä¿ï¡i³»ºÝ¦C¡j
(§Y§å¦¸«Ø¥ß¦WºÙ)

3.¦bÄæO
¤½¦¡¡G=SUMPRODUCT((¤ë¥÷=N2)*1,(²£«~=E2)*1,Á`»ù)
¦V¤U©Ô


³æ¤@²£«~·í¤ë¾P°âª÷ÃB¥[Á`.7z
http://www.mediafire.com/download/6dorsjj1ggdk004/%E5%96%AE%E4%B8%80%E7%94%A2%E5%93%81%E7%95%B6%E6%9C%88%E9%8A%B7%E5%94%AE%E9%87%91%E9%A1%8D%E5%8A%A0%E7%B8%BD.7z

TOP

¦^´_ 2# yen956

yes¤j¤j§A¦n,
§Ú¨S¦³­n§â³o­Ó²£«~³øªí°µ¦P¤@±i¸ê®Æ¤u§@ªí¸Ì
§Ú¤£¤Óª¾¹D«ç»òªí¹F§Úªº»Ý¨D
§Ú§â§Ú¥¿¦b°µªº¤u§@ªí¤W¶Ç §A¤U¸ü¬Ý¬Ý
³o­ÓEXCEL¸Ì­±¦³¤T±i¤u§@ªí
¤À§O¬O¦~«×­q³æªí,²£«~¤ë³øªí,­q³æÁ`³øªí
§Ú²{¦b­n¾ã²zªº¬O²£«~¤ë³øªí³o±i¤u§@ªí ¥L¬O»Ý­n³sµ²¦~«×­q³æªíªº¸ê®Æ!
¦ý§Úªº¤½¦¡¤@ª½³]¤£¦n,¤Wºôª¦¤å¤F«Ü¦h«o³£¨S¿ìªk!
³Â·Ð±z´À§Ú¬Ý¬Ý! ¸Ó¦p¦ó³]¤½¦¡?

Àɮ׺ô§}:http://cht.tw/h/o6tqs

TOP

¦^´_ 3# athenahu
¸Õ¸Õ¬Ý:
  1. Option Explicit            '±j¨î«Å§iÅܼÆ
  2. Private Sub CommandButton1_Click()
  3.     Dim sh1, sh2 As Worksheet
  4.     Dim i, lastRow, ¤ë As Integer
  5.     Dim Á`»ù As Double
  6.     Set sh1 = Sheets("¦~«×­q³æªí")
  7.     Set sh2 = Sheets("²£«~¤ë³øªí")
  8.    
  9.     lastRow = sh2.[A65536].End(xlUp).Row    '¨ú±oAÄæ ³Ì¤U­±«DªÅ¥Õ®æ ªº¦C¸¹
  10.     sh2.[B2].Resize(lastRow, 12) = ""  '²M°£ ²£«~¤ë³øªí
  11.     sh2.[N2].FormulaR1C1 = "=MATCH(R[-1]C,R2C1:R" & lastRow & "C1,0) + 1"  '¼g¤J¤½¦¡, ¬d¸ß «~¶µ ªº¦C¸¹
  12.    
  13.     lastRow = sh1.[A65536].End(xlUp).Row    '¨ú±oAÄæ ³Ì¤U­±«DªÅ¥Õ®æ ªº¦C¸¹
  14.     For i = 3 To lastRow
  15.         ¤ë = Month(sh1.Cells(i, 1)) + 1
  16.         sh2.[N1] = sh1.Cells(i, 5)    '¦~«×­q³æªíªº«~¶µ ¼g¤Jsh2.[N1], ¨ÑMATCH¤½¦¡¬d¸ß
  17.         Á`»ù = sh1.Cells(i, 12)
  18.         
  19.         sh2.Cells(sh2.[N2], ¤ë) = sh2.Cells(sh2.[N2], ¤ë) + Á`»ù  '²Î­p³æ¤@²£«~·í¤ëÁ`»ù
  20.     Next
  21. End Sub
½Æ»s¥N½X
³æ¤@²£«~·í¤ë¾P°âª÷ÃB¥[Á`0.7z
http://www.mediafire.com/download/zu1r2orgkrpyohc/%E5%96%AE%E4%B8%80%E7%94%A2%E5%93%81%E7%95%B6%E6%9C%88%E9%8A%B7%E5%94%AE%E9%87%91%E9%A1%8D%E5%8A%A0%E7%B8%BD0.7z

TOP

¦^´_ 3# athenahu

²£«~¤ë³øªí!B2¤½¦¡
=SUMPRODUCT((MONTH(OFFSET(¦~«×­q³æªí!$A$3,,,COUNT(¦~«×­q³æªí!$A:$A),))=COLUMN(A$1))*(OFFSET(¦~«×­q³æªí!$E$3,,,COUNT(¦~«×­q³æªí!$A:$A),)=$A2)*OFFSET(¦~«×­q³æªí!$L$3,,,COUNT(¦~«×­q³æªí!$A:$A),))
¦V¥k¦V¤U½Æ»s
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¯uªºÁÂÁ¦U¦ì¤j¤j §Ú¸Ñ¨M¤F~ ¤Ñª¾¹D§Ú³o¨â¤Ñ´Nªá¤F¦h¤Ö®É¶¡¦b¤½¦¡¤W ÁÂÁÂ!

TOP

¦^´_ 5# Hsieh

¤j¤j§A¦n,¨º¦pªG¬O­n°µ²£«~¤ë³øªºÁ`¦¨¥»©O
ªí®æ±Æ¦C³£¸òÁ`¦¬¤J¤@¼Ë
Á`¦¨¥»                                                                                                
            ¤ë¥÷
«~¶µ"         1¤ë          2¤ë          3¤ë          4¤ë          5¤ë          6¤ë          7¤ë          8¤ë          9¤ë          10¤ë          11¤ë          12¤ë
T«ò                                                                                                
À²³¹                                                                                               
¯Ý³¹                                                                                               
¤âÀô                                                                                               
¤j¹Ï¿é¥X                                                                                               
¦L¨ê«~                                                                                               
ÃÙ§U                                                                                               

§Ú¦³®M¥Î§Aµ¹ªºÁ`¦¬¤Jªº¤½¦¡ ¦ý¤£ª¾¹D«ç»ò­×§ï¦¨ ª÷ÃB±o¥X¨Ó¬OÁ`¦¨¥»ªºª÷ÃB

TOP

¦^´_ 7# athenahu

Á`¦¨¥»¦bAEÄæ?
=SUMPRODUCT((MONTH(OFFSET(¦~«×­q³æªí!$A$3,,,COUNT(¦~«×­q³æªí!$A:$A),))=COLUMN(A$1))*(OFFSET(¦~«×­q³æªí!$E$3,,,COUNT(¦~«×­q³æªí!$A:$A),)=$A2)*OFFSET(¦~«×­q³æªí!$AE$3,,,COUNT(¦~«×­q³æªí!$A:$A),))
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¦^´_ 8# Hsieh


    ¨þ¨þ ÁÂÁ¤j¤j~§Ú«á¨Ó¦³³]¹ï¤F! ÁÂÁ§AªºÀ°§U!

TOP

        ÀR«ä¦Û¦b : ¤Ó¶§¥ú¤j¡B¤÷¥À®¦¤j¡B§g¤l¶q¤j¡A¤p¤H®ð¤j¡C
ªð¦^¦Cªí ¤W¤@¥DÃD