如何实现把固定内容自动写入excel_Excel如何把修改记录自动写入批注?
生活随笔
收集整理的這篇文章主要介紹了
如何实现把固定内容自动写入excel_Excel如何把修改记录自动写入批注?
小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
最近忙碌,斷更一段時間,我又回來了,廢話不講,今天我們來分享點有意思的東西?如何把每次修改的記錄和時間全部記錄到批注中?對!我實現了效果如下:
原理:VBA+事件
如何操作呢?
第一步:工作表任意位置,按下組合鍵ALT+F11,進入VBE
(細節百度如何使用宏)
第二步:復制代碼!
A1:G16-----為數據區域,可以自行修改
'日期:2019-11-19'作者:Excel辦公實戰-小易'功能: 記錄單元格變化 , 并寫入批注'------------------------------------------------Option ExplicitPublic oldValuePrivateSub 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 IfEnd SubPrivate Sub Worksheet_SelectionChange(ByVal Target As Range) oldValue = Target.ValueEEnd Sub小結:初學的時候,以為Excel只是一個數值計算器,到后知道原來可以使用SUM,好厲害!再來發現了VLOOKUP,慢慢的才發現原來比計算器厲害多了!
到現在利用宏可以實現大部分有邏輯的功能,但是Power BI又出來了~~~~~
路漫漫其修遠兮~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Excel辦公實戰,歡迎您的關注!
總結
以上是生活随笔為你收集整理的如何实现把固定内容自动写入excel_Excel如何把修改记录自动写入批注?的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: 怎么将电脑设置u启动u盘启动盘 制作U盘
- 下一篇: python的日期格式化_Python日