ªð¦^¦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 : ¡i®É¤é²öªÅ¹L¡j¤@­Ó¤H¦b¥@¶¡°µ¤F¦h¤Ö¨Æ¡A´Nµ¥©ó¹Ø©R¦³¦hªø¡C¦]¦¹¥²¶·»P®É¶¡Ävª§¡A¤Á²ö¨Ï®É¤éªÅ¹L¡C
ªð¦^¦Cªí ¤W¤@¥DÃD