小编Dun*_*ley的帖子

我正在尝试制作一个要求一天的Excel宏,然后将其插入下一个打开的单元格.这是我试图使用的代码.

Sub Button7_Click()
    Dim AddName As String
    AddName = InputBox("Date: Month/Year", "Add Date", "01/00")
    Sheets("Sheet2").Select
    Selection.End(xlUp).Select
    ActiveCell.Offset(1, 0).Range("A1").Select
    Range("A1").Value = AddName
End Sub

它将我输入的那一天放入单元格A1,无论其中是什么,然后选择行A中的下一个打开单元格.

我觉得答案很简单,但我无法理解!