控制Excel工作簿中图表的显示和隐藏的方法是什么

　　Excel工作表中的图表、图形或占位符可以使用VBA代码来对其显示和隐藏进行控制，在编写代码时，可以通过设置工作簿对象的DisplayDrawingObjects属性来实现这种控制。以下是小编为您带来的关于控制Excel工作簿中图表的显示和隐藏的方法，希望对您有所帮助。

　　控制Excel工作簿中图表的显示和隐藏的方法

　　1、启动Excel并打开包含图表的工作表，打开Visual Basic编辑器，在工程资源管理器中鼠标右击，选择关联菜单中的“插入”|“模块”命令创建一个模块，在模块的“代码”窗口中输入程序代码，如图1所示。具体的程序代码如下所示：

　　Sub隐藏()

　　MsgBox"隐藏当前工作簿中的所有图表!"

　　ActiveWorkbook.DisplayDrawingObjects=xlHide

　　End Sub

　　Sub显示()

　　MsgBox"显示当前工作簿中的所有图表!"

　　ActiveWorkbook.DisplayDrawingObjects=xlDisplayShapes

　　End Sub

　　图1　输入程序代码

　　2、切换到Excel窗口，在“开发工具”选项卡的“代码”组中单击“宏”按钮打开“宏”对话框，在“宏名”列表中选择“隐藏”选项，单击“执行”按钮，如图2所示。

　　图2　选择执行“隐藏”宏

　　此时将打开提示对话框，提示将隐藏工作簿中的图表，如图3所示。单击“确定”按钮后工作簿中的图表将隐藏。

　　图3　Excel提示将隐藏图表

　　同样，在“宏”对话框中选择“显示”选项后单击“执行”按钮，Excel弹出提示对话框提示将显示图表，如图4所示。单击“确定”按钮图表将显示。

　　图4　Excel提示显示图表

　　提示

　　工作簿中的图表显示有3种方式，它们是显示所有图形、仅显示占位符和隐藏所有图形，它们分别对应常量xlDisplayShapes、xlPlaceholers和xlHide，将DisplayDrawingObjects属性值设置为这3个常量即可实现对工作簿中对象显示的控制。