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

[­ì³Ð] ¨Ï¥Î¤@¦¸§Y¦Û°Ê§R°£ AND ¨Ï¥Î30¤Ñ«á¦Û°Ê§R°£

[­ì³Ð] ¨Ï¥Î¤@¦¸§Y¦Û°Ê§R°£ AND ¨Ï¥Î30¤Ñ«á¦Û°Ê§R°£

发ªí¤_ 2004-7-9 18:46 | ¥u¬Ý该§@ªÌ
¨Ï¥Î¤@¦¸§Y¦Û°Ê§R°£ AND ¨Ï¥Î30¤Ñ«á¦Û°Ê§R°£
½Ð¥ý¦æ³Æ¥÷¦A¥´¶}
¥»ÀɨϥΤ@¦¸§Y¦Û°Ê§R°£ AND ¨Ï¥Î30¤Ñ«á¦Û°Ê§R°£

½Ð¦ÜOFFICEºë­^¤U¸ü
¨Ï¥Î¤@¦¸§Y¦Û°Ê§R°£ AND ¨Ï¥Î30¤Ñ«á¦Û°Ê§R°£

¥»©«³Ì«á¥Ñ pitera88 ©ó 2012-2-14 01:06 ½s¿è

¦^´_ 1# HUNGCHILIN


    §Ú·Qªº¤èªk¬O¡G
1¡C¶}Àɦ۰ʰõ¦ævba
2¡C³]©w¤G­ÓÀx¦s®æ¦s©ñ¶}±Ò¦¸¼Æ¡A­ì©l³]©w¬°0 ¡C¥t¤@­Ó¦s©ñ¥i¶}±Ò¦¸¼Æ(°²³]1)
3¡C(Ū¨ú­ì©l³]©wÀx¦s®æªº­È)
4¡C¤ñ¹ï³o­Ó­È¬O§_=¥i¶}±Ò¦¸¼Æ­È
5¡C§PÂ_¬O ->Ū¨úÀɮשҦb¸ô®|
             ->§R°£ÀÉ®×(¦³±j¨î§R°£ªº¤èªk§a!!(§Ú·Qªº)) =FILE.DELETE(GET.WORKBOOK(16))³o­Ó2003ª©¦n¹³¤£¯à¥Î¤F ¤£ª¾¦³§Oªº¶Ü
             ->±j¨îÃö³¬ÀÉ®×(¤£¦sÀÉ)

6¡C§PÂ_§_ -> ­ì©lÀx¦s®æ+1

µ²§ô :P

§Ú¥u¯à·Qªk ¦ývba½X ¹ê¦b¤£¦æ  ¦³¤j¤j¥i¥H§â¥¦¼g¥X¨Ó¶Ü

¤@ª½¯»¦n©_¤¤  ·P®¦            

¡°¶}ª©¤j¤jªºÀɮרSªk¯}¸Ñ¡A¬Ý¤£¨ìµ{¦¡½X  :L
¤¯¥S

TOP

³oÀÉ©ñºë­^«Ü¤[¤F¡A¤@ª½³£¨S¦³Âêvbaµ{¦¡

TOP

¥»©«³Ì«á¥Ñ pitera88 ©ó 2012-2-14 21:31 ½s¿è

¦^´_ 3# HUNGCHILIN


    ¤£¦n·N«ä¡A¤~²¨¾Ç²L¡A³oÀɮׯu¬O¤£·|¥h¬ÝVBA(«ö½T©w«á¡A¥L¥uµ¹§Ú¥´­¸¾÷   )

§Ú¤UªºÀɤ£·|¬O¿ùªº§a?? ExcelVBA¦Û°Ê§RÀÉ.rar (192.48 KB)   ²Ä¤@¦¸¤W¶Ç

¤j¤j±Ð¤@¤U¡A­n«ç»ò³B²z§a! ·P®¦


¡°¸Ü»¡¡G¤j¤jµoªº¤å³¹¡A¯uÂ×´I¡C¥¿¦b¬ãŪ¡uÄæ¦C«OÅ@¡v¨º¤@¶ô¡A¯u¬O ----¤Ó¯«¤F¡A¨S¿ìªk§¹¥þ¸Ñ¶}¡A¨þ¨þ  §V¤OK¤å¤¤
1

µû¤À¤H¼Æ

    • HUNGCHILIN: ³o¨Ç³£¬O½m²ßÀÉ®× ¦¹Ãþ§@«~·|¤£Â_¼W¥[ª÷¿ú + 1
¤¯¥S

TOP

¦^´_ 4# pitera88
±N ¥¨¶°->¦w¥þ©Ê ³]¬° §ó°ª , ¦A¥´¶}ÀÉ®×  ´N¥i¬Ý¨ìvba

TOP

¦^´_ 5# GBKEE


    ¥i¥H¬Ý¨ì¤F¡A¨Ó¥h¬ã¨s¤@¤U¤U¡AºCºC¬d

·P®¦
¤¯¥S

TOP

¦^´_ 5# GBKEE


    Sub KillMe()
   Application.DisplayAlerts = False 'µe­±Åã¥Ü(§ó·s)°±¤î
   ActiveWorkbook.ChangeFileAccess xlReadOnly 'Àɮ׳]©w¬°°ßŪ
   Kill ActiveWorkbook.FullName '§R°£¥»ÀÉ«ü©w¸ô®|ªºÀÉ®×
   ThisWorkbook.Close False 'Ãö³¬¥Ø«eÀɮרéñ±ó©Ò¦³¹ï¦¹¬¡­¶Ã¯ªºÅܧó
End Sub

½Ð°Ý¤W­±§Úªº¸ÑŪ¹ï¶Ü??

¥t½Ð°Ý¥i¥H§â¤W­±ªº4¦æ©ñ¨ìEXCEL 4.0¥¨¶°ªí¤º ¦A¥Î©w¸qªº¤è¦¡Âð_¨Ó¶Ü?? ¤£ª¾¹D©R¥O¦³¨S¦³¤@¼Ë?
¤¯¥S

TOP

·Q¾Ç²ß.¦ý¬O¤p¾Ç¥Í¤S¬Ý¤£¨ì..¦n¥i±¤..

TOP

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