如何在Excel中受保護的工作表中允許外部數(shù)據(jù)刷新？

您可能已使用其內(nèi)置功能-獲取外部數(shù)據(jù)將數(shù)據(jù)從其他應(yīng)用程序?qū)氲紼xcel，并通過全部刷新按鈕輕松地更新了導(dǎo)入的數(shù)據(jù)。 但是，在保護工作表之后，“全部刷新”按鈕將被禁用，并且導(dǎo)入的數(shù)據(jù)無法再進行更新。 如何允許在受保護的工作表中刷新外部數(shù)據(jù)？ 本文中的方法可以為您提供幫助。

允許使用VBA代碼在受保護的工作表中刷新外部數(shù)據(jù)

允許使用VBA代碼在受保護的工作表中刷新外部數(shù)據(jù)驚人的！ 在 Excel 中使用高效的選項卡，如 Chrome、Firefox 和 Safari！每天節(jié)省50％的時間，并減少數(shù)千次鼠標單擊！

在保護Excel中的工作表后，下面的VBA代碼可以幫助您刷新導(dǎo)入的外部數(shù)據(jù)。 請執(zhí)行以下操作。

1.在受保護的工作表中，按 其他 + F11 同時打開 Microsoft Visual Basic應(yīng)用程序 窗口。

2.在 Microsoft Visual Basic應(yīng)用程序 窗口中，單擊 插頁 > 模塊，然后將下面的VBA腳本復(fù)制并粘貼到“模塊”窗口中。 看截圖：

VBA代碼：允許在受保護的工作表中刷新外部數(shù)據(jù)

Sub DataRefresh()Update by Extendoffice 5/28/2019ActiveSheet.Unprotect "123"ActiveWorkbook.RefreshAllApplication.onTime Now + Timevalue("00:00:01"), "DataRefresh2"End SubSub DataRefresh2 ()If Application.CommandBars.GetEnabledMso("RefreshStatus") ThenApplication.onTime Now + Timevalue("00:00:01"), " DataRefresh2"ElseActiveSheet.Protect "123"End IfEnd SubCopy

備注：在VBA代碼中，“ 123”是我們?yōu)楸Ｗo工作表而指定的密碼。 請根據(jù)您的需要進行更改。

3.確保光標在第一個“子數(shù)據(jù)刷新”部分中，然后按 F5 鍵來運行代碼。 在彈出 導(dǎo)入文件 對話框，請選擇您要從中導(dǎo)入數(shù)據(jù)的外部文件，然后單擊 進口 按鈕。

返回到工作表后，您可以看到外部數(shù)據(jù)立即更新。

備注：此代碼可以刷新受保護的工作表中從Access，Text以及Excel文件導(dǎo)入的外部數(shù)據(jù)。

相關(guān)文章:如何在Excel中受保護的工作表中允許對象？如何在Excel中的受保護工作表中允許合并單元格？如何在Excel中的受保護工作表中允許拼寫檢查？如何保護單元格格式，但僅允許在Excel中輸入數(shù)據(jù)？

最佳辦公生產(chǎn)力工具

將小時轉(zhuǎn)化為分鐘 Kutools for Excel!

準備好增強您的 Excel 任務(wù)了嗎？ 利用的力量 Kutools for Excel - 您終極的節(jié)省時間的工具。 簡化復(fù)雜的任務(wù)并像專業(yè)人士一樣瀏覽數(shù)據(jù)。 以閃電般的速度體驗 Excel！

為什么需要 Kutools for Excel