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

­p¼Æ¾¹ªº°ÝÃD

¦^´_ 10# lucky12345
³£¦³°Ú
  1. Private Sub Worksheet_Calculate()
  2.     Application.EnableEvents = False
  3.     If UCase([B1000]) = "K" Then
  4.         Stop
  5.          [q1000:s993] = [q1001:s1008].Value
  6.     End If
  7.     If [F1000] <= 5 Then
  8.         Stop
  9.         Debug.Print [F1000]
  10.         [q993:S1000] = ""
  11.     End If
  12.     Application.EnableEvents = True
  13. End Sub
½Æ»s¥N½X
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¥»©«³Ì«á¥Ñ lucky12345 ©ó 2014-10-29 21:56 ½s¿è

¦^´_ 11# GBKEE
«D±`·PÁ ª©¤j¦p¦¹§Öªº¦^À³
¥i¥H?.........¤ß¤@·Q ²ö«D §ÚPCªº°ÝÃD
«¢.........¦bµ§¹q³ºµMOK¥¿±`  (¥t¤@¥x¤]OK)
¨ä¹ê¤§«e§Ú PC ¤]¦³¥¿±`¨Ï¥Î¹L.......... «á¨Ó³Q§Ú¶Ã§ï   (¤£ª¾­þ­Ó¦a¤è¶]±¼  ©Î¬O¤£·íªº³]©w)
²{¦b§ÚPC  ¥u¯à¥Î¤â°Ê ->¨ìÀ˵øµ{¦¡½X ->«ö°õ¦æ  ¤~·|°µ°Ê¤@¦¸   µLªk¦Û°ÊIJµo(«ç»ò¸Õ³£¤£¦æ)
¤£ª¾¦³¸Ñ§_?  ÁÙ¬O­n­«ÄéExcel
½Ðª¾¹Dªº¤j¤j  ¤£§[«ü¾É   «D±`·PÁ¤j®a
±ß¦w
¥Ø«e¤p¾Ç¥Í´Á«Ý¥L¤é¶i°ê¤¤

TOP

¥»©«³Ì«á¥Ñ GBKEE ©ó 2014-10-30 05:02 ½s¿è

¦^´_ 12# lucky12345
µLªk¦Û°ÊIJµo(«ç»ò¸Õ³£¤£¦æ)??
¬O¦³°õ¦æ¨ì Stop®É«á,©Ò¥H¥u¯à¥Î¤â°Ê ->¨ìÀ˵øµ{¦¡½X ->«ö°õ¦æ  ¤~·|°µ°Ê¤@¦¸
§A¥i¥H§R±¼ Stop ¤F
Stop ¬OÅý§AÆ[¹îµ{¦¡¦³°õ¦æ¨ì If UCase([B1000]) = "K" Then
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¦^´_ 13# GBKEE
G¤j¦­¦w!......
ªG¯u¦p¦¹.............ÁÂÁ±z
¥Ø«e¤p¾Ç¥Í´Á«Ý¥L¤é¶i°ê¤¤

TOP

        ÀR«ä¦Û¦b : ¬Ý§O¤H¤£¶¶²´¡A¬O¦Û¤v­×¾i¤£°÷¡C
ªð¦^¦Cªí ¤W¤@¥DÃD