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

°õ¦æµ{¦¡®ÉÅýProgressBar Åã¥Ü¶i«×

¦^´_ 1# bear0925900003


    ³o­Ó¬O¤£¬O§A·Q­nªº¡G
Application.DisplayStatusBar = True
Application.StatusBar = "½T©w¤@ ..."

TOP

¦^´_ 3# bear0925900003

³o¬OÅã¥Ü StatusBar°T®§¡A¦bExcel¥ª¤U¨¤¡G
Sub test()
      Application.DisplaystatusBar = True
      Application.statusBar = " ´ú¸Õ ......."
      Application.DisplayStatusBar = False
End sub
¤@¨B¨B¤â°Ê´ú¸Õ

°²¦p¤@©w­n ProgressBar¡A½Ð°Ñ¦Ò¤U¦Cºô§}¡A¦ý½Ð½T»{§AªºUSERFORM­n¯à¦³ ProgressBar ±±¥ó¡G   
http://club.excelhome.net/forum.php?mod=viewthread&tid=395683&authorid=167149&page=25

TOP

¦^´_ 5# bear0925900003


    ³o¬O¦P¤@ºô¯¸¤U¸üªº¦¨«~¡Aµ{¦¡´N©ñ¦bVBAªº½s¿è°Ï¤º
133-1 ¨Ï¥Î¶i«×±ø±±¥óProgressBar.rar (12.33 KB)

TOP

¦^´_ 7# bear0925900003


    ¸ÕµÛ¦b cells(i,1)=1 ªº¦a¤è¸ÕµÛ©ñ¤J ­n°õ¦æªºµ{¦¡½X¸m´«±¼ Cells(i,1)=1
¥H¤Uªº¦a¤è½Ð¦A°Ñ¦Ò¡G
http://forum.twbts.com/viewthrea ... ht=%B6i%AB%D7%B1%F8

¤]³\§âÀɮפW¶Ç¡A¥i¥H¸û¨ãÅ骺¤¬¬Û¬ã¨s¤@¤U

TOP

        ÀR«ä¦Û¦b : Ãø¦æ¯à¦æ¡AÃø±Ë¯à±Ë¡AÃø¬°¯à¬°¡A¤~¯àª@µØ¦Û§Úªº¤H®æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD