¦p¦óÅýComboBoxŪ¨úªº¸ê®ÆªºÃC¦â©MÀx¦s®æÃC¦â¤@¼Ë
- ©«¤l
- 703
- ¥DÃD
- 276
- ºëµØ
- 0
- ¿n¤À
- 1005
- ÂI¦W
- 1
- §@·~¨t²Î
- Windows 10
- ³nÅ骩¥»
- Office 2019
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2011-6-30
- ³Ì«áµn¿ý
- 2024-5-29
|
¦p¦óÅýComboBoxŪ¨úªº¸ê®ÆªºÃC¦â©MÀx¦s®æÃC¦â¤@¼Ë
- Private Sub ComboBox1_Enter()
- Set X = Sheets("Name")
- ComboBox1.List = X.Range("C2", X.[C2].End(xlDown)).Value
- End Sub
½Æ»s¥N½X C2°²¦p¬O¬õ¦â¡AComboBox´N·|¦³¬õ¦âªº¦r¡C |
|
|
|
|
|
|
- ©«¤l
- 552
- ¥DÃD
- 3
- ºëµØ
- 0
- ¿n¤À
- 578
- ÂI¦W
- 0
- §@·~¨t²Î
- win7
- ³nÅ骩¥»
- office 2010
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2015-2-8
- ³Ì«áµn¿ý
- 2024-7-9
|
¦^´_ 1# av8d
ComboBox1.ForeColor = X.Range("C2").Font.Color
¤å¦rÃC¦â¥u¯à¤@ºØ®@¡A¤£¯à¨C¤@Ó³£¤£¦P |
|
|
|
|
|
|