VBA Active Cell

Активная ячейка означает конкретную ячейку, которая активна в текущей активной рабочей таблице. Например, если на листе 2 выбрана ячейка B4, это означает, что активной ячейкой является лист B4 на листе 2. В VBA мы используем ссылку на активную ячейку для изменения свойств или значений активной ячейки. ИЛИ мы используем эту функцию в определенных ситуациях, когда нам нужно внести некоторые изменения в активную ячейку в некоторых определенных условиях, которые отвечают требованиям.

Активная ячейка является собственностью в VBA. Мы используем его в разных ситуациях в VBA. Мы можем присвоить значения активной ячейке, используя функцию активной ячейки VBA, или получить адрес активной ячейки. Что вернули эти функции? Функция активной ячейки возвращает свойство диапазона активной ячейки в активной рабочей таблице. Как объяснено в приведенном выше утверждении в определении, если лист 2 активен, а ячейка B4 является активной ячейкой, функция активной ячейки в VBA извлекает свойства диапазона ячейки B4 на листе 2.

Синтаксис активной ячейки в Excel VBA

Ниже приведен синтаксис Active Cell в Excel VBA

Синтаксис используется для присвоения определенного значения активной ячейке.

 Activecell.Value = ««

Синтаксис выберет значение или свойство активной ячейки в активной рабочей таблице.

 Application.Activecell

Если нам нужно изменить шрифт активной ячейки, то синтаксис будет следующим

 Activecell.Font. (Шрифт, который мы хотим) = True

Мы также можем отобразить строки и столбец активной ячейки, используя следующий синтаксис

 Application.Activecell

Давайте используем синтаксис, описанный в нескольких примерах, и научимся играть с активными ячейками.

Примечание: Для того, чтобы использовать VBA убедитесь, что на вкладке разработчика включен в закладке Файл из раздела настроек.

Примеры активной ячейки Excel VBA

Ниже приведены различные примеры активной ячейки VBA в Excel:

Вы можете скачать этот шаблон VBA Active Cell Excel здесь - Шаблон VBA Active Cell Excel

VBA Active Cell - Пример № 1

В этом примере мы хотим изменить значение текущей ячейки на какую-то ячейку. Например, на листе 1 выберите ячейку A2 и вставьте значение как ANAND, и мы хотим изменить значение для этой активной ячейки как ARAN.

Выполните следующие шаги, чтобы использовать VBA Active Cell в Excel.

Шаг 1: Перейдите на вкладку разработчика и нажмите на Visual Basic, чтобы открыть VB Editor.

Шаг 2: Нажмите на вкладку «Вставка» и нажмите на модули, чтобы вставить новый модуль.

Шаг 3: Объявите подфункцию, чтобы начать писать код.

Код:

 Sub Sample () End Sub

Шаг 4: Активируйте рабочий лист 1 с помощью функции ниже.

Код:

 Sub Sample () Worksheets ("Sheet1"). Активировать End Sub

Шаг 5: Мы можем проверить, что в ячейке A2 на листе 1 у нас есть значение как ANAND, и это активная ячейка.

Шаг 6: Теперь используйте следующую инструкцию, чтобы изменить значение активной ячейки.

Код:

 Sub Sample () Worksheets ("Sheet1"). Activate ActiveCell.Value = "ARAN" End Sub

Шаг 7: Запустите приведенный выше код с помощью кнопки запуска или нажмите F5.

Мы видим, что значение в ячейке A2 было изменено.

VBA Active Cell - Пример № 2

Теперь мы изменили значение активной ячейки с ANAND на ARAN. Как мы отображаем текущее значение активной ячейки? Об этом мы узнаем в этом примере.

Выполните следующие шаги, чтобы использовать VBA Active Cell в Excel.

Шаг 1: Перейдите на вкладку разработчика и нажмите Visual Basic, чтобы открыть редактор VB.

Шаг 2: В том же самом модуле объявить подфункцию, чтобы начать писать код.

Код:

 Sub Sample1 () End Sub

Шаг 3: Активируйте лист 1 с помощью следующего кода.

Код:

 Sub Sample1 () Worksheets ("Sheet1"). Активировать End Sub

Шаг 4: Теперь давайте выберем активную ячейку с помощью следующего кода.

Код:

 Sub Sample1 () Worksheets ("Sheet1"). Активировать Set selectedCell = Application.ActiveCell End Sub

