Пример использования функции Lock Range в VBA Excel


Функция Lock Range (Зафиксировать диапазон) является одним из важных инструментов языка VBA (Visual Basic for Applications), который используется в Microsoft Excel для автоматизации задач. Эта функция позволяет установить защиту на определенный диапазон ячеек в рабочей книге Excel, чтобы предотвратить их изменение или ввод данных пользователем.

Использование функции Lock Range особенно полезно, когда вам нужно защитить важные данные или формулы в документе Excel от случайного изменения или удаления. Это дает вам контроль над доступом к данным и обеспечивает сохранность вашей работы.

Для использования функции Lock Range в VBA Excel вам необходимо сначала установить защиту листа Excel. Затем вы можете определить диапазон ячеек, который хотите зафиксировать, и применить функцию Lock Range к этому диапазону. Зафиксированный диапазон будет защищен от изменений пользователем, пока не будет снята защита листа Excel.

Принципы использования функции Lock Range в VBA Excel

Функция Lock Range в VBA Excel позволяет блокировать или разблокировать диапазон ячеек в рабочем листе. Это может быть полезно, когда требуется предотвратить изменение определенных данных или ограничить доступ к ним.

Принцип использования функции Lock Range заключается в следующих шагах:

  1. Выберите диапазон ячеек, которые вы хотите заблокировать или разблокировать.
  2. Откройте окно Visual Basic Editor (нажмите Alt + F11) и перейдите к нужному модулю или создайте новый модуль.
  3. Вводите следующий код:


    Sub LockRange()
    Dim rng As Range
    Set rng = ThisWorkbook.Worksheets("Название_листа").Range("A1:B5") 'Замените "Название_листа" на настоящее имя листа и "A1:B5" на свой диапазон
    rng.Locked = True 'заблокировать
    rng.Locked = False 'разблокировать
    End Sub

    Замените «Название_листа» на настоящее имя листа, а «A1:B5» на свой диапазон, который вы хотите заблокировать или разблокировать.

  4. Нажмите F5, чтобы выполнить код. Диапазон ячеек теперь будет заблокирован или разблокирован в зависимости от вашего выбора.

Примечание: для того чтобы функция Lock Range работала, убедитесь, что защита рабочего листа включена. Для этого выберите нужный лист, нажмите правой кнопкой мыши и выберите «Защитить лист». После этого вам будет предложено задать пароль для защиты.

Добавить комментарий

Вам также может понравиться