Бұл оқулық 8 Excel бағдарламасындағы бағандағы Пайдаланылған ауқым таңдау үшін VBA пайдалану мысалдарын көрсетеді. Жалпы, Excel бағдарламасындағы UsedRange сипаты жұмыс парағының деректері бар бөлігін білдіреді. Мысалдарды анық көрсету үшін біз барлық мысалдар үшін белгілі бір деректер жиынында UsedRange сипатын қолданамыз.

Тәжірибе жұмыс кітабын жүктеп алу

Тәжірибе жұмыс кітабын осы жерден жүктеп алуға болады. .

Бағандағы UsedRange таңдау үшін VBA 8 оңай мысалдары

Келесі суретте , біз барлық мысалдар үшін қолданатын деректер жиынын көре аламыз. Деректер жинағы Сатушылар аттары, олардың Орналасқан жері , Аймақ, және ‘ Жалпы сома ’ сатудан тұрады. Бұл деректер жинағында тақырыпты қоса алғанда, пайдаланылған ауқым қарастырылады. Сонымен, келесі деректер жинағында пайдаланылатын ауқым ( B2:E15 ).

1. Excel

Ең алдымен деректер жиынынан барлық бағандарды таңдаймыз. Ол үшін бағандарда VBA select UsedRange сипатын қолданамыз. Осы әдісті орындау қадамдарын қарастырайық.

ҚАДАМДАР:

• Бастау үшін, аталған белсенді парақта тінтуірдің оң жақ түймешігін басыңыз ' Бағандарды_таңдау '.
• Сонымен қатар, ' Кодты қарау ' опциясын таңдаңыз.

• Содан кейін жоғарыдағы әрекет бос орынды ашады VBA осы жұмыс парағы үшін код терезесі. Біз бұл код терезесін Alt + F11 пернелерін басу арқылы да ала аламыз.
• Кейін сол код терезесіне келесі кодты теріңіз:

7345

• Одан кейін кодты іске қосу үшін Орындау түймесін басыңыз немесе F5 пернесін басыңыз.

• Соңында келесі суреттегідей нәтиже аламыз. Деректер жиынындағы бағандардағы пайдаланылған ауқым қазір таңдалғанын көреміз.

2.

бағанындағы бүкіл UsedRange көшіру үшін VBA пайдаланыңыз. Екінші мысалда деректер жиынтығынан бағандардағы барлық пайдаланылған ауқымды көшіру үшін VBA қолданамыз. Жалпы, біз бұл әдісті деректер жиынтығынан белгілі бір аймақты көшіру үшін қолданамыз. Бұл әдісті орындау үшін төмендегі қадамдарды орындауымыз керек.

ҚАДАМДАР:

• Алдымен ' Көшіру<деп аталатын белсенді жұмыс парағы қойындысына өтіңіз. 2>'.
• Кейін сол қойындыны тінтуірдің оң жақ түймешігімен басыңыз және ' Кодты қарау ' опциясын таңдаңыз.

• Ол ағымдағы жұмыс парағы үшін бос VBA код терезесін ашады. Бұл терезені алудың тағы бір жолы пернетақтадан Alt + F11 пернелерін басу.
• Одан кейін код терезесіне төмендегі кодты енгізіңіз:

6226

• Енді кодты іске қосу үшін Орындау түймесін басыңыз немесе F5 пернесін басыңыз.

• Соңында нәтижені төмендегідей көре аламыз. Сондай-ақ, біз пайдаланылған ауқымның айналасында шекара сызығын көре аламыз. Бұл кодтың деректерді көшіргенін көрсетедіосы шекараның ішінде.

Толығырақ оқу: Excel VBA: Динамикалық ауқымды басқа жұмыс кітабына көшіру

3. Санақ саны UsedRange ішіндегі бағандардың саны VBA көмегімен

Үшінші мысалда Excel VBA таңдалған Қолданылған диапазон әдісі     бағандағы    деректер жиынындағы бағандар санын есептейміз. . Бұл мысал хабар жолағындағы деректер жиынындағы пайдаланылған ауқымдағы бағандардың жалпы санын қайтарады. Бұл әдісті орындау үшін төмендегі қадамдарды орындаңыз.

ҚАДАМДАР:

• Біріншіден, ' Санақ_баған ' деп аталатын белсенді парақты таңдаңыз.
• Екіншіден, белсенді парақ атауын тінтуірдің оң жақ түймешігімен басыңыз және ' Кодты қарау ' опциясын басыңыз.

