vba 将弹出窗口的输入分配给excel中的单元格

Assign input of pop up window to a cell in excel

提问by xyz

I need a pop up imput box that asks for a long date ex Friday, April 24, 2013 then adds the date to cell I2.

我需要一个弹出输入框，要求输入一个长日期，例如 2013 年 4 月 24 日星期五，然后将日期添加到单元格 I2。

I Googled looking for something like this and found

我用谷歌搜索这样的东西，发现

Public Function AskForResult() As String
    Dim strUserResponse As String

    strUserResponse = InputBox("Please Enter a Long Date")

End Function

But I can't figure out how to assign the input to the cell I2.

但我不知道如何将输入分配给单元格 I2。

Thanks

谢谢

采纳答案by David

You could add this line after your InputBox line:

您可以在 InputBox 行之后添加此行：

ActiveSheet.Cells(2, 9).Value = strUserResponse

the 2, 9 is the cell reference for I2 - row 2, column 9.

2, 9 是 I2 的单元格引用 - 第 2 行，第 9 列。