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

FREQUENCY°ÝÃD

¥»©«³Ì«á¥Ñ luhpro ©ó 2013-9-10 20:44 ½s¿è
¦]¬°¤u§@Ãö«Y¡A¨C¤Ñ³£­n¨Ï¥ÎExcelµe¹Ï¡A¬°¤F¼W¥[¤u§@®Ä²v½Ð±Ð¦U¦ì¡A°ÝÃD¦p¤U

Range("a:b").Select
Sele ...
wes µoªí©ó 2013-9-10 00:00
  1. Range("a:b").Select
  2. Selection.FormulaArray = _
  3. "=FREQUENCY(INDIRECT(ADDRESS(1,24,4,1)):INDIRECT(ADDRESS(2,24,4,1))," & _
  4.            "INDIRECT(ADDRESS(1,25,4,1)):INDIRECT(ADDRESS(2,25,4,1)))"
  5. ' ADDRESS(¦C¸¹, Äæ¸¹, 1=$X$1 2=X$1 3=$X1 4=X1, 0=R1C1 1=A1 ªí¥Ü¤è¦¡) -> ¨ú±o¦ì§}ªí¥Ü¤å¦r
  6. ' INDIRECT -> ¨ú±oªí¥Ü¦ì§}ªº¤å¦r©Ò¹ïÀ³ªºÀx¦s®æ°Ñ·Ó
½Æ»s¥N½X

TOP

¥»©«³Ì«á¥Ñ luhpro ©ó 2013-9-11 21:00 ½s¿è
¦^´_  luhpro
·PÁ±zªº¦^ÂСA!¦ý¤S¸I¨ì¤F°ÝÃD¡A¦A¦¸½Ð±Ð±z,
Selection.FormulaArray = _
    "=FREQUENCY(INDIRECT(ADDRESS(2,9,1,1)):INDIRECT(ADDRESS(X,9,1,1))," & _
           "INDIRECT(ADDRESS(15,18,1,1)):INDIRECT(ADDRESS(85,18,1,1)))"
wes µoªí©ó 2013-9-10 22:17

¹ï©óÀx¦s®æªº FormulaArray ¨ç¼Æ¨Ó»¡,
Excel VBA ¥u­nµ¹¥¦¤@­Ó»P "Àx¦s®æ¤½¦¡" §¹¥þ¬Û¦Pªº¦r¦ê§Y¥i.

§A§â¦C¸¹©ñ¦b T4 ¤W, §Y¬O­n¥H T4 Àx¦s®æªº¤º®e°µ¬°¨ä¦C¸¹,
¬G¦Ó¦¹¨Ò³]©wÀx¦s®æ¤½¦¡À³§ï¬° :
  1. =FREQUENCY(INDIRECT(ADDRESS(2,9,1,1)):INDIRECT(ADDRESS(T4,9,1,1)),INDIRECT(ADDRESS(15,18,1,1)):INDIRECT(ADDRESS(85,18,1,1)))
½Æ»s¥N½X
¥ç§Y¥u­n§â X ¥Î T4 ¨Ó¨ú¥N´N¥i¥H¤F.

¥t¦b Excel VBA ¤¤,
¨â­Ó " ¤§¶¡§Y¬°¤@­Ó¦r¦ê,(¦Û«ü¥Oªº¶}ÀYºâ°_)
¦Ó¨â­Ó¦r¦ê¶¡«hÀ³¥Î & ¨Ó³sµ²¨Ï¦¨ ¦r¦êA & ¦r¦êB ªº§Î¦¡,
­Y·Q¦b¸Ó¦r¦ê¤¤´¡¤JÅܼƥi¥H¦b±ý´¡¤Jªº¦ì¸m¤W¥[¤W  " & ÅܼƦWºÙ & "
¨Ï¨äÅܦ¨ "¦r¦êÀY" & ÅܼƦWºÙ & "¦r¦ê§À" ªº§Î¦¡§Y¥i.

TOP

        ÀR«ä¦Û¦b : ¯¸¦b¥b¸ô¡A¤ñ¨«¨ì¥Ø¼Ð§ó¨¯­W¡C
ªð¦^¦Cªí ¤W¤@¥DÃD