• Жоғарыдағы пәрмен белсенді жұмыс парағы үшін бос VBA код терезесін ашады. Сондай-ақ пернетақтадан Alt + F11 пернелерін басу арқылы код терезесін алуға болады.
• Үшіншіден, бос код терезесіне келесі кодты енгізіңіз:

5572

• Одан кейін кодты іске қосу үшін Орындау түймесін басыңыз немесе F5 пернесін басыңыз.

• Соңында нәтижені хабарлама терезесінде аламыз. Пайдаланылған диапазондағы бағандар саны 4 .

Толығырақ: Ауқымдағы жолдарды санау үшін VBA қалай пайдалануға болады Excel бағдарламасындағы деректермен (5 макрос)

4. Excel VBA пайдаланылған диапазондағы соңғы баған санын санау үшін

Алдыңғы әдісте біз соңғы бағанның нөмірін шығардық. қолданылатын диапазон.Дегенмен, бұл мысалда біз бүкіл жұмыс парағы бойынша пайдаланылған ауқымдағы соңғы бағанның нөмірін VBA таңдау UsedRange сипатын пайдаланып анықтаймыз. Осы әрекетті орындау үшін орындау керек қадамдарды көрейік.

ҚАДАМДАР:

• Бастау үшін тінтуірдің оң жақ түймешігін басыңыз ' Соңғы баған ' деп аталатын белсенді парақта.
• Одан кейін ' Кодты қарау ' опциясын таңдаңыз.

• Сонымен, жоғарыдағы пәрмен сол жұмыс парағы үшін бос VBA код терезесін ашады. Бұл код терезесін ашудың балама жолы - Alt + F11 пернесін басу.
• Одан кейін код терезесіне келесі кодты енгізіңіз:

7469

• Енді кодты іске қосу үшін Іске қосу түймесін басыңыз немесе F5 пернесін басыңыз.

• Соңында біз хабарлама терезесінде нәтиже аламыз. Пайдаланылған ауқымдағы соңғы баған жұмыс парағының 5-ші бағаны.

Ұқсас көрсеткіштер

• Excel бағдарламасындағы ауқымдағы әрбір жол үшін VBA пайдалану жолы
• Excel бағдарламасындағы белсенді ұяшықтан ауқымды таңдау үшін VBA пайдаланыңыз (3 әдіс)
• Excel макросы: динамикалық диапазонмен бірнеше бағандарды сұрыптау (4 әдіс)

5. VBA бар UsedRange ішінен соңғы бағанның соңғы ұяшығын таңдаңыз

Бесінші мысалда Excel парағындағы соңғы бағанның соңғы ұяшығын таңдау үшін VBA таңдау Used Range сипатты қолданамыз. Бұл мысалды көрсету үшін бізалдыңғы деректер жиынтығымен жалғасады. Енді осы әдісті орындау қадамдарын қараңыз.

ҚАДАМДАР:

• Алдымен ' Соңғы_ұяшық<2 деп аталатын белсенді парақты таңдаңыз>'.
• Кейін сол парақ атауын тінтуірдің оң жақ түймешігімен басыңыз . ' Кодты қарау ' опциясын таңдаңыз.

• Содан кейін бос VBA код терезесін аламыз. . Сондай-ақ, сол код терезесін ашу үшін Alt + F11 пернелерін басуға болады.
• Одан кейін сол код терезесіне келесі кодты теріңіз:

4693

• Енді кодты іске қосу үшін Іске қосу түймесін басыңыз немесе F5 түймесін басыңыз.

• Соңында нәтижені келесі суреттен көре аламыз. Соңғы бағанның таңдалған соңғы ұяшығы E15 ұяшығы.

6. Excel VBA

Бұл мысалда Excel жұмыс парағында таңдалған пайдаланылған ауқымның ұяшық ауқымын табу үшін VBA қолданамыз. Біз пайдаланылған ауқымдағы барлық бағандар үшін VBA кодын қолданамыз. Код ұяшық ауқымын, сондай-ақ пайдаланылған ауқымдағы бағанның мекенжайын қайтарады. Бұл әрекетті орындау үшін төмендегі қадамдарды орындаңыз.

ҚАДАМДАР:

• Басында белсенді парақ қойындысында тінтуірдің оң жақ түймешігін басыңыз ' Ұяшық ауқымын табу ' деп аталады.
• Екіншіден, ' Кодты қарау ' опциясын таңдаңыз.

