在excel中，当用户访问工作表时，使用用户名自动捕获日期和时间

有人能帮我找到excel工作表的代码吗 我有一个excel表格，它保存在一个共享驱动器中，供许多处理器使用。 将有一张最新更新的表格。 当任何人打开宏时，宏都会弹出一个问题“如果您已经查看了最近的更新？” 若用户单击“是”，则宏应停止，若用户单击“否”，则应将其带到名为“更新”的工作表。此外，它还应该从列表中捕获日期、时间和用户名，宏将在其中捕获日期和时间的工作表中显示这些内容

---

这只是为了确认特定的处理者是否访问了更新页面。

将此代码放入工作表的代码部分

Private Sub Worksheet_Activate()
    If MsgBox("If you have gone thru recent updates?", vbYesNo) = vbNo Then
        ThisWorkbook.Sheets("Updates").Activate
        MsgBox Environ("UserName") & ": " & Now()
    End If
End Sub

---

这个问题似乎离题了，因为堆栈溢出不是一个代码编写服务。显然，堆栈溢出是一个代码编写服务。此外，根据Meta，不要要求用户投票并接受（而不是你错误地称之为“最爱”）你的答案：