以下代码可以在sheet1里记录打开工作簿的时间、保存时间和关闭工作簿的时间,现在我还想在A列记录下打开工作簿的人所用的计算机名称该怎么写这代码?也就是电脑登录名称。
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("sheet1").Range("D65535").End(xlUp).Offset(1, 0) = Now
End Sub
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Sheets("sheet1").Range("C65535").End(xlUp).Offset(1, 0) = Now
End Sub
Private Sub Workbook_Open()
Sheets("sheet1").Range("B65535").End(xlUp).Offset(1, 0) = Now
End Sub
不会写代码,可以帮忙写个完整的吗?
追答怎么可能不会写代码,你的问题中不是已经写了那么多代码了吗?