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

[µo°Ý] ªí³æ¨÷¶b»P¤u§@ªí±²¶b

[µo°Ý] ªí³æ¨÷¶b»P¤u§@ªí±²¶b

VBAªí³æªº±²¶b¥\¯à­n¦p¦ó°µ¨ì¸ò¤u§@ªíªº±²¶b¥\¯à¤@¼Ë
§Ú·Q­n¦bªí³æ¤W­±«Ø¤@­Ó¨÷¶b
¥Î¥¦¨Ó±±¨î§Ú¤u§@ªí¤Wªº¤@®æÀx¦s®æ  ¨Ò¦p Sheet1  ªºA1
±±¨î¦oªº¤j¤p     ¦V¥ª-1    ¦V¥k+1   ³Ì¤j­È=1000  ³Ì¤p­È=1
µ{¦¡­n«ç»ò¼g ?
³Â·Ðª¾¹Dªº¤H§i¶D§Ú¤@¤U

¦^´_ 1# shadowming
  1. Private Sub ScrollBar1_Change()
  2. With ScrollBar1
  3.    .Max = 1000
  4.    .Min = 1
  5.    [A1] = .Value
  6. End With
  7. End Sub
½Æ»s¥N½X
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¦^´_ 2# Hsieh


ÁÂÁª©¥D
¥i¬O¦³­Ó¤p°ÝÃD
³o­Ó¥u¯à«ü©w·í­¶ªºA1
§Ú¦pªG¤Á´«¨ì¤£¦P¤u§@ªí  §Q¦psheet2
´N¨S¿ìªk°Ê¤F
¤£¯à«ü©w­þ­Ó¤u§@ªí¶Ü??

TOP

¦^´_ 3# shadowming
  1. Private Sub ScrollBar1_Change()
  2. With ScrollBar1
  3.    .Max = 1000
  4.    .Min = 1
  5.    Sheet1.[A1] = .Value
  6. End With
  7. End Sub
½Æ»s¥N½X
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¦^´_ 4# Hsieh

ÁÂÁª©¥Dªº«ü¾É
°ÝÃD¤w¸Ñ¨M
·P®¦

TOP

        ÀR«ä¦Û¦b : ±o²z­nÄǤH¡A²zª½­n®ð©M¡C
ªð¦^¦Cªí ¤W¤@¥DÃD