Excel 找到下一个打开的单元格并输入今天的日期

Excel 找到下一个打开的单元格并输入今天的日期

我有一个电子表格,用于跟踪我工作大楼附近的火车过境点,用于一个项目。到目前为止,每当我听到火车经过时,我都会打开表格,转到下一个可用行,在 A 列输入日期,在 B 列输入时间。我将它们分开保存,因为我将根据一年中的时间绘制一天中不同时间的火车过境点。我可以使用什么 VBA 代码来找到下一个打开的行,然后将当前日期添加到 A 列,将当前时间添加到 B 列?提前谢谢您。

答案1

怎么样:

Sub qwerty()
    Dim n As Long
    n = Cells(Rows.Count, 1).End(xlUp).Row + 1
    Cells(n, 1).Value = Date
    Cells(n, 2).Value = Time
End Sub

相关内容