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

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

¦^´_ 1# Jason80Lo


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

End sub

TOP

        ÀR«ä¦Û¦b : ¡i°µ¤Hªº¶}©l¡j¨C¤@¤Ñ³£¬O¬G¤Hªº¶}©l¡A¨C¤@­Ó®É¨è³£¬O¦Û¤vªºÄµ±§¡C
ªð¦^¦Cªí ¤W¤@¥DÃD