excle中inputbox方法的使用

1、首先打开excle软件，进入VBA的编程界面，新建一个子过程WhatRange

2、定义两个变量，一个newrange，一个是question

Dim newrange As Range Dim question As String

3、为question赋一个值。

4、调用inputbox方法，将参数传进去，一个是question,一个是type类型，并将值赋予给newrange。

 Set newrange = Application.InputBox(prompt:=question, _                          Type:=8)

5、设置单元格的格式，这里设置保留两位小数。

newrange.NumberFormat = "0.00"

6、点击顶部菜单的“运行”按钮。

7、回到excle的界面，这时候就可以看到弹出的信息框了。