- ©«¤l
- 5
- ¥DÃD
- 0
- ºëµØ
- 0
- ¿n¤À
- 6
- ÂI¦W
- 0
- §@·~¨t²Î
- Win7
- ³nÅ骩¥»
- 2010
- ¾\ŪÅv
- 10
- ©Ê§O
- ¨k
- ¨Ó¦Û
- HC
- µù¥U®É¶¡
- 2015-1-20
- ³Ì«áµn¿ý
- 2021-12-17
|
§Ú¸òµo¤åªº¤j¤j¦³¤@¼Ëªº°ÝÃD~~~
¤U±¬O§Ú¼gªº¨ç¼Æ~~~~
¥i¬O«öÁä°õ¦æ«á¡A´N¥X²{"µLªk¨ú±oÃþ§OWorksheetFunction ªºVLookup ÄÝ©Ê"
½Ð°Ý¬Oþ¸Ì¥X¤F°ÝÃD~~~~
½Ð¤j¤j«ü±Ð
Private Sub CommandButton5_Click()
myForm.Label13.Caption = Application.WorksheetFunction.VLookup(myForm.ComboBox1.Text, ¤u§@ªí1.Range("A:E"), 2, False)
End Sub |
|