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

½sĶ¿ù»~,©óÁôÂüҲÕ

¥ýÁ¹L¦U¤j¤j¦^À³, °J¤ß·PÁÂ,
¤µ¤é«öHSIEH¤j¤jªº±Ð«ü¾É, ¸Ñ°£«OÅ@, ¦b¤½¥q¤¤¦A¶}±Ò¸ÓÀÉ®×, ¦pHSIEH¤j¤j©Ò¨¥, ¸õ¥X¿ù»~³B, ¦ý¤p§Ì¹ê¬Ý¤£¥X¿ù¦b¦ó³B, ¦Ó¬°¦ó¤p§Ì®a¤¤¤Î¤½¥q¤¤ªº­Ó¤H¹q¸£«h¨S¦³°ÝÃD, ½Ð¤j¤j¨ó§U­×§ï,
solely¤j¤j, ÁÂÁ¦^À³, ¤j¤j©Ò«ü¥X¤§³B, ¤p§Ì©ú¤Ñ·|¦^¤½¥q¸Õ¸Õ, °J¤ß·PÁ¦^À³,
§Ú²{§â¸ÓÀɮפW¶Ç, ½Ð¤j¤j¨ó§U­×§ï, ¹ê·P¿E¸U¤À....
aa.rar (31.27 KB)

TOP

If T.Count > 2 Then End¬°¤°»ò¼g¨â¦æ¡H
§â²Ä¤@¦æ§ï¦¨dim C as range¸Õ¸Õ¡C

TOP

¥»©«³Ì«á¥Ñ Hsieh ©ó 2010-11-24 19:38 ½s¿è

oobird¤j¤j,Solely¤j¤j, 两¦ì¦n,¥ýÁ¹L¦^À³
两¦ì¤j¤jªº«ü¾É, °ÝÃDÁÙ¬O¸Ñ¨M¤£¨Ó,
Solely¤j¤j©Ò«ü¥X, ¤£ª¾§Ú¬O§_¦³²z¸Ñ¿ù, ÁÙ½ÐSolely¤j¤j¦A«×«ü¾É, ¦]«ö¨ä«ü¥Ü­×§ïÁÙ¬O¤£¦¨¥\, ÁÂÁÂ!!
oobird¤j¤j, ¤w«ö¨ä­×§ï³B­×§ï, µ{¦¡¿ù»~³B§e²{§À³BCalendar1.Visible = False,½Ð¤j¤j±Ð¾É, ÁÂÁÂ!!

Private Sub Worksheet_SelectionChange(ByVal T As Range)
dim C as range
If T.Count > 2 Then End
For Each C In [d15:d35]
If C.Value >= 1 And C.Value < 500 Then C.Borders(6).LineStyle = 1
Next
If Not Application.Intersect([h15:h35], T) Is Nothing Then
If T.Borders(6).LineStyle = 1 Then
T.Borders(6).LineStyle = 0
Else
T.Borders(6).LineStyle = 1
End If
ElseIf T.Address = "$I$10:$J$10" Then
   Calendar1.Visible = True: Calendar1 = Date
   Else
   Calendar1.Visible = False
End If
End Sub

TOP

³o¼Ëªº¸Ü´X¥G¥i¥HÂ_©w¦p4¼ÓMinª©¥D©Ò»¡ªº¡A³]©w¤Þ¥Î¶µ¥Ø¿ò¥¢ªº°ÝÃD¤F¡C
¦b³]©w¤Þ¥Î¶µ¥Ø¤¤§ä¨ì¿ò¥¢ªº¤Þ¥Î¡A¨ú®ø¤Ä¿ï¡CµM«á³Ì¦nÀx¦s«á­«±Ò¡I
­YÁÙ¬O¤£¦æ¡AÀ³¸Ó³o¥x¹q¸£¨S¦³§â¤é¾ä±±¥ó©Ô¥X¨Ó¡I

TOP

¦^´_ 13# ©P¤j°¶


    À³¬O§Aªº¤ë¾ä±±¨î¶µ¤£¦s¦b¡AÅýEXCEL³B©ó³]­p¼Ò¦¡
¬Ý¬Ý¦³¨S¦³¬Ý¨ì¤ë¾ä±±¨î¶µ¡A­Y¬O¨S¦³´N³]¸m¤W¥h
¦]¬°§A»¡¨ä¥L¹q¸£¥i¥H°õ¦æ¡A¦³¥i¯à¿ò¥¢±±¨î¶µ
±q¤u¨ã/³]©w¤Þ¥Î¶µ¥Ø¤¤Àˬd
¤Ä¿ïMicrosoft Calendar Control 2007(³o¬O2007ª©¤¤©Ò¨£¦WºÙ)
¨S°O¿ùªº¸Ü2003ª©«eÀ³¸Ó¬O¤é¾ä±±¨î¶µ?.0
­Y¬O¨S¦³¦¹±±¨î¶µ¥i¤Ä¿ï¡A¥i¯à¬O¨º¥x¹q¸£¨S¦³¦w¸ËAccess
­«·s¦w¸ËAccess¬Ý¬O§_¯à¸Ñ¨M°ÝÃD
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

