我需要一个弹出式输入框,要求在2013年4月24日星期五之前有一个很长的日期,然后将日期添加到单元格I2。
我用谷歌搜索这样的东西并找到了
Public Function AskForResult() As String
Dim strUserResponse As String
strUserResponse = InputBox("Please Enter a Long Date")
End Function
但我无法弄清楚如何将输入分配给单元格I2。
由于
答案 0 :(得分:0)
您可以在InputBox行之后添加此行:
ActiveSheet.Cells(2, 9).Value = strUserResponse
2,9是I2的单元格引用 - 第2行第9列。