- ©«¤l
- 6
- ¥DÃD
- 1
- ºëµØ
- 0
- ¿n¤À
- 7
- ÂI¦W
- 0
- §@·~¨t²Î
- Vista
- ³nÅ骩¥»
- office 2010
- ¾\ŪÅv
- 10
- µù¥U®É¶¡
- 2014-6-28
- ³Ì«áµn¿ý
- 2017-1-8
|
[µo°Ý] Excel VBA ¦p¦ó¥Î inputbox ¨ú±oÀx¦s®æªº¦æ»P¦C
§Ú·Qn¨Ï¥Î inputbox ¨ú±o¬YÀx¦s®æªº¦æ»P¦C,
¼g¤F¤U¦Cªº VBA ªº¬O¤@ª½¥X²{¿ù»~, ½Ð±Ð¤j®a°ÝÃDÂI¦b¨º,
·PÁÂÀ°¦£.
Dim code As Range
Dim Code_Row As Integer
Dim Code_Column As Integer
code = Application.InputBox(prompt:="¿é¤J Code Äæ¦ì") '¥X²{¨S¦³³]©wª«¥óÅܼƩΠwith °Ï¶ôÅܼÆ
If code = "" Then Exit Sub
Code_Row = code.Row
Code_Column = code.Column |
|