主题：[求助]如何在单元格输入内容后，自动填入当前用户名？

如何在单元格输入内容后，自动填入当前用户名？

 肯定是需要用一个地方存放用户名的。那你想把用户名填到那里？当前单元格？

DataColChaing 事件

 

If e.DataCol.Name = "第一列" Then

    e.newValue = e.NewValue & " " & user.Name

End If

是的，我试试。。。

我不会变通，我录入数据后确实加入了用户名，可是删除内容后，自动加入的用户名删不掉，

你删除的时候，要把所有内容包括用户名一起删除

 

If e.DataCol.Name = "第一列" Then
    If e.NewValue <> Nothing Then
        e.newValue = e.NewValue & " " & user.Name
    End If
End If

已解决，尝试了好多的代码拼接，不容易啊

我这么写对么？

差不多，参考6楼。