2003ª©¬O1.1
2002¬O1.0

TOP

¦pªG¡A¿ù»~³Ì«á°±¯d¦bCalendar1.Visible
¨º´N¹³¦U¦ìª©¥D©Ò»¡ªº¡A¨ä¥L±±¨î¶µùبS¦³¤ë¾ä±±¨î¶µXD
¦pªG¡A§A­Ì¤½¥qªº¹q¸£©M§Ú­Ì¤½¥qªº¤@¼Ëªº¸Ü
¨º»ò¡A¥¦­Ì¬O¬Ý¤£À´¤°»ò¬O[I10]¡BChr(10)¡BFor Each C...

TOP

"oobird"Soleiy"Hsieh"Min"¤j¤j,
¦n, ÁÂÁ¦^À³, ¬Ý§¹¤F³o´X¬q«ü¾É, Á`µ²¬O§ä¤£¨ì¤ë¾ä±±¨î¶µ, ¤ß·Q, ®a¤¤¹q¸£¤Î¤½¥q­Ó¤H¹q¸£³£¥i¥H¨Ï¥Î¸Ó¤ë¾ä±±¨î¶µ, ¬°¦ó¦b¤½¥q¨ä¥¦¹q¸£¤¤¥Î¤£µÛ, ¦P¬O03excel, ¬°¦ó¦³¦¹±¡ªp, ¦A½¬Ý¦U¤j¤j«ü¾É¤å,Hsieh¤å¤¤´£¨ìaccess, ¦AÁp·Q¦U¤j¤j¤å¤¤©Ò´£¤Îªº¨S¦³¸Ó±±¨î¶µ, ¸£®ü¬ðµM©ú¥Õ¤F¤@¥ó¨Æ, µ{¦¡½XÀ³¨S¿ù»~, ¦p¦U¤j¤j©Ò»¡, ¨S¦³¸Ó±±¨î¶µ, ¦]®a¤¤¤Î¤½¥q­Ó¤H¹q¸£¯à¨Ï¥Îªº­ì¦]¬O¦w¸Ë¤Faccess, ¸Ó³n¥ó¬O¦³¤ë¾ä±±¨î¶µ, ¦Ó03excel, ¦³¨S¦³¸Ó¤ë¾ä±±¨î¶µ, ¦Ó¯à¥¿±`¨Ï¥Î¤¤, ³£¬O¦w¸Ë¤Faccess, ³oÂI§Ú¤@ª½³£©¿²¤, ·íµM¯u¥¿­ì¦]©ú¤Ñ¦^¨ì¤½¥q¤¤¦A¦LÃÒ«Kª¾¾å, ¦b¦¹¦A¦¸ÁÂÁ¦U¤j¤jµL¨pªº«ü¾É, ·P®¦, Ä@¥D§È¦ö¦U¤j¤j..

TOP

¥»©«³Ì«á¥Ñ ©P¤j°¶ ©ó 2010-11-25 18:55 ½s¿è

²×©ó¦LÃÒ¤F, ¦p¤j¤j­Ì©Ò»¡, ¬O¨S¦³¸Ó¤ë¾ä±±¥ó, §Ú¥Îªº¹q¸£¦³access³n¥ó,¦Ó¦b¨S¦³¸Ó³n¥ó¹q¸£¤¤¨Ï¥Î,¨Sªk¨Ï¥Î¸Ó±±¨î¶µ, §Ú¦b±±¨î¤u¨ã½c¤¤,¨ä¥L±±¨î¶µ¤¤¬d¬Ý¦³¨S¦³¸Ó¤ë¾ä±±¨î¶µ, ¯u¬O¨S¦³¸Ó±±¨î¶µ,³o«K¨Ï°g´b¦h®Éªº°ÝÃD¸Ñ¶},
ÁÂÁ¤j¤j­Ì©ó¦¹´Á¶¡ªº«ü¾É,

¦ý§Ú¦³¥t¤@°ÝÃD½Ð±Ð,excel³n¥ó¬O¤£¬O¨S¦³¸Ó±±¨î¶µ,¦Ó¥²¶·¨ã³Æaccess³n¥ó,¤~¯à¥Î¨ì¸Ó¤ë¾ä±±¨î¶µ, ¥i¦³¨ä¥¦³~®|,µL¶·¦w¸Ëaccess³n¥ó,¦Óexcel³n¥ó´N¥i¨Ï¥Î¤ë¾ä±±¨î¶µ. ÁÂÁÂ!!

TOP

§â§A¹q¸£¤¤ªº½Æ»s¹L¥h´N¦æ¤F¡I

TOP

        ÀR«ä¦Û¦b : ¦Y­W¤F­W¡B­WºÉ¤Ü¨Ó¡A¨ÉºÖ¤FºÖ¡BºÖºÉ´d¨Ó¡C
ªð¦^¦Cªí ¤W¤@¥DÃD