如何解决修复Excel文件名-名称范围和图表
在启用了宏的excel文件中,我定义了四个名称范围,并创建了一个图表,该图表会随着我每天为销售和购买添加数据(按行和列)而动态更新。
我在图表顶部有两个按钮,分别是“销售”和“购买”。单击每个按钮将触发相应的功能,该功能将更新图表以显示“销售”或“购买”。
按钮1:
Sub dynamic_chart_sales()
ActiveSheet.ChartObjects("Dynamic_Chart1").Activate
ActiveChart.PlotArea.Select
ActiveChart.SetSourceData Source:=Range( _
"'my_file_name.xlsm'!year_period,'my_file_name.xlsm'!name_range_sales_one,'my_file_name.xlsm'!name_range_sales_two")
ActiveChart.SeriesCollection(1).Name = "Sales This Year"
ActiveChart.SeriesCollection(2).Name = "Sales Last Year"
End Sub
Button2:
Sub dynamic_chart_purchases()
ActiveSheet.ChartObjects("Dynamic_Chart1").Activate
ActiveChart.PlotArea.Select
ActiveChart.SetSourceData Source:=Range( _
"'my_file_name.xlsm'!year_period,'my_file_name.xlsm'!name_range_purchases_one,'my_file_name.xlsm'!name_range_purchases_two")
ActiveChart.SeriesCollection(1).Name = "Purchases This Year"
ActiveChart.SeriesCollection(2).Name = "Purchases Last Year"
End Sub
当文件名为“ my_file_name.xlsm”时,该功能可以正常工作并绘制图表,但是当文件以其他名称保存时,Excel会引发错误。
不管文件名是什么,是否都有一种使功能按定义方式工作的方法?
很高兴获得您的帮助。
谢谢
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。