Excel中创建一个宏按钮，使点击宏按钮时弹出一个输入框，在输入框内输入数值，数值依次显示在B:B

Question

Excel中创建一个宏按钮，使点击宏按钮时弹出一个输入框，在输入框内输入数值，数值依次显示在B:B的单元格中，数值从B3从B3开始录入，宏的代码怎么写？

Answer 1

Private Sub CommandButton1_Click()

    Dim I As Long

    I = Application.WorksheetFunction.Max(3, Range("B" & Rows.Count).End(xlUp).Row + 1)

    Range("B" & I).Value = InputBox("ÇëÊäÈë:")

End Sub

追问

最后那个括号里的是啥

追答

那是我随便写的几个汉字“请输入：”，没注意粘贴到网页上变成乱码了，这无所谓的。

追问

中间的代码运行不了，如图

追答Private Sub CommandButton1_Click()    Dim I As Long   I = Range("B" & Rows.Count).End(xlUp).Row + 1
   if I <3 then I =3    Range("B" & I).Value = InputBox("请输入值:")End Sub

改成这样试试

Answer 2

输入框是输入一个数据回车还是一下子全输入。追问

一个

大神有方案么

追答

另一层楼已经回答的很好了。还需要什么你要说呀。