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

VBAµ{¦¡°õ¦æ²Ö­p®É¶¡

VBAµ{¦¡°õ¦æ²Ö­p®É¶¡

½Ð°Ý¦U¦ì¤j¤j¡A¦p¦ó¼¶¼g¤@­ÓVBA°õ¦æ®É©Ò²Ö­pªº®É¶¡¡A¤§«á¥ÎMsgBoxÅã¥Ü
¦]¬°¤p§Ìªº.txtÀɤºªº¸ê®Æ¦³20~30¸U¦C¡A³v¤@¶}±Ò«á©Òªáªº®É¶¡«Ü¤[
¦³¨S¦³¤°»ò¦n¿ìªk¡A¥i´£¨Ñ°Ñ¦Ò¡AÁÂÁÂ

¥¿»Ý­n¦¹¥\¯à¡A¦ý½Ð°Ý¤p¼Æ¥u­n¨ì¬í«á¤@¦ì­n¦p¦ó­×§ï

TOP

¦^´_ 2# Scott090


    §Ú¬O¸ô¹L...¦ý§Úı±o¤j¤j¦^µªªº«D±`´Î!! ¤£¿ù¤£¿ù~

TOP

¦^´_ 2# Scott090


    ·PÁ¤j¤j ¦^´_¡A¤w§¹¦¨ ÁÂÁÂ^^

TOP

¦^´_ 1# Jason80Lo


sub qq()
Dim Time0#
Time0 =Timer
.
(°õ¦æªºµ{¦¡)
.
.
.
msgbox "°õ¦æ®É¶¡ " & Timer - Time0  & " ¬í", vbOKonly

End sub

TOP

        ÀR«ä¦Û¦b : ¡i¥Í©R¦b©I§l¶¡¡j¦òªû»¡¡G¡u¥Í©R¦b©I§l¶¡¡C¡v¤HµLªkºÞ¦í¦Û¤vªº¥Í©R¡A§óµLªk¾×¦í¦º´Á¡AÅý¦Û¤v¥Ã¦í¤H¶¡¡C¬JµM¥Í©R¥h¨Ó³o»òµL±`¡A§Ú­Ì§óÀ³¸Ó¦n¦n¦a·R±¤¥¦¡B§Q¥Î¥¦¡B¥R¹ê¥¦¡AÅý³oµL±`¡BÄ_¶Qªº¥Í©R¡A´²µo¥¦¯uµ½¬üªº¥ú½÷¡A¬M·Ó¥X¥Í©R¯u¥¿ªº»ù­È¡C
ªð¦^¦Cªí ¤W¤@¥DÃD