Шаг 5: Теперь давайте отобразим значение выбранной ячейки с помощью следующего кода.

Код:

 Sub Sample1 () Worksheets ("Sheet1"). Активировать Set selectedCell = Application.ActiveCell MsgBox selectedCell.Value End Sub

Шаг 6: Запустите приведенный выше код, нажав клавишу F5 или предоставленную кнопку запуска, и просмотрите следующий результат.

Активная ячейка была A2 и имеет значение ARAN, поэтому отображаемое свойство - ARAN.

VBA Active Cell - Пример № 3

Давайте изменим шрифт ячейки A2, которая была выбранной ячейкой. Давайте сделаем шрифт как жирный. Изначально не было выбрано ни одного шрифта.

Для этого выполните следующие действия, чтобы использовать VBA Active Cell в Excel.

Шаг 1: Перейдите на вкладку разработчика и нажмите Visual Basic, чтобы открыть VB Editor.

Шаг 2: В том же модуле объявите подфункцию, чтобы начать писать код.

Код:

 Sub Sample2 () End Sub

Шаг 3: Давайте сначала активируем рабочий лист, чтобы использовать активную ячейку.

Код:

 Sub Sample2 () Worksheets ("Sheet1"). Активировать End Sub

Шаг 4: Давайте изменим шрифт выбранной ячейки следующим кодом.

Код:

 Sub Sample2 () Worksheets ("Sheet1"). Активировать ActiveCell.Font.Bold = True End Sub

Шаг 5: Запустите приведенный выше код, нажав клавишу F5 или предоставленную кнопку запуска, и посмотрите результат.

Шрифт активной ячейки изменяется на BOLD.

VBA Active Cell - Пример № 4

Теперь мы хотим знать, в какой строке или в каком столбце находится текущая активная ячейка. Как это сделать, мы узнаем в этом примере.

Для этого выполните следующие действия, чтобы использовать VBA Active Cell в Excel.

Шаг 1: Перейдите на вкладку разработчика и нажмите на Visual Basic, чтобы открыть VB Editor.

Шаг 2: В том же модуле объявите подфункцию, чтобы начать писать код.

Код:

 Sub Sample3 () End Sub

Шаг 3: Давайте сначала активируем рабочий лист, чтобы использовать свойства активной ячейки.

Код:

 Sub Sample3 () Worksheets ("Sheet1"). Активировать End Sub

Шаг 4: Теперь мы выбираем активную ячейку с помощью следующего кода.

Код:

 Sub Sample3 () Worksheets ("Sheet1"). Активировать Set selectedCell = Application.ActiveCell End Sub

Шаг 5: Теперь мы можем отобразить текущую строку активной ячейки с помощью следующего кода.

Код:

 Sub Sample3 () Worksheets ("Sheet1"). Активировать Set selectedCell = Application.ActiveCell MsgBox selectedCell.Row End Sub

Шаг 6: Мы также можем получить текущий столбец активной ячейки с помощью следующего кода.

Код:

 Sub Sample3 () Worksheets ("Sheet1"). Активировать Set selectedCell = Application.ActiveCell MsgBox selectedCell.Row MsgBox selectedCell.Column End Sub

Шаг 7: Теперь нажмите F5 или кнопку запуска, чтобы запустить приведенный выше код и увидеть следующий результат.

Вышеуказанным результатом была строка активной ячейки. Нажмите ОК, чтобы увидеть столбец активной ячейки.

То, что нужно запомнить

Есть несколько вещей, которые мы должны помнить об активной ячейке в VBA:

  • Активная ячейка - это текущая или выбранная ячейка на любом листе.
  • Мы можем отобразить или изменить свойства активного адреса ячейки в VBA.
  • Чтобы использовать свойства активной ячейки, мы должны сначала активировать текущую рабочую таблицу.

Рекомендуемые статьи

Это было руководство по Excel VBA Active Cell. Здесь мы обсудили, как использовать свойство VBA Active Cell для присвоения значения или получения адреса активной ячейки в Excel, а также некоторые практические примеры и загружаемый шаблон Excel. Вы также можете просмотреть наши другие предлагаемые статьи -

  1. Использование VBA IFError в Excel
  2. Как использовать Excel Freeze Panes?
  3. Учебники по VBA Paste
  4. Настройка и использование строки состояния в Excel

Категория:

VBA