总结篇--如何自动刷新图表

点击上方

蓝色

文字  关注我们吧!

送人玫瑰,手有余香,请将文章分享给更多朋友

动手操作是熟练掌握EXCEL的最快捷途径!

所谓自动刷新图表就是指,当用户选择某一项目时,图表将自动刷新所显示的内容。

如下例,我们将制作这样一个图标,当用户点击选择不同的项目时,图表就可以自动刷新相关内容。

01

首先我们来创建一个簇状条形图。选中单元格区域A2:F3,插入簇状条形图。

02

创建名称。在当前工作表中创建“ChartTitle”和“ChartData”两个名称。

ChartTitle:“=OFFSET(Sheet1!$A2,0,0)”

ChartData:“=OFFSET(Sheet1!$A2,0,1,1,5)”

完成后将文件保存为启用宏的文件格式,文件名为“自动更新”。

03

选中图标中的数据系列,单击右键,在弹出的快捷菜单中单击“选择数据”,打开“选择数据源”对话框。单击“编辑”,在“系列名称”中输入“=自动更新!ChartTitle”;在“系列值”中输入“=自动更新!ChartData”,如下图。

确定后如下图。

04

单击【开发工具】-【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

确认保存后就可以了。动图效果如下:

美化图表等操作这里就不再详细介绍了。

05

在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操作问题时不再迷茫无助

戳原文,更有料!免费模板文档!

(0)

相关推荐