Как с помощью VBA установить переменную диапазона на выбор в Excel (5 методов)

Hugh West

16-10-2023 Макросы & Excel VBA
  • Поделись Этим
Hugh West

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

Скачать Практическое пособие

VBA для установки диапазона на выборку.xlsm

5 способов использования VBA для установки переменной диапазона на выбор в Excel

1. Установка переменной диапазона для выбора диапазона с помощью Excel VBA

Мы можем выбрать диапазон по диапазон настройки в VBA Предположим, мы хотим выбрать ячейки B5:C8 Перейдем к описанной ниже процедуре.

Шаги:

  • Чтобы написать код в VBA, сначала откройте Вкладка разработчика а затем выберите Visual Basic .

Затем откроется новое окно Microsoft Visual Basic для приложений .

  • Теперь откройте Вставка >> выбрать Модуль

.

  • Введите следующий код в Модуль VBA . 
 Sub RangeSelect() Dim Rng1 As Range Worksheets("selectRange").Activate Set Rng1 = Range("B5:C8") Rng1.Select End Sub

Здесь мы установить сайт диапазон B5:C8 в качестве Rng1 Мы выбираем его по Метод диапазона из VBA Имейте это в виду, что нам нужно активировать наше превосходство лист поэтому мы активировали selectRange лист.

  • Теперь вернитесь к лист и запустить Макро .

  • После этого вы увидите диапазон B5:C8 выбирается автоматически.

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

Читать далее: Excel VBA: получение диапазона ячеек со значениями (7 примеров)

2. Использование VBA для форматирования ячеек путем установки переменной диапазона

Предположим, что наш набор данных выглядит следующим образом.

Мы хотим, чтобы рубрика смелый и AutoFit сайт колонки Мы можем сделать это через VBA Давайте посмотрим, как мы можем это сделать.

Шаги:

  • Во-первых, откройте Visual Basic и введите следующий код в Модуль VBA (чтобы узнать, как открыть Visual Basic и Модуль VBA пожалуйста, перейдите по ссылке Раздел 1 ). 
 Sub SetRange() Dim xyz As Range Set xyz = Range("B4:C4") xyz.Font.Bold = True xyz.Select Worksheets("autofit").Columns("B:C").AutoFit End Sub

Здесь мы устанавливаем диапазон B4:C4 в качестве xyz . Затем мы использовали Смелый метод, чтобы сделать шрифты в камере B4 и C4 полужирный Мы также установили колонки B и C используя AutoFit метод.

  • Теперь вернитесь к лист и запустить Макро который называется SetRange .

После этого вы будете видеть имена четко в колонки и заголовки стать полужирный и выбрал.

Следуя по этому пути, вы сможете формат клетки и AutoFit настройка столбцов переменные диапазона в VBA .

Похожие чтения

  • Как использовать VBA для каждой строки диапазона в Excel
  • Как использовать VBA для выбора диапазона из активной ячейки в Excel (3 метода)
  • Макрос Excel: сортировка нескольких столбцов с помощью динамического диапазона (4 метода)

3. Копирование диапазона с помощью установки выбора диапазона переменных в VBA

Предположим, мы хотим скопировать B6:C9 установив переменная диапазона на выберите Давайте обсудим эту процедуру ниже.

Шаги:

  • Во-первых, откройте Visual Basic и введите следующий код в Модуль VBA (чтобы узнать, как открыть Visual Basic и Модуль VBA пожалуйста, перейдите по ссылке Раздел 1 ). 
 Sub CopyRange() Dim cpy As Range Set cpy = Range("B6:C9") cpy.Copy End Sub

Здесь мы просто скопировали диапазон B6:C9 с помощью Копировать метод VBA . Мы установили диапазон B6:C9 в качестве cpy .

  • Теперь вернитесь к своему лист и запустить Макросы . Выбрать CopyRange так как это имя вашего текущего Макро .

Вы увидите диапазон B6:C9 копируется.

Вы можете вставить это ассортимент в любом месте вашего Excel лист нажав CTRL + V Я вставил ассортимент через B12 на C15 .

Следуя этому методу, вы можете копия a ассортимент установив переменная диапазона к выбору в Excel VBA .

