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

[µo°Ý] VBA¥[Á`°ÝÃD

¦^´_ 1# sandra_wang
  1. Sub nn()
  2. For i = 2 To 4
  3.   Set a = Cells(1, 9)
  4.    Cells(i, 2) = Application.Sum(Range(a.Offset(i - 1), a.Offset(i - 1).End(xlToRight)))
  5. Next
  6. End Sub
½Æ»s¥N½X
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¦^´_ 4# FAlonso

³o·|¦³¤@­Ó¯ÊÂI
Äæ¦W­^¤å¬O2­Ó¦r®É´N¥X¿ù
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

        ÀR«ä¦Û¦b : ¦³¤ß´N¦³ºÖ¡A¦³Ä@´N¦³¤O¡A¦Û³yºÖ¥Ð¡A¦Û±oºÖ½t¡C
ªð¦^¦Cªí ¤W¤@¥DÃD