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

¨D§U¡G¤µ¤é©Î¤µ¤é¤§«eªº¤é´Á,¦rÅéÅܦâ

¦^´_ 5# K_Wing

     ¦¹¼gªk°w¹ïA5³o­ÓÄæ¦ìªº¤é´Á¥h¸ò²{¦bªº®É¶¡¤ñ¸û~ ¦Ó§ïÅÜÃC¦â~
     ¥i¥H¡A¸Õ°µ¬Ý¬Ý~
  1. Private Sub Worksheet_Change(ByVal Target As Range)

  2. If Target = Range("A5") And Range("A5") < Now() Then
  3.     Range("A5").Interior.ColorIndex = 3
  4. End If

  5. End Sub
½Æ»s¥N½X
¾Ç²ß¤~¯à´£¤É¦Û¤v

TOP

¦^´_ 5# K_Wing


    C4  => Àx¦s®æ CÄæ²Ä4¦C
¾Ç²ß¤~¯à´£¤É¦Û¤v

TOP

DEAR SIR
  ¡y±ø¥ó®æ¦¡¤Æ¡z¸Õ¸Õ§ï¤½¦¡
=IF(C4-NOW()<=0,TRUE,FALSE)
rouber590324 µoªí©ó 2014-12-15 16:29

¦hÁÂ¥S§Ì©Þ¤M¬Û§U
¤w¹Á¸Õ¹L¦b¡y±ø¥ó®æ¦¡¤Æ¡z¥[¤J¦¹¤½¦¡
±o¥Xªºµª®×¬O
µL½×¤µ¤é¤§«e©Î«á
¤é´Á³£·|Åܦâ

¥t·Q°Ý°Ý¤½¦¡¤¤ªº"C4"¬O¥Nªí¬Æ»ò?

TOP

DEAR SIR
  ¡y±ø¥ó®æ¦¡¤Æ¡z¸Õ¸Õ§ï¤½¦¡
=IF(C4-NOW()<=0,TRUE,FALSE)
ù

TOP

¦^´_ 2# p212
·PÁÂ¥S§ÌÀ°¦£
¡y±ø¥ó®æ¦¡¤Æ¡z¦¹¤èªk¤w¸Õ¹L
¥u¯à³W­­¤µ¤Ñ©M¬Q¤Ñ
Àx¦s®æªº¤é´Á¤~·|Åܦâ
¦ý­YµM¦A¦­¤@¨Ç¤é¤l
¤é´ÁÓý¨S¦³Âà¦â

§Ú·Q­nªº¬O¡G¤µ¤é¤S©Î¤µ¤é¤§«eªº¤é´Á·|Åܦâ

TOP

¦^´_ 1# K_Wing

Fig.jpg (70.06 KB)

Fig.jpg

TOP

        ÀR«ä¦Û¦b : ¤H¨ÆªºÁ}Ãø»PµZ¿i¡A´N¬O¤@ºØ¦ÒÅç¡C
ªð¦^¦Cªí ¤W¤@¥DÃD