Как использовать activecell в vba в excel?

В VBA активная ячейка — это свойство, которое представляет ячейку, активную в данный момент. Когда вы выбираете ячейку или переходите к ячейке, и эта зеленая рамка закрывает эту ячейку, вы можете использовать свойство ACTIVECELL для ссылки на эту ячейку в коде VBA. Есть свойства и методы, которые с ним связаны.

Использовать свойство активной ячейки

1. Введите ключевое слово «ActiveCell».
2. Введите точку (.), чтобы получить свойства и методы из списка.
3. Выберите свойство или метод, который вы хотите использовать.
4. Запустите код, чтобы выполнить действие с активной ячейкой.

Важные моменты

• Когда вы используете свойство активной ячейки, VBA ссылается на активную ячейку на активном листе активной книги , независимо от того, сколько книг открыто в данный момент.
• ActiveCell — это, в конечном счете, ячейка со всеми свойствами и методами обычной ячейки.

Активировать ячейку из выбранного диапазона

Чтобы активировать ячейку с помощью кода VBA, вы можете использовать метод «Активировать» и метод «Выбрать» двумя способами.

 Sub vba_activecell() 'select and entire range Range("A1:A10").Select 'select the cell A3 from the selected range Range("A3").Activate 'clears everything from the active cell ActiveCell.Clear End Sub

Приведенный выше код, прежде всего, выбирает диапазон A1:A10, затем активирует из него ячейку A3 и в конце удаляет все из активной ячейки, то есть A3.

Возвращаемое значение активной ячейки

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

 MsgBox ActiveCell.Value

Или если вы хотите получить значение активной ячейки и вставить его в отдельную ячейку.

 Range("A1") = ActiveCell.Value

Установить активную ячейку в переменную

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

 Sub vba_activecell() 'declares the variable as range Dim myCell As Range 'set active cell to the variable Set myCell = ActiveCell 'enter value in the active cell myCell.Value = Done End Sub

Получите номер строки и столбца ActiveCell

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

 MsgBox ActiveCell.Row MsgBox ActiveCell.Column

Получить активный адрес ячейки

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

 MsgBox ActiveCell.Address

Когда вы запускаете приведенный выше код, он отображает окно сообщения с адресом активной ячейки активного листа активной книги (как я упоминал ранее).

Перейти из активной ячейки с использованием смещения

С помощью свойства offset вы можете перейти к ячейке, которая находится на расстоянии нескольких строк и столбцов от активной ячейки.

 ActiveCell.Offset(2, 2).Select

Выберите диапазон в активной ячейке

Также вы можете выбрать диапазон из активной ячейки.

 Range(ActiveCell.Offset(1, 1), ActiveCell.Offset(5, 5)).Select