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

½Ð¯q¡u·j´MÃöÁä¦r¸ê®Æ¨Ã²Ö¥[¡K¡v

½Ð¯q¡u·j´MÃöÁä¦r¸ê®Æ¨Ã²Ö¥[¡K¡v

½Ð°ÝªO¤W°ª¤â¡A¦³8­Ó¤u§@ªí¡A¨ä¤¤²Ä2¨ì²Ä8­Ó¤u§@ªí¡A

¦pªG­n´M§ä ¤jªÑªF¦X­p1¡B¤jªÑªF¦X­p2¡B¸g²z¤H¦X­p¡B¸³ºÊ¨Æ¦X­p¤§«ùªÑ¸ê®Æ¨Ã²Ö¥[¦Ürange("bb10")¡A¦p¹Ï

(¨ä¤¤¤jªÑªF¦X­p1¡B¤jªÑªF¦X­p2¡B¸g²z¤H¦X­p¡B¸³ºÊ¨Æ¦X­p¤§Àx¦s®æ¦ì¸mÀH®É³£·|ÅÜ°Ê¡A©Ò¥HµLªk¥Hsum¥h°µ²Ö¥[)

¥u¦n¥Îvba¥h§ì¸ê®Æ¡G

µ{¦¡½X¦p¤U
sub tes
for i=2 to 8
Sheets(i).Range("bb10") = Cells.Find(What:="¤jªÑªF¦X­p1", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
, MatchByte:=False, SearchFormat:=False).Offset(, 3).Value + Cells.Find(What:="¸g²z¤H¦X­p", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
, MatchByte:=False, SearchFormat:=False).Offset(, 3).Value + Cells.Find(What:="¤jªÑªF¦X­p2", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
, MatchByte:=False, SearchFormat:=False).Offset(, 3).Value + Cells.Find(What:="¸³ºÊ¨Æ¦X­p", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
, MatchByte:=False, SearchFormat:=False).Offset(, 3).Value
Next
sub

¦ý¬O«o¥X²{¿ù»~¡A¤£ª¾¹D¿ù¦b­þ¨à¡A¯à§_½ÐªO¤W°ª¤â«üÂI«üÂI¡HÁÂÁÂ

¦^´_ 1# gkld
1. ¥ý½T©w2~8ªí³£¦³³o4­ÓÃöÁä¦r?
     ¦]¬°§Aªº¼gªkFind­Y§ä¤£¨ì·|¶Ç¦^Nothing , ´N¨S¿ìªk¥Î«á­±offset¤èªk´N·|¥X¿ù
2. Cells.Find ªºCells¨S«ü©w¤u§@ªí·|¦Û°Ê¥ÎActiveWorksheet
     «Øij§ï¦¨¦p¤U¸Õ¬Ý¬Ý(ª`·NCells«e­±³£­n¦h¤@ÂI)
     For i=2 to 8
     With Sheets(i)
         .Range("bb10") = .Cells.Find(What:="¤jªÑªF¦X­p1", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
         xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
         ¤¤²¤
     End With
     Next

TOP

¦^´_ 2# stillfish00
·PÁ¼ӤW°ª¤â´£¿ô¡A±z³o­Ó¤èªk§Ú¤]po¤å«e¤]¸Õ¹L¡A¤]¬O¤£¦æ!!

¤£¹L¸g±z´£ÂI«á¡A§Ú¥h¬Ý¤F¤@¤U¨C­Ó¤u§@ªí¡Aµo²{¡K­ì¨Ó¨ä¤¤¦³1­Ó¤u§@ªíªº¸ê®Æ¶]±¼¤F

¨S¦³§Ú­n·j´MªºÃöÁä¦r¸ê®Æ¡A§Ú·Q°ÝÃDÀ³¸Ó¬O¥X¦b³oÃä!!

§Ú¦A¦^¥h¸Õ¸Õ¬Ý     ·P®¦¤X~~

TOP

¦^´_ 3# gkld
³á  ¹ï¤F , ¤£¥ÎVBA¥i¥Î¤½¦¡  
=IFERROR(VLOOKUP("¤jªÑªF¦X­p1",AY:BB,4,FALSE),0)+IFERROR(VLOOKUP("¤jªÑªF¦X­p2",AY:BB,4,FALSE),0)+IFERROR(VLOOKUP("¸g²z¤H¦X­p",AY:BB,4,FALSE),0)+IFERROR(VLOOKUP("¸³ºÊ¨Æ¦X­p",AY:BB,4,FALSE),0)
§ä¤£¨ì¥i¤£­p

TOP

¦^´_ 4# stillfish00

­è¸Õ¹L¤F¡A¯uªº¬O¨ä¤¤¤@­Ó¤u§@ªí¸Ì­±¤Ö¤F­n·j´MªºÃöÁä¦r~

²{¦b¤w¸Ñ¨M¤F~  «¢

·PÁ´£¥X¥t¤@­Ó¤£¥Îvbaªº¸Ñªk(ÁöµM§ÚÁÙ¬O¥Îvba¥h¸Ñ¨M)

¤S¦h¾Ç¤F¤@©Û !!

TOP

¦³©Ò±Òµo ·PÁ¨â¦ì¤j¤jªº°Q½×»P¸Ñ´b

TOP

        ÀR«ä¦Û¦b : ­ì½Ì§O¤H´N¬Oµ½«Ý¦Û¤v¡C
ªð¦^¦Cªí ¤W¤@¥DÃD