官术网_书友最值得收藏!

課時3-3 使用VBA代碼設置自動刷新

紅太狼 VBA的代碼編輯框要如何調出來?

灰太狼:調出VBA代碼編輯框的方法有3種。

①右鍵工作表名稱→“查看代碼”(圖3-3-1)。

圖3-3-1 從工作表名稱處調出VBA代碼編輯框

②按快捷鍵Alt+F11。

③“開發工具”→“Visual Basic”(圖3-3-2)。

圖3-3-2 從“開發工具”選項卡調出VBA代碼編輯框

紅太狼 知道VBA代碼編輯框在哪了,那要自動刷新透視表該怎么操作呢?

灰太狼:首先,用到的VBA代碼如下。

    Sub 更新()
    ThisWorkbook.RefreshAll
    End Sub

其次,調出Visual Basic對話框后,先“插入”→“模塊”(圖3-3-3)→復制代碼并粘貼進去即可。當要刷新透視表時,按住Alt+F8鍵調出宏,“執行”(圖3-3-4)就可以刷新透視表。還可以在透視表邊上插入一個圖形,選中圖形→右鍵→“指定宏”→選擇宏→“確定”(圖3-3-5),這樣單擊圖形就可以刷新透視表。

圖3-3-3 插入模塊

圖3-3-4 調出代碼

圖3-3-5 給圖形指定宏

最后,需要注意一點,當Excel工作簿中使用了VBA代碼,則保存工作簿的時候,需要另存為“Excel啟用宏的工作薄”方式。

紅太狼 VBA的加入,讓透視表刷新更便捷啦!

主站蜘蛛池模板: 康平县| 东阿县| 浑源县| 武鸣县| 马龙县| 岗巴县| 清新县| 屏边| 湛江市| 晋江市| 文水县| 蕲春县| 中阳县| 黄浦区| 绵竹市| 东乌| 渑池县| 叙永县| 桂平市| 墨脱县| 陵水| 永嘉县| 桐梓县| 湘潭县| 汉寿县| 古田县| 株洲市| 铜山县| 乌兰浩特市| 平塘县| 惠水县| 宜州市| 郴州市| 静安区| 且末县| 云龙县| 石阡县| 濉溪县| 甘泉县| 宜都市| 邢台县|