В тази статия ще научите как да Задаване на обхват за клетки, редове и колони в VBA Excel.

Изтегляне на работна тетрадка

Можете да изтеглите безплатната учебна тетрадка на Excel от тук.

Задаване на обхват във VBA.xlsm

Обект VBA Range

Сайтът Обхват обект в VBA може да съдържа една клетка, няколко клетки, редове, колони в работния лист на Excel.

Йерархията на Обхват обектът е следният.

Приложение> Работна книга> Работен лист> Обхват

Ето как трябва да декларирате Обхват обект в VBA .

7 примера за задаване на обхват във VBA Excel

В този раздел ще разгледаме как да зададем диапазон в една клетка, няколко клетки, един ред, няколко реда, една колона, няколко колони и да зададем диапазон чрез бутона за команди в VBA Excel.

1. Задаване на обхват в една клетка във VBA

Тук ще видим как да Задаване на обхват в единична клетка с VBA .

Стъпки:

• Натиснете Alt + F11 на клавиатурата или отидете в раздела Разработчик -> Visual Basic да отворите Редактор на Visual Basic .

• В изскачащия прозорец с код, в лентата с менюта щракнете върху Вмъкване -> Модул .

• Копирайте следния код и го поставете в прозореца за код.

 Sub RangeOneCell() Range("B2").Value = "Hello World" End Sub 

Тук,

B2 = клетката, в която искаме да зададем стойността. Можете да зададете всеки референтен номер на клетката, който ви е необходим.

Вашият код вече е готов за изпълнение.

• Натиснете F5 на клавиатурата или от лентата с менюта изберете Run -> Run Sub/UserForm Можете също така просто да щракнете върху малка икона Play в лентата с подменюта, за да стартирате макроса.

Клетка B2 вече съдържа стойността " Здравей, свят ".

Прочетете повече: VBA за всяка клетка в обхвата в Excel

2. Задаване на обхват в няколко клетки във VBA

Тук ще видим как да Задаване на обхват в множество клетки с VBA .

Стъпки:

• По същия начин, както преди, отворете Редактор на Visual Basic от Разработчик таб и Вмъкване на a Модул в прозореца с кода.
• В прозореца за код копирайте следния код и го поставете.

 Sub RangeCells() Range("A1:D5").Value = "Hello!" End Sub 

Вашият код вече е готов за изпълнение.

• Изпълнявайте макроса и всички клетки от A1 към D5 сега задръжте " Здравейте! "

3. Задаване на обхват в един ред във VBA

Тук ще видим как да Задаване на обхват в единичен ред с VBA .

Стъпки:

• По същия начин, както преди, отворете Редактор на Visual Basic от Разработчик таб и Вмъкване на a Модул в прозореца с кода.
• В прозореца за код копирайте следния код и го поставете.

 Sub RangeRows() Dim iRow As Range Set iRow = Range("A1:D5") iRow.Rows(3).Value = "Hello!" End Sub 

Вашият код вече е готов за изпълнение.

• Изпълнявайте макроса и само 3. ред от всички редове от A1 към D5 сега задръжте " Здравейте! "

• Редове(3).Стойност в кода дава достъп до 3. ред от конкретния диапазон A1:D5 .

4. Задаване на обхват в няколко реда във VBA

Тук ще видим как да Задаване на обхват в множество редове с VBA .

Стъпки:

• По същия начин, както преди, отворете Редактор на Visual Basic от Разработчик таб и Вмъкване на a Модул в прозореца с кода.
• В прозореца за код копирайте следния код и го поставете.

 Sub RangeRows() Dim iRow As Range Set iRow = Range("A1:D5") iRow.Rows(1).Value = "Hello!" iRow.Rows(3).Value = "Hello!" iRow.Rows(5).Value = "Hello!" End Sub 

Вашият код вече е готов за изпълнение.

• Изпълнявайте макроса и 1. , 3. и 5. редове от всички редове от A1 към D5 сега задръжте " Здравейте! "

Подобни четива:

• Как да изберете обхват въз основа на стойността на клетката във VBA (7 начина)
• Използване на обекта Range на VBA в Excel (5 свойства)
• Как да използваме VBA Range Offset (11 начина)
• Диапазон VBA с променлив номер на ред в Excel (4 примера)

5. Задаване на обхват в една колона във VBA

Тук ще видим как да Задаване на обхват в единична колона с VBA .

Стъпки:

• По същия начин, както преди, отворете Редактор на Visual Basic от Разработчик таб и Вмъкване на a Модул в прозореца с кода.
• В прозореца за код копирайте следния код и го поставете.

 Sub RangeColumns() Dim iCol As Range Set iCol = Range("A1:D5") iCol.Columns(2).Value = "Hello!" End Sub 

Вашият код вече е готов за изпълнение.

• Изпълнявайте макроса и само 2. от всички колони от A1 към D5 сега задръжте " Здравейте! "

• iCol.Columns(2).Value в кода дава достъп до 2. колона на конкретния диапазон A1:D5 .

6. Задаване на обхват в няколко колони във VBA

Тук ще видим как да Задаване на обхват в множество колони с VBA .

Стъпки:

• По същия начин, както преди, отворете Редактор на Visual Basic от Разработчик таб и Вмъкване на a Модул в прозореца с кода.
• В прозореца за код копирайте следния код и го поставете.

 Sub RangeColumns() Dim iCol As Range Set iCol = Range("A1:D5") iCol.Columns(2).Value = "Hello!" iCol.Columns(4).Value = "Hello!" End Sub 

Вашият код вече е готов за изпълнение.

• Изпълнявайте макроса и 2. и 4. колони от A1 към D5 сега задръжте " Здравейте! "

7. Задаване на обхват чрез команден бутон във VBA

Тук ще научим как да Задаване на обхват използване на Команден бутон в VBA .

Стъпки:

• Отидете на Developer -> Insert -> Команден бутон .
  • Уверете се, че имате Режим на проектиране включено.

• Drag около Команден бутон в листа.

• Двойно кликване върху бутона и ще бъдете прехвърлени към прозореца с код, генериран автоматично с Код на подпроцедура на VBA .

• Вътре в Sub напишете кода си и Запазете.

• Върнете се към работния лист, който ви интересува, и щракнете върху Команден бутон . Резултатът, базиран на вашия код, ще се появи в работния лист.

Предимства на VBA Set Range

• Много е лесно да се приложи.
• Аргументите вътре в Обхват Така че можем да променяме стойностите на аргумента в зависимост от нуждите си.
• Като аргументи може да се подаде повече от 1 стойност.

Нещата, които трябва да запомните

• КЛЕТКИ свойства в VBA може да се използва и за задаване на Обхват в VBA .
• Променливите на обекта трябва да се задават като референция на обекта чрез SET

Заключение

Тази статия ви показа как да зададете обхват в Excel Макрос VBA. Надявам се, че тази статия е била много полезна за вас. Чувствайте се свободни да задавате всякакви въпроси, свързани с темата.