Excel中我們添加數(shù)據(jù)透視表之后，如果數(shù)據(jù)源的變動(dòng)修改，導(dǎo)致需要對(duì)數(shù)據(jù)透視表進(jìn)行實(shí)時(shí)更新，該如何刷新數(shù)據(jù)透視表呢？

　　對(duì)于如何刷新數(shù)據(jù)透視表的方法，有多種，參考下面的分享。

第一，使用數(shù)據(jù)透視表工具的刷新命令。

　　當(dāng)我們創(chuàng)建了數(shù)據(jù)透視表之后，激活數(shù)據(jù)透視表，選項(xiàng)卡會(huì)多出一個(gè)選項(xiàng)卡：數(shù)據(jù)透視表工具——選項(xiàng)——刷新�；蛘咴跀�(shù)據(jù)透視表中單擊右鍵，選中刷新。

第二，如何刷新受保護(hù)工作表中的數(shù)據(jù)透視表

　　我們可以添加vba代碼實(shí)現(xiàn)受保護(hù)工作表中數(shù)據(jù)透視表的刷新。

　　將以下代碼放入模塊或數(shù)據(jù)源工作表的change事件中，可以實(shí)現(xiàn)受保護(hù)工作表中數(shù)據(jù)透視表刷新。password為設(shè)定的密碼。

Sub changevalue()
    With ActiveSheet
        .Unprotect (Password)
        ThisWorkbook.RefreshAll
        .Protect (Password)
    End With
End Sub

第三，打開工作簿時(shí)自動(dòng)刷新數(shù)據(jù)透視表

　　單擊數(shù)據(jù)透視表工具——選項(xiàng)，打開“數(shù)據(jù)透視表選項(xiàng)”——數(shù)據(jù)——勾選“打開文件時(shí)刷新數(shù)據(jù)”。如下圖所示：

第四，自動(dòng)刷新數(shù)據(jù)透視表

　　當(dāng)數(shù)據(jù)源中的數(shù)據(jù)更改后，數(shù)據(jù)透視表默認(rèn)不會(huì)自動(dòng)刷新。上面介紹的如何刷新數(shù)據(jù)透視表，更多的是手動(dòng)刷新。

　　其實(shí)用一段簡(jiǎn)單的VBA代碼就可以實(shí)現(xiàn)隨數(shù)據(jù)源的更新而自動(dòng)刷新數(shù)據(jù)透視表。方法如下介紹：

　　假如包含數(shù)據(jù)透視表的工作表名稱為“Sheet1”，數(shù)據(jù)透視表名稱為“數(shù)據(jù)透視表1”，可以使用下面的方法：

　　按Alt+F11，打開VBE編輯器。

　　在“工程”窗口中，雙擊包含數(shù)據(jù)透視表的工作表，如此處的“Sheet1”表。

　　在右側(cè)代碼窗口中輸入下列代碼：

    Private Sub Worksheet_Activate()
        Sheets("Sheet1").PivotTables("數(shù)據(jù)透視表1").RefreshTable
    End Sub

　　關(guān)閉VBA編輯器，即可自動(dòng)刷新數(shù)據(jù)透視表。

第五，刷新整個(gè)工作薄的所有數(shù)據(jù)透視表

　　可以使用下面的代碼：

Sub 刷新數(shù)據(jù)透視表()
ThisWorkbook.RefreshAll
End Sub

核心關(guān)注：拓步ERP系統(tǒng)平臺(tái)是覆蓋了眾多的業(yè)務(wù)領(lǐng)域、行業(yè)應(yīng)用，蘊(yùn)涵了豐富的ERP管理思想，集成了ERP軟件業(yè)務(wù)管理理念，功能涉及供應(yīng)鏈、成本、制造、CRM、HR等眾多業(yè)務(wù)領(lǐng)域的管理，全面涵蓋了企業(yè)關(guān)注ERP管理系統(tǒng)的核心領(lǐng)域，是眾多中小企業(yè)信息化建設(shè)首選的ERP管理軟件信賴品牌。

轉(zhuǎn)載請(qǐng)注明出處：拓步ERP資訊網(wǎng)http://www.ezxoed.cn/

本文標(biāo)題：五種如何刷新數(shù)據(jù)透視表的方法

本文網(wǎng)址：http://www.ezxoed.cn/html/support/11139213210.html