如题，批注的内容是 “人名 YYYY/MM/DD HH：MM：SS”

up

当前工作表change事件，人名可以由一个变量确定，自己修改
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
　If Target.Rows.Count + Target.Columns.Count > 2 Then Exit Sub
　With Target
　　If Len(Trim(.Value)) Then
　　　.ClearComments
　　　.AddComment
　　　.Comment.Text "人名:" & Format(Now, "yyyy/mm/dd hh:mm:ss")
　　End If
　End With
End Sub

怎么联系你

我猜