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

µ¹¤pªB¤Í½m²ß¥[ªkªº°ÝÃD

¦^´_ 2# register313

ÁÂÁÂ register313 ¤j¤j

½Ð°Ý§Ú¦pªG¦³¥[ªk»P´îªk2­Ó¤u§@ªí
VBA­n«ç»ò³]©w©O
¥H«e¨S¥Î¹LVBA
¨º­Ó¥XÃD®×§áÁÙ¤£ª¾¹D«ç»ò°µ¥X¨Ó

TOP

¥»©«³Ì«á¥Ñ Hsieh ©ó 2012-3-5 23:17 ½s¿è

¦^´_ 5# dondon1495

ÃD¥Ø¤w¬O¶Ã¼Æ
µª®×¿é¤J«á´N¤£·|¦AÅÜ°Ê
§R°£µª®×«á´N­«·s¥XÃD
play.gif
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¦^´_ 4# Hsieh

ÁÂÁÂ Hsieh ¤j¤j
¤£¥Î¼gªF¦è³o¬O§Ú§Æ±æªº
¹J¨ì¤@­Ó°ÝÃD
§Ú§âµª®×°Ï Delete ±¼¤§«á
«e­±¤]¥þ¶Ã¤F
¥t¥~´N¬O§Ú´N¤£ª¾¹D«ç»ò¦A¥XÃD¤F:(

TOP

¦^´_ 3# dondon1495
¤£¶·VBA
¤u¨ã/¿ï¶µ/­pºâ
¤Ä¿ï¤ÏÂйBºâ¡A³Ì°ª¦¸¼Æ¬°1

½Ð¥[¸ü¤ÀªR¤u¨ã½c¼W¯q¶°
¥[ªk½m²ß.rar (4.88 KB)
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¦^´_ 2# register313

ÁÂÁ¤j¤j:D

TOP

¥»©«³Ì«á¥Ñ register313 ©ó 2012-3-5 20:25 ½s¿è

¦^´_ 1# dondon1495

°ÝÃD1
¥ÎVBA¸Ñ¨M¥XÃD¤§§xÂZ
  1. Sub ¥XÃD()
  2. For Each R In Union([A3:A22], [C3:C22])
  3.   R.Value = Int(Rnd() * 50)
  4. Next
  5. [E3:E22] = ""
  6. End Sub
½Æ»s¥N½X
1.gif
¥[ªk½m²ß.rar (7.11 KB)

°ÝÃD2
F3=IF(COUNT($E$3:$E$22)=20,IF((A3+C3)=E3,"¡Ô","¡Ñ"),"")

TOP

        ÀR«ä¦Û¦b : ¤f»¡¦n¸Ü¡B¤ß·Q¦n·N¡B¨­¦æ¦n¨Æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD