Съдържание
В тази статия ще ви покажа как можете да използвате Използван обхват собственост на VBA в Excel. Ще се научите да използвате Използван обхват за затворен диапазон, за разпръснат диапазон, за неактивен работен лист, както и за неактивна работна книга.
Изтегляне на работна тетрадка за практика
Изтеглете тази работна тетрадка, за да се упражнявате, докато четете тази статия.
Excel VBA UsedRange.xlsmВъведение в свойството UsedRange на VBA в Excel
Сайтът Използван обхват собственост на VBA връща Обхват Връща диапазон, състоящ се от всички клетки в работния лист, който е бил използван, включително празен ред в началото.
В VBA код, на Използван обхват трябва да се използва заедно с името на работния лист. Така че общият синтаксис за използване на Използван обхват за активния работен лист е:
Dim Rng като обхват
Задайте Rng = ActiveSheet.UsedRange
⧭ Забележки:
- Тук Rng е името на Обхват върнати от Използван обхват имот. Можете да използвате каквото пожелаете.
- Да упражнявате Използван обхват в работен лист, различен от активния, използвайте вместо това името на работния лист.
Например, за да го приложите в работен лист, наречен Лист1 , вмъкване:
Задайте Rng = Worksheets("Sheet1").UsedRange 4 начина за използване на свойството UsedRange на VBA в Excel
Тук са 4 най-често срещаните начини за използване на Използван обхват собственост в VBA .
1. Свойство UsedRange на VBA за затворен диапазон
Първо, ще използваме VBA UsedRange за работен лист със затворен диапазон.
Това ще върне целия диапазон, включително празен ред в началото.
Тук имаме работен лист, наречен Лист1 който съдържа затворен диапазон, състоящ се от имената, датите на постъпване и заплатите на някои служители на дадена компания.
Ако сега използвате Използван обхват на този работен лист, тя ще върне диапазона B2:C13 (Включително празен ред в началото).
Ако Лист1 е активен, можете да използвате:
Dim Rng като обхват
Задайте Rng = ActiveSheet.UsedRange
Или можете да използвате:
Dim Rng като обхват
Задайте Rng = Worksheets("Sheet1").UsedRange
⧭ Изход:
Използвахме Изберете свойство на Обхват в рамките на кода. Така че, ако стартираме кода, той ще избере диапазона B2:D13 на Лист1 .
Прочетете още: Как да използвате обекта Range на VBA в Excel (5 свойства)
2. Свойство UsedRange на VBA за разпръснат диапазон
Ако имате разпръснат диапазон в някой работен лист, Използван обхват ще върне диапазон, включващ празните клетки между тях.
Сега, в Лист1 , имаме общата заплата, най-високата заплата и най-ниската заплата, разпръснати на различни места, от клетката B3 към G3 , като тази:
Сега използвайте някой от двата реда кодове, за да използвате Използван обхват собственост.
Dim Rng като обхват
Задайте Rng = ActiveSheet.UsedRange
Или
Dim Rng като обхват
Задайте Rng = Worksheets("Sheet1").UsedRange
⧭ Изход:
Връща всички клетки в обхвата B2:G3 на Лист1 включително празните клетки (Включително празен ред в началото). Изберете свойството на Обхват , тя ще избере диапазона B2:G3.
Прочетете още: Край на диапазон с помощта на VBA в Excel (с примери)
Подобни четива
- Excel VBA Копиране на обхват в друг лист (8 най-лесни начина)
- Цикъл в диапазон за всяка клетка с Excel VBA (окончателно ръководство)
- Грешка с индекс извън обхвата на Excel във VBA (с 5 решения)
3. VBA UsedRange Property за неактивен работен лист
Ако искаме да упражним Използван обхват на неактивен работен лист, трябва да посочите името на работния лист в началото.
Например, тук активният ми работен лист е Лист1 .
За да използвате Използван обхват собственост в Лист2 , трябва да използваме:
Dim Rng като обхват
Задайте Rng = Worksheets("Sheet2").UsedRange
Ще бъдат избрани всички използвани клетки в работния лист, наречен Лист2 .
Прочетете още: VBA за задаване на обхват в Excel (7 примера)
4. VBA UsedRange Property за неактивна работна книга
Можете дори да използвате свойството UsedRange за работна книга, която не е активна. Просто поставете името на работната книга отпред.
Например, тук активната ми работна книга е Работна тетрадка1 . Да упражнявате Използван обхват собственост над Лист1 на Работна тетрадка2 , трябва да използваме:
Dim Rng като обхват
Задайте Rng = Workbooks("Workbook2.xlsm").Worksheets("Sheet1").UsedRange
Това ще избере използвания диапазон на работния лист Лист1 на Работна тетрадка2 .
Прочетете още: VBA за всяка клетка в обхвата в Excel (3 метода)
Нещата, които трябва да запомните
Сайтът Използван обхват собственост на VBA връща Обхват обект. В тази статия използваме Изберете свойство на Обект от обхвата за целите на визуализацията. Но очевидно можете да използвате всяко друго свойство на Обхват според вашето удобство.
Заключение
Използвайки тези методи, можете да използвате Използван обхват имот в Excel. Имате ли въпроси? Не се колебайте да ни попитате.
