更新时复制并粘贴为值单元格内容

Question

我有一个工作表，可在添加工作时创建新行。

H列包含一个将true / false输出到J列的复选框，I列中的公式与自定义公式一起使用来显示用户名。

问题在于，用户名将更改为已登录的任何人，而不会保留最初选中该复选框的用户。

我的理论是，我需要一个代码来检查J列更改为true的时间，然后将单元格复制并粘贴为同一行中但位于I列中的值作为

我有以下内容：

Private Sub worksheet_change(ByVal target As Excel.Range)
If target.Column = 10 Then
thisrow = target.Row
If target.value = “TRUE” Then
Range (“I” & thisrow) = Range (“I” & thisrow).Value
End if
End if
End sub

这有效，但是只有当我进入J的单元格并按Enter时，它才能从复选框中识别出更改