Excel工作表中的圖表、圖形或占位符可以使用VBA代碼來對其顯示和隱藏進行控制，在編寫代碼時，可以通過設置工作簿對象的DisplayDrawingObjects屬性來實現(xiàn)這種控制。以下是學習啦小編為您帶來的關于控制Excel工作簿中圖表的顯示和隱藏的方法，希望對您有所幫助。

　　控制Excel工作簿中圖表的顯示和隱藏的方法

　　1、啟動Excel并打開包含圖表的工作表，打開Visual Basic編輯器，在工程資源管理器中鼠標右擊，選擇關聯(lián)菜單中的“插入”|“模塊”命令創(chuàng)建一個模塊，在模塊的“代碼”窗口中輸入程序代碼，如圖1所示。具體的程序代碼如下所示：

　　Sub隱藏()

　　MsgBox"隱藏當前工作簿中的所有圖表!"

　　ActiveWorkbook.DisplayDrawingObjects=xlHide

　　End Sub

　　Sub顯示()

　　MsgBox"顯示當前工作簿中的所有圖表!"

　　ActiveWorkbook.DisplayDrawingObjects=xlDisplayShapes

　　End Sub

　　圖1　輸入程序代碼

　　2、切換到Excel窗口，在“開發(fā)工具”選項卡的“代碼”組中單擊“宏”按鈕打開“宏”對話框，在“宏名”列表中選擇“隱藏”選項，單擊“執(zhí)行”按鈕，如圖2所示。

　　圖2　選擇執(zhí)行“隱藏”宏

　　此時將打開提示對話框，提示將隱藏工作簿中的圖表，如圖3所示。單擊“確定”按鈕后工作簿中的圖表將隱藏。

　　圖3　Excel提示將隱藏圖表

　　同樣，在“宏”對話框中選擇“顯示”選項后單擊“執(zhí)行”按鈕，Excel彈出提示對話框提示將顯示圖表，如圖4所示。單擊“確定”按鈕圖表將顯示。

　　圖4　Excel提示顯示圖表

　　提示

　　工作簿中的圖表顯示有3種方式，它們是顯示所有圖形、僅顯示占位符和隱藏所有圖形，它們分別對應常量xlDisplayShapes、xlPlaceholers和xlHide，將DisplayDrawingObjects屬性值設置為這3個常量即可實現(xiàn)對工作簿中對象顯示的控制。

猜你喜歡：

1.Excel怎樣變?yōu)榭梢晥D表樣式

2.Excel2010如何把數(shù)據(jù)變?yōu)榭梢暤膱D表

3.Excel2013怎么顯示圖表刻度和單位

4.通過編程如何實現(xiàn)禁止Excel工作簿文件另存為

5.怎樣顯示出Excel2013圖表刻度和單位