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

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

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

¥»©«³Ì«á¥Ñ a703130 ©ó 2012-3-26 17:26 ½s¿è

§Ú·Q½Ð°Ý¤j¤j

¥Ø«e§Ú¦³µ{¦¡¬O§Q¥Îsheets(i)¨Ó°µ°j°é
¨Ò¦p
  1. For i=6 to 16
  2.     sheets(i)...
  3.     ...
  4.     ...
  5.     ...
  6. Next
½Æ»s¥N½X
¦ý¬O§Ú¤Sı±o³o¼Ë¼g¦º¤£¤Ó¤è«K
©Ò¥H§Ú·Q­n§Q¥ÎCombobox¨ÓÅý¨Ï¥ÎªÌ¨M©w­n±q­þ­Ó­¶­±¶}©l
Combobox1 ¨M©w¶}©lªº¦a¤èÅܼÆx¡ACombobox2 «h¬Oµ²§ôªº¦a¤èÅܼÆy

¤£ª¾¹DÀ³¸Ó¦p¦ó¼¶¼g³oµ{¦¡??

§Úªº¤u§@­¶©T©w±q²Ä6­¶¶}©l~²Ä16­¶µ²§À
¤@¶}©l­n¥ý±N¤W­±6~16ªºsheetname¥[¤Jcombobox
¨Ï¥ÎªÌÂI¿ïcombobox1¥H¤Îcombobox2 ±a¥X x¡ByÅܼÆ

§Ú¦A±a¤J§Úªºµ{¦¡

¦^´_ 2# GBKEE


    ©êºp¤j¤j§Úªº°ÝÃD~°Ý±o¤£¦n³y¦¨±zªº²z¸Ñ¤W¦³¸¨®t
    §Ú»¡ªºcombobox ¬O¤U©Ô¦¡¤è¶ô

TOP

¦^´_ 4# GBKEE

¹ï¡A¦]¬°§Úfor °j°éªº°_©l-µ²§ô ¬Osheets()
°Q½×°Ï¤W±Ðªº¬O¥Î  ComboBox1.List = Array()

§Ú´N¤£ª¾¹D­n¦p¦ó§Q¥Î sheets©Ò¦bªº­¶­±number·í§@°j°éªº°_©l-µ²§ô

¥t¥~§Ú¤]¤£ª¾¹D­n¦p¦ó¦bExcel ¥´¶}ªº®É­Ô±Nsheets(6)~sheets(16)ªºName ©ñ¤J combobox1¡Bcombobox2 ªº¦Cªí¸Ì­±

TOP

¦^´_ 7# Hsieh

ÁÂÁ H ¤j¥H¤Î¤W­±¤j¤j¡Aµo°Ý¤]¬O¤@ªù¾Ç°Ýªü
¨ä¹ê§Úªº°ÝÃD«Ü²³æ´N¬O
§Ú¦b¤@¶}©l¶}±ÒExcel «á­nÅýCombobox1¦Û°Ê¸ü¤JSheets(i)
¦Ó combobox1.additem sheets(i).name ¸Ñ¨M¤F§Úªº°ÝÃD
¦]¬°§Ú¦badditem¸ò sheet(i).name ¦h¤F¤@­Ó =

TOP

        ÀR«ä¦Û¦b : ª¾ÃÑ­n¥Î¤ßÅé·|¡A¤~¯àÅܦ¨¦Û¤vªº´¼¼z¡C
ªð¦^¦Cªí ¤W¤@¥DÃD