1.获取A列最后一个不为空的单元格,表名.[A65536].End(xl方向).Row
lastNotEmptyRow = Sheet1.[a65536].End(xlUp).Row
2.获取第一行最后一个不为空的单元格,表名.[A65536].End(xl方向).Column
lastNotEmptyColumn = Cells(2, 255).End(xlToLeft).Column
3.获取当前日期,当前日期和时刻
current_date = Date
current_date_time = Now
4.日期相加,加一天/一月/一年的函数,
DateAdd(interval, number, date)
interval 必要。字符串表达式,是所要加上去的时间间隔。
number 必要。数值表达式,