Ми вже розглянули, що таке змінні та константи, у нашому підручнику Типи даних VBA - Змінні та Константи. Тепер ми розглянемо об’єкт діапазону у VBA та те, як оголосити змінну об’єктом діапазону. Об'єкт діапазону використовується для позначення клітинок або декількох комірок у VBA. Отже, це дуже корисно використовувати у вашому коді.
Натисніть тут, щоб отримати додаткову інформацію про діапазони та клітинки VBA.
Об'єкт діапазону VBA
Ви можете використовувати об’єкт діапазону для посилання на одну клітинку. Наприклад, якщо ви хочете звернутись до комірки A1 у вашому коді VBA, ви можете використати об’єкт діапазону VBA, як показано у коді нижче:
| 1234 | Sub ReferringToASingleCellUsingTheRangeObject ()Діапазон ("A1"). Значення = 89Діапазон ("A1"). Font.Bold = TrueEnd Sub |
Коли ви натискаєте кнопку запуску або клавішу F5 на клавіатурі, для запуску коду ви отримуєте такий результат у вашому фактичному аркуші:
Ви можете використовувати об’єкт діапазону для посилання на кілька клітинок або діапазонів. Наприклад, якщо ви хочете звернутись до діапазону клітинок (A1: C1) у вашому коді VBA, ви можете використовувати об’єкт діапазону VBA, як показано у коді нижче:
| 123456 | Sub ReferringToMultipleCellsUsingTheRangeObject ()Діапазон ("A1: C1"). Значення = "ABC"Діапазон ("A1: C1"). Межі (xlEdgeBottom) .LineStyle = xlDoubleEnd Sub |
Коли ви натискаєте кнопку запуску або клавішу F5 на клавіатурі, для запуску коду ви отримуєте такий результат у вашому фактичному аркуші:
Оголошення змінної діапазоном
Вам потрібно буде використовувати ключові слова Dim і Set під час оголошення змінної діапазоном. Код нижче показує, як оголосити змінну як діапазон.
| 123456789101112 | Sub DeclaringAndSettingARange ()Зменшити діапазон як діапазонВстановити rng = Діапазон ("A10: B10")rng.Value = "AutomateExcel"rng.Font.Bold = Правдаrng. Виберітьrng.Columns.AutoFitEnd Sub |
Результат такий:
Вибір певних рядків у об’єкті діапазону
Ви можете вибрати певні рядки у своєму об’єкті діапазону. Код нижче показує, як це зробити:
| 12345678 | Підрозділ SelectingSpecificRowsInTheRangeObject ()Зменшити діапазон як діапазонВстановити rng = Діапазон ("A1: C3")rng.Rows (3) .ВиберітьEnd Sub |
Результат такий:
Вибір певних стовпців у об’єкті діапазону
Ви можете вибрати певні стовпці у своєму об’єкті діапазону. Код нижче показує, як це зробити:
| 12345678 | Додатковий вибірSpecificColumnsInTheRangeObject ()Зменшити діапазон як діапазонВстановити rng = Діапазон ("A1: C3")rng. Стовпці (3). ВиберітьEnd Sub |
