inputbox怎么用（inputbox用法举例）

大家好，小活来为大家解答以上问题。inputbox怎么用，inputbox用法举例很多人还不知道，现在让我们一起来看看吧！

1、引用单元格

2、 inputbox方法的最后个参数值为8的时候,可以用鼠标选择单元格的地址.使用变量是使用SET声明的对象变量,则返回的是一个单元格对象,

3、 '否则反回的这个单元格区域的值,即VBA数组.

4、 Sub text5()

5、 Dim rg As Range

6、 Set rg = Application.InputBox("请选择单元格区域", "选取提示", , , , , , 8)

7、 MsgBox rg.Parent.Name & "!" & rg.Address

8、 End Sub

9、公式引用

10、 '当最后一个参数设置为0时,可以输入公式,返回的也是一个公式字符串,如果公式中含单元格引用,可以自动转换成rc引用格式(以当前活动单元格为参照)

11、 Sub test7()

12、 Dim r

13、 r = Application.InputBox("请输入公式", "输入提示", , , , , , 0)

14、 MsgBox r

15、 End Sub

16、限制输入返回的数值格式

17、 Sub test8()

18、 Dim r

19、 r = Application.InputBox("请输入公式", "输入提示", , , , , , 1) '输入非数字则会提示无效的数字

20、 MsgBox r

21、 End Sub

22、数值数组

23、 '可以选取单元格区域的值作为数组,也可以输入以带有大括号的一维或二维数组

24、 Sub test10()

25、 Dim r

26、 r = Application.InputBox("请输入公式", "输入提示", , , , , , 64) '可以输入字符,当然,文字型数字也符字符

27、 MsgBox r(2, 1)

28、 End Sub

本文到此结束，希望对大家有所帮助。

免责声明：本文由用户上传，如有侵权请联系删除！