导航菜单

逆天功能!Excel会记录你的每一步操作!

澳门新葡亰平台网址大全

抗日功能! Excel将记录您操作的每一步!

在编辑excel表单时,如果我们可以不时记录我们的操作过程,那么在我们需要检查修改过程时非常方便。

如下图所示,只要修改了任何工作表中的数据,修改时间,工作表名称,原始值,修改和操作的单元格地址信息都记录在“日志”表中。

5815247684ed425f898a6e7b837c6129.gif

这是一个非常糟糕的效果,如果你想在你自己的表中添加一个日志功能,只需使用蓝色。

步骤1:添加“日志”工作表并输入标题行。

acb4dc8cc9584529b5684f910469290b.jpeg

步骤2:单击工作表上下文菜单中的“查看代码”命令。

31df897c7e4040f7bb04c467befe0ccf.jpeg

步骤3:在打开的窗口中,双击项目窗口中的“Thisworkbook”,然后将以下代码粘贴到右侧的空白处。

7932bfb9aa014301842cb78fc294c5e5.jpeg

代码:

Dim XX

Private Sub Workbook_SheetChange(ByVal Sh As Object,ByVal Target As Range)

On Error Resume Next

如果Sh.Name<> 'Log'和Target.Rows.Count=1然后

使用表格('日志')

如果XX<>目标然后

ROW1=表格('log')。[A65536] .End(xlUp).Row + 1

.Cells(ROW1,1)=格式(现在,'yyyy-mm-dd hh: mm: ss')

.Cells(ROW1,2)=Sh.Name

.Cells(ROW1,3)=XX

.Cells(ROW1,4)=Target.Value

.Cells(ROW1,5)=Target.Address

结束如果

结束

结束如果

结束子

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object,ByVal Target as Range)

XX=Target.Value

结束子

步骤4:关闭上面的代码窗口并返回文件后的工作表 - 另存为 - 类型:Excel启用宏工作簿。

ea620ffbd41b480cb874d213cc6fec1f.jpeg

设置完成!

(注意:删除代码会使日志丢失其记录)

EXCEL精英培训。

点击

,查看更多