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

½Ð±Ð¥X²{¡u°õ¦æ¶¥¬q¿ù»~13:«¬ºA¤£²Å¦X¡v¡I

¦^´_ 2# barrykuo
¸Õ¸Õ¬Ý
  1. Option Explicit
  2. Sub Ex()
  3.     Dim printime
  4.     Sheets(1).Range("C3") = "=aa"  '¦pªG ¨S¦³³o¤½¦¡->¿ù»~­È
  5.     printime = Sheets(1).Range("C3")
  6.     If printime >= 94455 Then '¥X²{¿ù»~°T®§¡A«ö¤U°»¿ù¡A³o¸Ì¥X²{¤Ï¥Õ¡A½Ð°Ý­þ¸Ì¦³¿ù»~¡H
  7.    
  8.     End If

  9. End Sub
½Æ»s¥N½X
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¦pªG§â±zµ¹ªºµ{§Ç¦b«Å§i¥[¤WAs Double¡A"aa"§ï¦¨94456©Î¬O94454¡A¦A°õ¦æµ{§Ç¡A´N¨S¦³¦A¥X²{¿ù»~°T®§¡C

°ÝÃD¬O  c_c_lai  ¤w¦^ÂЧA:
  §A¥ý¬Ý¬Ý "C3" ªº¤º®e¬°¦ó¡H
Ä´¦p¡G ¨ä­È¦p¬° #VALUE! ©Î¬O #NUM! µ¥¡A
              ¦p®³¨Ó°µ¹Bºâ©Î¤ñ¸û¥ç·|¥X¿ù¡C
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

        ÀR«ä¦Û¦b : ¤£­n¤p¬Ý¦Û¤v¡A¦]¬°¤H¦³µL­­ªº¥i¯à¡C
ªð¦^¦Cªí ¤W¤@¥DÃD