Читать далее: Excel VBA: копирование динамического диапазона в другую рабочую книгу

4. Форматирование ячеек цветом с помощью установки переменной диапазона на выделение

Предположим, мы хотим раскрасить 8-й и десятый строки набора данных с зеленый Следуем приведенному ниже описанию.

Шаги:

  • Во-первых, откройте Visual Basic и введите следующий код в Модуль VBA (чтобы узнать, как открыть Visual Basic и Модуль VBA пожалуйста, перейдите по ссылке Раздел 1 ). 
 Sub ColorRange() Dim color As Worksheet Dim x1 As Range Dim x2 As Range Set color = ActiveSheet Set x1 = Range("B8:C8") Set x2 = Range("B10:C10") x1.Cells.Interior.ColorIndex = 4 x2.Cells.Interior.ColorIndex = 4 End Sub

Здесь мы определяем наши диапазон B8:C8 и B10:C10 в качестве x1 и x2 соответственно. Мы сделали наш цвет Excel Лист в качестве ActiveSheet и мы раскрасили наши желаемые диапазоны по Свойство ColorIndex .

  • Теперь вернитесь к своему лист и запустить Макросы . Выбрать ColorRange так как это имя текущего Макро .

После этого вы увидите желаемое диапазоны наполненный зеленый цвет.

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

Читать далее: Как использовать диапазон с переменными строкой и столбцом в Excel VBA

Похожие чтения

  • VBA для циклического просмотра строк и столбцов диапазона в Excel (5 примеров)
  • Excel VBA для циклического просмотра диапазона до пустой ячейки (4 примера)
  • Как преобразовать диапазон в массив в Excel VBA (3 способа)

5. Удаление строк путем установки переменной диапазона в VBA

Предположим, мы хотим удалить 8-й и десятый строки набора данных с зеленый Следуем приведенному ниже описанию.

Шаги:

  • Во-первых, откройте Visual Basic и введите следующий код в Модуль VBA (чтобы узнать, как открыть Visual Basic и Модуль VBA пожалуйста, перейдите по ссылке Раздел 1 ). 
 Sub ColorRange() Dim color As Worksheet Dim x1 As Range Dim x2 As Range Set color = ActiveSheet Set x1 = Range("B8:C8") Set x2 = Range("B10:C10") x1.Cells.Interior.ColorIndex = 4 x2.Cells.Interior.ColorIndex = 4 End Sub

Сайт диапазоны которые мы хотим удалить, это B8:C8 и B10:C10 Мы назвали их x1 и x2 соответственно. Затем мы просто удалили их с помощью Удалить метод.

  • Теперь вернитесь к своему лист и запустить Макросы . Выбрать DeleteRange так как это имя вашего текущего Макро .

После этого вы увидите диапазоны B8:C8 и B10:C10 исчезли.

Следуя этому подходу, вы можете удалить строки установив переменные диапазона к выбору.

Практическая секция

На следующем изображении вы найдете набор данных, с которым мы работали в этой статье, чтобы вы могли попрактиковаться самостоятельно.

Заключение

В двух словах, статья полностью посвящена некоторым приложениям для установки переменная диапазона для выбора в Excel VBA Мы описали несколько основных методов. Если у вас есть другие идеи или отзывы, пожалуйста, оставьте их в поле для комментариев. Это поможет мне обогатить мои будущие статьи.

Предыдущий пост Как использовать SUMIFS, когда ячейки не равны нескольким текстам
Следующий пост Как преобразовать число в дату в Excel (6 простых способов)

Хью Уэст — опытный тренер и аналитик Excel с более чем 10-летним опытом работы в отрасли. Он имеет степень бакалавра в области бухгалтерского учета и финансов и степень магистра делового администрирования. Хью страстно любит преподавать и разработал уникальный подход к обучению, которому легко следовать и который легко понять. Его экспертные знания Excel помогли тысячам студентов и специалистов по всему миру улучшить свои навыки и преуспеть в своей карьере. В своем блоге Хью делится своими знаниями со всем миром, предлагая бесплатные учебные пособия по Excel и онлайн-обучение, чтобы помочь отдельным лицам и компаниям полностью раскрыть свой потенциал.