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

[µo°Ý] §Q¥Î Combobox ¨M©w°j°é°_©l¨ìµ²§ô­È

¦^´_ 1# a703130
  1. For i = Val(Combobox1) To Val(Combobox2)
  2.     sheets(i)...
  3.     ...
  4.     ...
  5.     ...
  6. Next
½Æ»s¥N½X

TOP

¦^´_ 3# a703130
¨S¦³»~¸Ñ,§A¬OComboBox1,ComboBox2 ªº¤º®e¤£ª¾¦p¦ó¥[¤W¶Ü?
  1. Sub Ex()
  2.     Dim xi As Integer
  3.     ComboBox1.Clear
  4.     For xi = 1 To Sheets.Count
  5.         ComboBox1.AddItem xi
  6.     Next
  7. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ¬Ý§O¤H¤£¶¶²´¡A¬O¦Û¤v­×¾i¤£°÷¡C
ªð¦^¦Cªí ¤W¤@¥DÃD