Vba: як отримати номер стовпця з діапазону

Щоб отримати номер стовпця з діапазону в Excel за допомогою VBA, можна скористатися такими методами:

Спосіб 1. Отримайте номер стовпця з певного діапазону

 Sub GetColumnNumber()

colNum = Range(" D7 ").Column
MsgBox colNum

End Sub

Цей конкретний макрос відобразить вікно повідомлення з номером стовпця, який відповідає комірці D7 , яка дорівнюватиме 4 , оскільки D є четвертим стовпцем на аркуші.

Спосіб 2: Отримайте номер стовпця поточного вибраного діапазону

 Sub GetColumnNumber()

colNum = Selection.Column
MsgBox colNum

End Sub

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

Наприклад, якщо під час запуску цього макросу вибрано комірку B3 , з’явиться вікно повідомлення зі значенням 2 , оскільки стовпець B є другим стовпцем на аркуші.

Наступні приклади показують, як використовувати кожен метод на практиці.

Приклад 1: отримати номер стовпця з певного діапазону

Припустімо, ми хочемо отримати номер стовпця для посилання на клітинку D7 .

Для цього ми можемо створити такий макрос:

 Sub GetColumnNumber()

colNum = Range(" D7 ").Column
MsgBox colNum

End Sub

Коли ми запускаємо цей макрос, ми отримуємо такий результат:

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

Приклад 2: отримати номер стовпця поточного вибраного діапазону

Припустимо, ми хочемо отримати номер стовпця поточної активної комірки.

Для цього ми можемо створити такий макрос:

 Sub GetColumnNumber()

colNum = Selection.Column
MsgBox colNum

End Sub

Припустімо, що клітинка B3 наразі вибрана.

Коли ми запускаємо цей макрос, ми отримуємо такий результат:

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

Додаткові ресурси

У наступних посібниках пояснюється, як виконувати інші типові завдання у VBA:

VBA: як отримати номер рядка з діапазону
VBA: як знайти значення в стовпці
VBA: як підрахувати кількість використаних стовпців