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

[µo°Ý] ½Ð°Ý¦p¦ó¦bB5¿é¤JA­È¡A¦bC5¿é¤J­n§ó§ïªº­È¡A¥h­×§ïc17~25ªº­È(¤w¸Ñ¨M)

¦^´_ 1# ´Ñ»y³¾»ï
  1. Sub ¯x§Î2_Click()
  2. Set a = [B17:B25].Find([B5], lookat:=xlWhole)
  3. If Not a Is Nothing Then a.Offset(, 1) = [C5]
  4. End Sub
½Æ»s¥N½X
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

        ÀR«ä¦Û¦b : §Ú­Ì³Ì¤jªº¼Ä¤H¤£¬O§O¤H¡D¥i¯à¬O¦Û¤v¡C
ªð¦^¦Cªí ¤W¤@¥DÃD