• Ол бос VBA код терезесін ашады. Бұл код терезесін ашудың тағы бір әдісі Alt пернесін басу + F11 .
• Үшіншіден, код терезесіне келесі кодты енгізіңіз:

8806

• Содан кейін кодты іске қосу үшін түймесін басыңыз. Іске қосу немесе F5 пернесін басыңыз.

• Соңында келесідей хабар терезесі шығады келесі сурет нәтижені көрсетеді.

Ұқсас оқулар

• VBA - Жолдар бойынша цикл және Excel бағдарламасындағы ауқымдағы бағандар (5 мысал)
• Excel VBA бағдарламасында ауқымды массивке қалай түрлендіруге болады (3 жол)

7. Кірістіру Бос ұяшықтарды санау үшін VBA UsedRange қасиеті

Бұл мысалда Excel парағындағы бос ұяшықтарды санау үшін VBA таңдаулы UsedRange қасиетін қолданамыз. Кейде деректер жиынының пайдаланылған ауқымында бос ұяшықтар болуы мүмкін. Біз бұл бос ұяшықтардың сандарын UsedRange қасиетін пайдалану арқылы оңай санай аламыз. Осы мысалды орындау қадамдарын қарастырайық.

ҚАДАМДАР:

• Біріншіден, ' деп аталатын белсенді парақ қойындысында тінтуірдің оң жақ түймешігін басыңыз Бос_ұяшықтар '.
• Одан кейін ' Кодты қарау ' опциясын таңдаңыз.

• Жоғарыдағы әрекет бос VBA код терезесін ашады. Бұл код терезесін ашудың балама жолы Alt + F11 пернесін басу болып табылады.
• Содан кейін сол код терезесіне келесі кодты енгізіңіз:

7741

• Одан кейін кодты іске қосу үшін Іске қосу түймесін басыңыз немесе F5 пернесін басыңыз.

• Соңында нәтижені хабарлама терезесінде аламыз. Theхабар жолағы пайдаланылған ауқымдағы жалпы ұяшықтар мен бос ұяшықтардың санын көрсетеді.

8. Excel <10 бағанындағы бірінші бос ұяшықты табу үшін VBA UsedRange қолданылады>

Соңғы мысалда excel жұмыс парағындағы бірінші бос ұяшықты табу үшін бағандағы Used Range сипатты таңдау үшін excel VBA қолданамыз. Бұл әдіс белгілі бір бағанның бірінші бос ұяшығын анықтайды. Бос ұяшық әрқашан деректер жиынының пайдаланылған ауқымынан тыс болады. Сонымен, пайдаланылған ауқымда кез келген ұяшық бос немесе бос болса, ол бұл әдісте қарастырылмайды. Енді осы әдісті орындау үшін төмендегі қадамдарды орындаңыз.

ҚАДАМДАР:

• Бастау үшін белсенді түймені тінтуірдің оң жақ түймешігімен басыңыз ' Бірінші_Бос ' деп аталатын парақ қойындысы.
• Сонымен қатар, ' Кодты қарау ' опциясын таңдаңыз.

• Ол бос VBA код терезесін ашады. Сондай-ақ сол код терезесін ашу үшін Alt + F11 пернелерін басуға болады.
• Сонымен қатар, бос VBA код терезесіне келесі кодты теріңіз:

8016

• Содан кейін кодты іске қосу үшін Орындау түймесін басыңыз немесе F5 пернесін басыңыз.

• Соңында, жоғарыдағы код E16 ұяшығына ' FirstEmptyCell ' мәнін кірістіреді. Бұл деректер жиынының пайдаланылған ауқымынан кейінгі E бағанының бірінші бос ұяшығы.

Сондай-ақ_қараңыз: Excel деректері бар соңғы бағанды ​​табу (4 жылдам әдіс)

Толығырақ оқу: Excel VBA Бос ұяшыққа дейін Ауқымды айналдыру (4 мысал)

Қорытынды

Қысқаша айтқанда, бұл оқулық Excel парағында VBA таңдалған UsedRange сипатын пайдалану үшін 8 мысалдарын көрсетеді. Дағдыларыңызды сынаққа қою үшін осы мақалада пайдаланылған тәжірибелік жұмыс парағын жүктеп алыңыз. Қандай да бір сұрақтарыңыз болса, төмендегі ұяшыққа түсініктеме қалдырыңыз. Біздің команда сіздің хабарламаңызға мүмкіндігінше тез жауап беруге тырысады. Болашақта инновациялық Microsoft Excel шешімдеріне назар аударыңыз.