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

[µo°Ý] ½Ð°ÝSumif VBA«ç»ò¼g

¦^´_ 1# amber123
¸Õ¸Õ¬Ý
  1. Option Explicit
  2. Sub Ex()
  3.     Dim ¼Æ¦r As String, ¤½¦¡ As String
  4.     ¼Æ¦r = 150101
  5.     ¤½¦¡ = "=SUMIF(A:A," & """*""" & "&" & ¼Æ¦r & "&" & """*""" & ",C:C)"
  6.     MsgBox Evaluate(¤½¦¡)
  7. End Sub
½Æ»s¥N½X
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

        ÀR«ä¦Û¦b : ¥Ç¿ù¥XÄb®¬¤ß¡A¤~¯à²M²bµL·Ð´o¡C
ªð¦^¦Cªí ¤W¤@¥DÃD