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

[µo°Ý] SUM VBA¼gªk½Ð±Ð

[µo°Ý] SUM VBA¼gªk½Ð±Ð

DEAR ALL¤j¤j
1 ¦p¹Ï¤@
Sheet44.Cells(M, 14) = Sheet44.Cells(M, 9) + Sheet44.Cells(M, 10) + Sheet44.Cells(M, 11) + Sheet44.Cells(M, 12) + Sheet44.Cells(M, 13)
1.1·Q§ï¬°  Sheet44.Cells(M, 14) =Application.SUM(...........)
2½Ð°Ý¦p¦ó­×§ï.·Ð¤£§[½ç±Ð   THANKS*10000

¹Ï¤@
Sub TABCDE()
Sheet44.Select
Range("N1").Select
Sheet44.[N2:M65536].ClearContents
For M = 2 To 1000
If 1 = 1 Then
  Sheet44.Cells(M, 14) = Sheet44.Cells(M, 9) + Sheet44.Cells(M, 10) + Sheet44.Cells(M, 11) + Sheet44.Cells(M, 12) + Sheet44.Cells(M, 13)
End If
Next
End Sub
ù

Sheet44.Cells(M, 14) =Application.Sum(Range("I" & M & ":M" & M))

TOP

DEAR  lpk187 ¤j¤j
·PÁ±z¤§«ü¾É.´ú¸Õ«á§¹¥þ²Å¦X»Ý¨D THANKS*10000
ù

TOP

        ÀR«ä¦Û¦b : ±o²z­nÄǤH¡A²zª½­n®ð©M¡C
ªð¦^¦Cªí ¤W¤@¥DÃD