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

¸ó¶V¤u§@ªí¥[Á`

¸ó¶V¤u§@ªí¥[Á`

¦U¦ì«e½ú§A­Ì¦n!!   
         O1=SUM(³æµ§:³æµ§02!I8)
         °ÝÃD¦pªþÀÉ»¡©ú
         ½Ðª¾¹Dªº«e½ú,¤£§[½ç±ÐÁÂÁ¦A¤T!!

Leo35.rar (3.89 KB)

¦^´_ 7# ML089
«e½ú!¤£¦n·N«ä...¤p§Ì·Q¨ìÅo!
        Àɮ׬O¥Î¤â°Ê¤è¦¡¥ý³]©w¦n¤u§@ªí©Ò¥H¤~·|Åý§A¨º§¹¬üªºµ{¦¡
        ¦Y´eÁ«...«¢«¢!¯u¤ï¶Õ!!¤p§Ì²¨©¿¤u§@ªí¬O¥Îµ{¦¡¤@­Ó¤@­Ó¼g¤J
       ´N¨S¦³¦¹±¡ªp,¤ï¶Õ!!¤ï¶Õ!!

TOP

¦^´_ 7# ML089
«e½ú!ÁÂÁ«ü¾É!!
        «e½úµ{¦¡Â²¼ä¬Ý¦üµL»~,¦ý¬°¦ó°õ¦æ«o¿ù»~©O?
       ¦pªþµe­±©Ò¥Ü!¦AªþÀÉ®×Åý§AÁ@Á@,¤£§[¦b½ç±ÐÁÂÁ¦A¤T!!

Leo35.gif (275.16 KB)

Leo35.gif

Leo35-1.rar (12.48 KB)

TOP

¨Ó¬Ý¬Ý  ¦h¾Ç²ßÂI  ÁÂÁÂ

TOP

¨Ó¬Ý¬Ý  ¦h¾Ç²ßÂI  ÁÂÁÂ

TOP

¨Ó¬Ý¬Ý  ¦h¾Ç²ßÂI  ÁÂÁÂ

TOP

¦^´_ 5# myleoyes
  1. Sub ex()
  2. [O2] = "=SUM('³æµ§:" & Sheets(Worksheets.Count).Name & "'!I8)"
  3. End Sub
½Æ»s¥N½X
{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

¦^´_ 4# ML089
«e½ú!ÁÂÁ«ü¾É¤p§Ì©ú¥Õµ{¦¡¦p¤U
Sub ¥[Á`()
    [O3] = "=COUNTA(INDIRECT(""O5:O100""))"
    [O3].NumberFormatLocal = """½s""""¸¹"""
    If [O3] = 0 Then
       [o1] = "=³æµ§!I8"
    ElseIf [O3] >= 1 And [O3] < 10 Then
       [o1] = "=SUM(³æµ§" & ":" & "³æµ§" & "0" & [O3] & "!I8)"
    ElseIf [O3] >= 10 Then
       [o1] = "=SUM(³æµ§" & ":" & "³æµ§" & [O3] & "!I8)"
    End If
End Sub
ÁÂÁ¦A¤T!!

TOP

O1=SUM(³æµ§:³æµ§END!I8)

½Ðª`·N! ·s¼W¤u§@ªí³£»Ý­n¦b ³æ»ù»P³æ»ùEND¤§¶¡
¨Ò¦p:  ³æ»ù/³æ»ù01/³æ»ù02/..../³æ»ù50/³æ»ùEND
{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

¦^´_ 2# a8350070
«e½ú!¥»·Q¬O§_¥i¥H¾Ç¨ì§ó¦nªº¤½¦¡
        ¬Ý¨Ó¦p§A©Ò»¡Â²³æªº¤è¦¡´N¬O¥Îµ{¦¡Åo!
       ÁÂÁ¦A¤T!!

TOP

        ÀR«ä¦Û¦b : ¡i¥Í©R¦b©I§l¶¡¡j¦òªû»¡¡G¡u¥Í©R¦b©I§l¶¡¡C¡v¤HµLªkºÞ¦í¦Û¤vªº¥Í©R¡A§óµLªk¾×¦í¦º´Á¡AÅý¦Û¤v¥Ã¦í¤H¶¡¡C¬JµM¥Í©R¥h¨Ó³o»òµL±`¡A§Ú­Ì§óÀ³¸Ó¦n¦n¦a·R±¤¥¦¡B§Q¥Î¥¦¡B¥R¹ê¥¦¡AÅý³oµL±`¡BÄ_¶Qªº¥Í©R¡A´²µo¥¦¯uµ½¬üªº¥ú½÷¡A¬M·Ó¥X¥Í©R¯u¥¿ªº»ù­È¡C
ªð¦^¦Cªí ¤W¤@¥DÃD