excel图表如何记录指定单元格每次修改的时间

~ Q：我想要在用户修改工作表指定单元格的内容时，在另一工作表中记录修改的时间。例如，在工作表Sheet1的单元格B2中，每次用户将该单元格值修改为某一大于0的数值时，则在工作表LogB2中记录下其修改的时间。
具体地说，如果在2019年10月24日19时30分30秒，用户将单元格B2中的值修改为280，那么在工作表LogB2中记录下时间2019-10-24 19:30:30；如果在2019年10月25日8时10分15秒又将单元格B2中的值修改为100，那么工作表LogB2中增加一条时间记录2019-10-25 8:10:15。
A：这可以使用工作表事件来完成。
打开VBE，双击工作表Sheet1对象模块，输入代码：
Private Sub Worksheet_Change(ByVal Target As Range)
Dim rngInput As Range
Dim rngLog As Range
‘要记录其修改时间的单元格
Set rngInput = Range(“B2”)
‘确定单元格是目标单元格
If Intersect(rngInput, Target.Cells(1, 1)) Is Nothing Then Exit Sub
‘修改为小于0的值不记录
If rngInput.Value <= 0 Then Exit Sub
‘将修改单元格时的时间记录到工作表LogB2
With Worksheets(“LogB2”)
‘工作表最后一行
Set rngLog = .Cells(.Rows.Count,1).End(xlUp)
‘确定工作表最后一行单元格含有值
If Len(rngLog.Value) > 0 Then
‘移至下方相邻的空单元格
Set rngLog = rngLog.Offset(1, 0)
End If
End With
‘写入当前时间
rngLog.Value = Now
End Sub
Q：我想增加记录另一个单元格的修改时间，例如单元格D2每次修改的值大于0时，将修改的时间记录到工作表LogD2中，如何编写代码？
A：同样使用工作表事件来完成。
打开VBE，双击工作表Sheet1对象模块，输入代码：
Private Sub Worksheet_Change(ByVal Target As Range)
Dim rngLog As Range
Dim wksLog As Worksheet
‘根据所修改的单元格
‘赋值相应的工作表
Select Case Target.Cells(1, 1).Address
Case “$B$2”
Set wksLog =Worksheets(“LogB2”)
Case “$D$2”
Set wksLog =Worksheets(“LogD2”)
Case Else
Exit Sub
End Select
‘如果修改的值小于0则不记录修改时间
If Target.Cells(1, 1).Value <= 0 ThenExit Sub
With wksLog
‘工作表数据所在的最后一行
Set rngLog = .Cells(.Rows.Count, 1).End(xlUp)
‘如果最后一个数据单元格包含值
If Len(rngLog.Value) > 0 Then
‘偏移到下方相邻单元格
Set rngLog = rngLog.Offset(1, 0)
End If
End With
‘写入当前时间
rngLog.Value = Now
End Sub

---

湛河区18885232720： excel怎么把图表插入指定单元格中拜托了各位 谢谢 - ？
佼贱先妮： http://club.excelhome.net/dispbbs.asp?boardID=102&ID=108520&page=1&px=0 看看 这个 可满意...

湛河区18885232720： 如何在excel指定单元格中插入图表,不要拖的那种 - ？
佼贱先妮： 插入图表的步骤如下: 1.在插入图表之前将鼠标定位在指定区域的单元格中,接着点击菜单栏中的插入图表选项;2.生成图表之后,点击图表选中后,可以缩小放大图表到合适大小; 3.左键点击图表不放,拖拉图表到指定区域即可.

湛河区18885232720： excel中怎样把插入的图表放在指定区域? - ？
佼贱先妮： 材料/工具:Excel2010 1、打开Excel2010文档,打开编辑表格. 2、选中单元格区域A2:A4,同时按住<Ctrl>键的同时,用鼠标选中单元格区域C2:C4. 3、单击【插入】选项中的【折线图】选项. 4、点击【折线图】下的小黑三角,弹出的下拉菜单中选中折线图样式. 5、单击图标,选中区域图表制作完成简单直观,方便分析和工作汇报.

湛河区18885232720： Excel 怎样插入图表到指定单元格区域?图表是柱形图、饼图之类的. - ？
佼贱先妮： 不能指定单元格,只能设置靠上、下、左、右、居中.或者画完后移动.

湛河区18885232720： Excel 怎样插入图表到指定单元格区域 - ？
佼贱先妮： 只能在插入图表之后调整大小,调到占A1:F12的位置就可以

湛河区18885232720： excel表中统计含有指定内容的单元格 - ？
佼贱先妮： 统计A列,包含 张三 字段的个数 =COUNTIF(A:A,＂*＂&＂张三＂&＂*＂)

湛河区18885232720： 在excel中如何对一个指定单元格A1的历史数据进行记录? - ？
佼贱先妮： 打开你的Excel表,假设你是sheet1表要实现这个功能. 按alt+F11,然后在左面的工程窗口找到sheet1双击,输入下列代码. Private Sub Worksheet_Change(ByVal Target As Range)Dim aWith TargetIf .Address = ＂$A$1＂ ThenIf Range(＂B...

湛河区18885232720： excel,如何自动显示某个单元格每个月的数值. - ？
佼贱先妮： 不清楚你的数据的具体情况,但是可以给你一个建议…… 如果你有一个 动态的 数据表(全年 分日期记录的),那么你每个月的数据统计 可以用 sumproduct 这个函数来统计 这样 每个月 就可以用一个公式 自动生成了…… 只要明细在 那么 各个时间段的“统计”就是随时可以 再现的……

湛河区18885232720： EXCEL怎么取目标表格中指定单元格的数据 - ？
佼贱先妮： 楼主描述的不对吧,根据图片,应该是: A1为目标文件夹 B1为文件名 C1为工作表名 D1为表格中的单元格 可在A2中用公式=＂'＂&A1&＂[＂&B1&＂]＂&C1&＂'!＂&D1 来得到合并的路径字符串 然后在B2中用公式=INDIRECT(A2) 来得到引用值提示:用INDIRECT函数时,要求目标工作簿必须是打开的,否则会显示错误值#REF!

湛河区18885232720： EXCEL 中的固定单元格历史数字自动记录 - ？
佼贱先妮： Private Sub Worksheet_Change(ByVal Target As Range) '工作表内容发生改变触发事件 With Target If .Address = ＂$E$5＂ Then '如果选中的单元格地址是 E5 If [G6] = ＂＂ Then '如果G6是空单元格 Range(＂G6＂) = .Value '那么G6=E5 Else '否则 Cells(Range(＂G65536＂).End(xlUp).Row + 1, 7) = .Value 'G列最后一个非空单元格的下一单元格 =E5 End If End If End With End Sub