Мы уже рассмотрели, что такое переменные и константы, в нашем руководстве по типам данных VBA - переменные и константы. Теперь мы рассмотрим объект диапазона в VBA и то, как объявить переменную как объект диапазона. Объект диапазона используется для обозначения ячеек или нескольких ячеек в VBA. Так что его очень полезно использовать в вашем коде.
Щелкните здесь, чтобы получить дополнительную информацию о диапазонах и ячейках VBA.
Объект диапазона VBA
Вы можете использовать объект диапазона для ссылки на одну ячейку. Например, если вы хотите сослаться на ячейку A1 в коде VBA, вы можете использовать объект диапазона VBA, как показано в приведенном ниже коде:
| 1234 | Sub ReferringToASingleCellUsingTheRangeObject ()Диапазон ("A1"). Значение = 89Диапазон ("A1"). Font.Bold = TrueКонец подписки |
Когда вы нажимаете клавишу «Выполнить» или «F5» на клавиатуре, чтобы запустить код, вы получаете следующий результат на своем фактическом рабочем листе:
Вы можете использовать объект диапазона для ссылки на несколько ячеек или диапазонов. Например, если вы хотите сослаться на диапазон ячеек (A1: C1) в коде VBA, вы можете использовать объект диапазона VBA, как показано в приведенном ниже коде:
| 123456 | Sub ReferringToMultipleCellsUsingTheRangeObject ()Диапазон ("A1: C1"). Значение = "ABC"Диапазон ("A1: C1"). Границы (xlEdgeBottom) .LineStyle = xlDoubleКонец подписки |
Когда вы нажимаете клавишу «Выполнить» или «F5» на клавиатуре, чтобы запустить свой код, вы получаете следующий результат на своем фактическом рабочем листе:
Объявление переменной как диапазона
Вам нужно будет использовать ключевые слова Dim и Set при объявлении переменной как диапазона. В приведенном ниже коде показано, как объявить переменную как диапазон.
| 123456789101112 | Sub DeclaringAndSettingARange ()Dim rng As RangeУстановить rng = Range ("A10: B10")rng.Value = "AutomateExcel"rng.Font.Bold = Truerng.Selectrng.Columns.AutoFitКонец подписки |
Результат:
Выбор конкретных строк в объекте диапазона
Вы можете выбрать определенные строки в своем объекте диапазона. В приведенном ниже коде показано, как это сделать:
| 12345678 | Sub SelectingSpecificRowsInTheRangeObject ()Dim rng As RangeУстановить rng = Range ("A1: C3")rng.Rows (3) .SelectКонец подписки |
Результат:
Выбор определенных столбцов в объекте диапазона
Вы можете выбрать определенные столбцы в своем объекте диапазона. В приведенном ниже коде показано, как это сделать:
| 12345678 | Sub SelectingSpecificColumnsInTheRangeObject ()Dim rng As RangeУстановить rng = Range ("A1: C3")rng.Columns (3) .SelectКонец подписки |
