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

[µo°Ý] vba¤W¨S¿ìªkª½±µÅª¨úC2/B5µ¥Àx¦s®æªº¼Æ­È

[µo°Ý] vba¤W¨S¿ìªkª½±µÅª¨úC2/B5µ¥Àx¦s®æªº¼Æ­È

¥»©«³Ì«á¥Ñ jiuhtsair ©ó 2019-2-19 19:43 ½s¿è

³o°ÝÃD¥i¯à¶W¯Å¤Jªù¡A¤~­è¾Ç²ß¨Ï¥Î¥¨¶°/vba²Ä¤G¤Ñ..
¦ý·Q½Ðª©¤W¥ý¶iµy·L´£ÂI¤@¤U¡A³o¼Ë°ÝÃD­n§Q¥Î¤°»òÃöÁä¦r¨Ó·j´M¤~¯à§ä¨ì¬ÛÃö¸Ñªk

§Ú¥´ºâ§Q¥Îvba¨ÓÀ°§¹¦¨§â¬Y´X¦Cµ¹ÁôÂð_¨Óªº¤u§@¡A
­º¥ý§Q¥Î¿ý»s¥¨¶°¥\¯à¡A§â2~137¦Cµ¹ÁôÂð_¨Ó¡A±o¨ì¤U­±µ{¦¡½X
Sub hide()
'
' hide¥¨¶°
'
    Rows("2:137").Select
    Range("C137").Activate
    Selection.EntireRow.Hidden = True
End Sub

±µµÛ§Ú·Q­n§âÁôÂ꺦C±q2~137§ï¦¨2~¬Ya¦C
a¦Cªº¼Æ­È§Ú¦bªí³æ¸Ì­±³z¹L¥H¤U¤½¦¡ºâ¥X¨Ó¤F
a=MATCH(TODAY(),A2:A207,0)
­¶­±¤W¤]Åã¥Üºâ¥X¨Óªº­È¬O137

µM«á¥´ºâ§â³o­Ó¤½¦¡ª½±µ©ñ¶ivbaµ{¦¡½X¤¤¡A´N¥X²{bug¤FµLªk°õ¦æ
    Rows("2:MATCH(TODAY(),A2:A207,0)").Select
´«¤@­Ó¤è¦¡¡Aª½±µ«ü©w³o­Óa­Èªº©Ò¦b¦ì¸mV212®M¤J¤½¦¡¤¤¡A¤]¬O¤@¼Ëªºª¬ªpµLªk°õ¦æ
    Rows("2:V212").Select

½Ð°Ý¦b³oºØ±¡ªp¤U¡A­n¦p¦óÅývbaŪ¨úexcelªí³æ¤¤ªº¼Æ­È¡H
50 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X

¦^´_ 2# ­ã´£³¡ªL

ÁÂÁ±z´£¨Ñ¤W­zªº¼gªk¡A¦¨¥\¦a°õ¦æ¤F§Ú·Q­nªº°Ê§@
§Ú·|¦A¬Ý¬Ý¬ÛÃöªº³¹¸`¾Ç²ß

¤U¤è¨â­Ó¤£§Q¥ÎÀx¦s®æªº¹Bºâ¤]¥[¤J§Úªºµ§°O¤¤
¥¼¨Ó¾Ç¨ì³o³¡¤Àªº®É­Ô¥i¥H¦A®³¥X¨Ó²z¸Ñ¤@¦¸

¤Ó·PÁ¤F¡I
50 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X

TOP

        ÀR«ä¦Û¦b : ¯à¥I¥X·R¤ß´N¬OºÖ¡A¯à®ø°£·Ð´o´N¬O¼z¡C
ªð¦^¦Cªí ¤W¤@¥DÃD