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

[µo°Ý] ½Ð°Ý¤j¤j~À³¸Ó­n¦p¦ó§ï¤~¤£·|¦³°ÝÃD©O?

[µo°Ý] ½Ð°Ý¤j¤j~À³¸Ó­n¦p¦ó§ï¤~¤£·|¦³°ÝÃD©O?

¤U­±ªºµ{¦¡,·í¹J¨ì¥u¦³¤@¦C¸ê®Æ®É,«K·|¥X²{¿ù»~(¤@ª½¶]µLªk°±¤î)
¦pªG¸ê®Æ¤j©ó¤@¦C¸ê®Æ®É,«K¤£·|¦³°ÝÃD
½Ð°Ý¤j¤j~À³¸Ó­n¦p¦ó§ï¤~¤£·|¦³°ÝÃD©O?

  Range("A3", Range("A3").End(xlDown)).Offset(, 8) = _
                    "=IF((R[0]C2<>R[1]C2)*(COUNTIF(R3C2:R[20]C2,R[0]C2)>1),COUNTIF(R3C2:R[20]C2,R[0]C2),"""")"

¤U­±ªºµ{¦¡,·í¹J¨ì¥u¦³¤@¦C¸ê®Æ®É,«K·|¥X²{¿ù»~(¤@ª½¶]µLªk°±¤î)
¦pªG¸ê®Æ¤j©ó¤@¦C¸ê®Æ®É,«K¤£·|¦³°ÝÃD
½Ð ...
alltest µoªí©ó 2013-1-27 19:52


³Ì²³æªº¤èªk´N¬O¥Î If ... Then ¥]¦í¥HÂo±¼¥u¦³¤@¦C¸ê®Æªº±¡§Î :
If Range("A4") <> "" then
  Range("A3", Range("A3").End(xlDown)).Offset(, 8) = _
                    "=IF((R[0]C2<>R[1]C2)*(COUNTIF(R3C2:R[20]C2,R[0]C2)>1),COUNTIF(R3C2:R[20]C2,R[0]C2),"""")"
End If

TOP

ÁÂÁ luhpro ¤j¤j ªº¸Ñµª
¤w¸g´ú¸Õ¦¨¥\~·P®¦^^

TOP

¦^´_ 2# luhpro


    ÁÂÁ luhpro ¤j¤j ªº¸Ñµª
  ¤w¸g´ú¸Õ¦¨¥\~·P®¦^^

TOP

        ÀR«ä¦Û¦b : ¯à·F¤£·F¡A¤£¦p­W·F¹ê·F¡C
ªð¦^¦Cªí ¤W¤@¥DÃD