经过一段时间的忙碌,我终于又回来了。废话不多说,今天给大家带来一个非常有趣的内容——如何将每次的修改记录和时间完整地记录到批注当中呢?没错,我成功地实现了这个功能,现在就来分享给大家。

效果展示如下:

在Excel中怎样实现将修改记录自动写入批注?-趣帮office教程网

其实现原理是借助 VBA 和事件来达成。

在Excel中怎样实现将修改记录自动写入批注?-趣帮office教程网

那么具体该如何进行操作呢?

第一步:在工作表的任意一处,按下组合键 ALT F11,从而进入 VBE 开发环境。(如果不清楚如何使用宏,可以通过百度进行查询相关细节。)

第二步:复制以下代码。

这里的“A1:G16”表示数据区域,可以根据实际情况进行自行修改。

'日期:2019-11-19
'作者:Excel办公实战-小易
'功能: 记录单元格变化 , 并写入批注
'------------------------------------------------
Option Explicit
Public oldValuePrivate
Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count <> 1 Then Exit Sub
'A1:G16-----为数据区域,可以自行修改
If Not Intersect(Target, Range("A1:G16")) Is Nothing Then
If oldValue <> Target.Value Then
If Target.Comment Is Nothing Then
Target.AddComment Format(Now, "yyyy-mm-dd hh:mm:ss") _
& " " & oldValue & "->" & Target.Value
Else:
With Target.Comment
.Text Text:=.Text & vbNewLine & _
Format(Now, "yyyy-mm-dd hh:mm:ss") & " " _
& oldValue & "->" & Target.Value
.Shape.TextFrame.AutoSize = True
End With
End If
End If
End If
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
oldValue = Target.ValueE
End Sub

在Excel中怎样实现将修改记录自动写入批注?-趣帮office教程网

小结:在刚开始学习 Excel 的时候,很多人可能仅仅认为它就是一个普通的数值计算器。但随着学习的深入,我们发现原来可以使用 SUM 函数,这让人感觉非常厉害。接着又接触到了 VLOOKUP 函数,这时才逐渐意识到 Excel 的强大之处远不止于一个简单的计算器。如今,通过利用宏可以实现大部分具有逻辑功能的操作。然而,与此同时,Power BI 等新的工具又不断涌现出来。