Как разрешить обновление внешних данных в защищенном листе Excel?

Вы, возможно, импортировали данные из других приложений в Excel с помощью встроенной функции — Получить внешние данные, и легко обновляли импортированные данные с помощью кнопки «Обновить все». Однако после защиты листа кнопка «Обновить все» становится недоступной, и импортированные данные больше не могут быть обновлены. Как разрешить обновление внешних данных в защищенном листе? Метод, описанный в этой статье, может помочь вам.

Разрешение обновления внешних данных в защищенном листе с помощью кода VBA

Разрешение обновления внешних данных в защищенном листе с помощью кода VBA

Следующий код VBA поможет вам обновить импортированные внешние данные после защиты листа в Excel. Пожалуйста, следуйте инструкциям ниже.

1. В защищенном листе одновременно нажмите клавиши Alt + F11, чтобы открыть окно Microsoft Visual Basic for Applications.

2. В окне Microsoft Visual Basic for Applications нажмите Вставить > Модуль, затем скопируйте и вставьте следующий скрипт VBA в окно Модуля. См. скриншот:

Код VBA: Разрешение обновления внешних данных в защищенном листе

Sub DataRefresh()
'Update by Extendoffice 5/28/2019
    ActiveSheet.Unprotect "123"
    ActiveWorkbook.RefreshAll
    Application.OnTime Now + TimeValue("00:00:01"), "DataRefresh2"
End Sub
Sub DataRefresh2 ()
    If Application.CommandBars.GetEnabledMso("RefreshStatus") Then
        Application.OnTime Now + TimeValue("00:00:01"), " DataRefresh2"
    Else
        ActiveSheet.Protect "123"
    End If
End Sub

Примечание: В коде VBA «123» — это пароль, который мы указали для защиты листа. Пожалуйста, измените его в зависимости от ваших потребностей.

3. Убедитесь, что курсор находится в первой секции кода Sub DataRefresh, а затем нажмите клавишу F5 для запуска кода. В появившемся диалоговом окне Импорт файла выберите внешний файл, из которого вы импортировали данные, и нажмите кнопку Импорт.

После возврата к листу вы увидите, что внешние данные обновились немедленно.

Примечание: Этот код может обновлять внешние данные в защищенном листе, которые были импортированы из Access, текстового файла или файла Excel.

Раскройте магию Excel с Kutools AI

• Умное выполнение: Выполняйте операции с ячейками, анализируйте данные и создавайте диаграммы — всё это посредством простых команд.
• Пользовательские формулы: Создавайте индивидуальные формулы для оптимизации ваших рабочих процессов.
• Кодирование VBA: Пишите и внедряйте код VBA без особых усилий.
• Интерпретация формул: Легко разбирайтесь в сложных формулах.
• Перевод текста: Преодолейте языковые барьеры в ваших таблицах.

Улучшите возможности Excel с помощью инструментов на базе ИИ. Скачать сейчас и испытайте беспрецедентную эффективность!

Связанные статьи:

• Как разрешить редактирование объектов в защищенном листе Excel?
• Как разрешить объединение ячеек в защищенном листе Excel?
• Как разрешить проверку правописания в защищенном листе Excel?
• Как защитить форматирование ячеек, но разрешить только ввод данных в Excel?