总结篇--如何自动刷新图表
点击上方
蓝色
文字 关注我们吧!
送人玫瑰,手有余香,请将文章分享给更多朋友
动手操作是熟练掌握EXCEL的最快捷途径!
所谓自动刷新图表就是指,当用户选择某一项目时,图表将自动刷新所显示的内容。
如下例,我们将制作这样一个图标,当用户点击选择不同的项目时,图表就可以自动刷新相关内容。
首先我们来创建一个簇状条形图。选中单元格区域A2:F3,插入簇状条形图。
创建名称。在当前工作表中创建“ChartTitle”和“ChartData”两个名称。
ChartTitle:“=OFFSET(Sheet1!$A2,0,0)”
ChartData:“=OFFSET(Sheet1!$A2,0,1,1,5)”
完成后将文件保存为启用宏的文件格式,文件名为“自动更新”。
选中图标中的数据系列,单击右键,在弹出的快捷菜单中单击“选择数据”,打开“选择数据源”对话框。单击“编辑”,在“系列名称”中输入“=自动更新!ChartTitle”;在“系列值”中输入“=自动更新!ChartData”,如下图。
确定后如下图。
单击【开发工具】-【Visual Basic】,输入下列代码:
Private Sub worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Row > 2 And ActiveCell.Row < 15 Then
ActiveWorkbook.Save
End If
End Sub
确认保存后就可以了。动图效果如下:
美化图表等操作这里就不再详细介绍了。
在2016以前的版中,同样也可以使用下面这段代码:
Private Sub worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Row > 2 And ActiveCell.Row < 15 Then
ActiveSheet.Calculate
End If
End Sub
但以上这段代码亲测在2016版中是无法实现自动更新的效果的。
-END-
长按下方二维码关注EXCEL应用之家
面对EXCEL操作问题时不再迷茫无助
戳原文,更有料!免费模板文档!