Bu dərslik Excel-də sütunda İstifadə olunan Aralığı seçmək üçün VBA -dən istifadənin 8 nümunələrini nümayiş etdirəcək. Ümumiyyətlə, excel-dəki UsedRange xassəsi iş vərəqinin üzərində məlumat olan hissəsini təmsil edir. Nümunələri aydın şəkildə göstərmək üçün biz bütün nümunələr üçün xüsusi verilənlər bazasında UsedRange xassəsini tətbiq edəcəyik.

Təcrübə İş Kitabını endirin

Təcrübə iş kitabını buradan endirə bilərik. .

Sütunda UsedRange seçmək üçün VBA-nın 8 asan nümunəsi

Aşağıdakı şəkildə , biz bütün nümunələr üçün istifadə edəcəyimiz verilənlər toplusunu görə bilərik. Datasetdə Satıcılar adları, onların Yer , Region, və ‘ Ümumi Məbləğ ’ satışları var. Bu verilənlər bazasında başlıq daxil olmaqla istifadə olunan diapazon nəzərə alınacaq. Beləliklə, aşağıdakı verilənlər bazasında istifadə olunan diapazon ( B2:E15 )-dir.

1. Excel

İlk növbədə verilənlər bazamızdan bütün sütunları seçəcəyik. Bunun üçün sütunlarda VBA select UsedRange xassəsindən istifadə edəcəyik. Bu metodu yerinə yetirmək üçün addımlara baxaq.

ADIMLAR:

• Başlamaq üçün, adlı aktiv vərəqdə sağ klikləyin ' Sütunları_Seçin '.
• Bundan əlavə, ' Koda Baxın ' seçimini seçin.

• Sonra yuxarıdakı hərəkət boşluq açır VBA həmin iş vərəqi üçün kod pəncərəsi. Bu kod pəncərəsini Alt + F11 düyməsini sıxmaqla da əldə edə bilərik.
• Sonra, həmin kod pəncərəsində aşağıdakı kodu daxil edin:

2817

• Bundan sonra kodu çalıştırmaq üçün Çalışdır üzərinə klikləyin və ya F5 düyməsini basın.

• Nəhayət, aşağıdakı şəkildəki kimi nəticə əldə edirik. Məlumat dəstimizdən sütunlarda istifadə olunan diapazonun indi seçildiyini görə bilərik.

2.

Sütununa Bütün UsedRange-i kopyalamaq üçün VBA-dan istifadə edin. İkinci misalda, verilənlər bazamızdan sütunlarda istifadə olunan bütün diapazonu kopyalamaq üçün VBA -dən istifadə edəcəyik. Ümumiyyətlə, biz bu metoddan müəyyən bir bölgəni verilənlər bazamızdan köçürmək üçün istifadə edirik. Bu metodu yerinə yetirmək üçün aşağıdakı addımları yerinə yetirməliyik.

ADIMLAR:

• İlk olaraq, ' Kopyala '.
• Sonra, həmin tabda sağ klikləyin və ' Koda Baxın ' seçimini seçin.

• O, cari iş vərəqi üçün boş VBA kod pəncərəsini açacaq. Bu pəncərəni əldə etməyin başqa bir yolu klaviaturadan Alt + F11 düymələrini sıxmaqdır.
• Sonra aşağıdakı kodu həmin kod pəncərəsinə daxil edin:

6826

• İndi kodu işə salmaq üçün Çalışdır və ya F5 düyməsini basın.

• Nəhayət, nəticəni aşağıdakı kimi görə bilərik. Həmçinin, istifadə olunan diapazon ətrafında sərhəd xəttini görə bilərik. Bu kodun məlumatı kopyaladığını göstərirbu haşiyənin içərisində.

Ətraflı oxuyun: Excel VBA: Dinamik diapazonu başqa bir iş kitabına kopyalayın

3. Say sayı VBA-dan istifadə edərək UsedRange-də Sütunların sayı

Üçüncü misalda biz sütunda excel VBA seçmə İstifadə olunan Aralıq metodundan istifadə edərək verilənlər dəstimizdəki sütunların sayını hesablayacağıq. . Bu nümunə mesaj qutusunda məlumat dəstimizdə istifadə olunan diapazonda sütunların ümumi sayını qaytaracaq. Bu metodu yerinə yetirmək üçün aşağıdakı addımları yerinə yetirin.

ADDIMLAR:

• İlk olaraq, ' Sütun_sayı ' adlı aktiv vərəqi seçin.
• İkincisi, aktiv vərəqin adına sağ klikləyin və ' Koda Baxın ' seçiminə klikləyin.

• Yuxarıdakı əmr aktiv iş səhifəsi üçün boş VBA kod pəncərəsini açır. Klaviaturadan Alt + F11 düymələrini basmaqla da kod pəncərəsini əldə edə bilərik.
• Üçüncüsü, boş kod pəncərəsinə aşağıdakı kodu daxil edin:

8507

• Sonra, kodu çalıştırmaq üçün Çalışdır üzərinə klikləyin və ya F5 düyməsini basın.

• Nəhayət, nəticəni mesaj qutusunda alırıq. İstifadə olunan diapazonda sütunların sayı 4 -dir.

Ətraflı oxuyun: Aralıqdakı sətirləri saymaq üçün VBA-dan necə istifadə etmək olar Excel-də verilənlərlə (5 makro)

4. İstifadə olunmuş diapazonda sonuncu sütunun sayını hesablamaq üçün Excel VBA

Əvvəlki üsulda biz sonuncu sütunun nömrəsini çıxardıq istifadə olunan diapazon.Bununla belə, bu nümunədə biz VBA seçmə UsedRange xassəsi ilə bütün iş vərəqi üzrə istifadə olunan diapazonda sonuncu sütunun sayını təyin edəcəyik. Bu əməliyyatı yerinə yetirmək üçün əməl etməli olduğumuz addımlara baxaq.

ADDIMLAR:

• Başlamaq üçün sağ klikləyin ' Son Sütun ' adlı aktiv vərəqdə.
• Sonra ' Koda Baxın ' seçimini seçin.

• Beləliklə, yuxarıdakı əmr həmin iş vərəqi üçün boş VBA kod pəncərəsi açır. Həmin kod pəncərəsini açmağın alternativ yolu Alt + F11 düyməsini sıxmaqdır.
• Bundan sonra həmin kod pəncərəsinə aşağıdakı kodu daxil edin:

8687

• İndi İşlət üzərinə klikləyin və ya kodu işə salmaq üçün F5 düyməsini basın.

• Sonunda nəticəmizi mesaj qutusunda alırıq. İstifadə olunan diapazonda sonuncu sütun iş vərəqinin 5-ci sütunudur.

Oxşar oxunuşlar

• Excel-də diapazonda hər bir sətir üçün VBA-dan necə istifadə etməli
• Excel-də aktiv hüceyrədən diapazonu seçmək üçün VBA-dan istifadə edin (3 üsul)
• Excel Makro: Dinamik diapazonla birdən çox sütunu çeşidləyin (4 üsul)

5. VBA ilə UsedRange-dən Son Sütunun Son Xanasını seçin

Beşinci misalda biz excel cədvəlində sonuncu sütunun son xanasını seçmək üçün VBA select Used Range xassəsi istifadə edəcəyik. Bu nümunəni göstərmək üçün bizəvvəlki məlumat dəstimizlə davam edəcək. İndi bu metodu yerinə yetirmək üçün addımlara nəzər salın.

ADDIMLAR:

• İlk olaraq ' Son_Cell<2 adlı aktiv vərəqi seçin>'.
• Sonra, həmin vərəq adına sağ klikləyin . ' Koda Baxın ' seçimini seçin.

• Sonra boş VBA kod pəncərəsi alırıq . Həmçinin, həmin kod pəncərəsini açmaq üçün Alt + F11 düymələrini sıxa bilərik.
• Bundan sonra həmin kod pəncərəsində aşağıdakı kodu daxil edin:

2144

• İndi kodu işə salmaq üçün Çalışdır üzərinə klikləyin və ya F5 düyməsini basın.

• Nəhayət, aşağıdakı şəkildəki nəticəni görə bilərik. Son sütunun seçilmiş sonuncu xanası E15 xanasıdır.

6. Excel VBA

Bu nümunədə biz Excel iş vərəqində seçilmiş istifadə olunan diapazonun xana diapazonunu tapmaq üçün VBA tətbiq edəcəyik. İstifadə etdiyimiz diapazondakı bütün sütunlar üçün VBA kodundan istifadə edəcəyik. Kod xana diapazonunu, eləcə də istifadə olunan diapazondakı sütunun ünvanını qaytaracaq. Bu əməliyyatı yerinə yetirmək üçün aşağıdakı addımları yerinə yetirin.

ADIMLAR:

• Əvvəlcə, aktiv vərəq nişanında sağ klikləyin ' Hüceyrə Aralığını Tap ' adlı.
• İkincisi, ' Koda Baxın ' seçimini seçin.

• O, boş VBA kod pəncərəsini açacaq. Bu kod pəncərəsini açmaq üçün başqa üsul Alt düyməsini sıxmaqdır + F11 .
• Üçüncüsü, həmin kod pəncərəsinə aşağıdakı kodu daxil edin:

5847

• Sonra kodu işə salmaq üçün üzərinə klikləyin Çalışdır və ya F5 düyməsini basın.

• Sonunda belə bir mesaj qutusu aşağıdakı şəkil nəticəni göstərir.

Oxşar oxunuşlar

• VBA - Satırlar arasında Döngü və Excel-də diapazondakı sütunlar (5 Nümunə)
• Excel VBA-da diapazonu massiləyə necə çevirmək olar (3 yol)

7. Daxil edin Boş Hüceyrələri Saymaq üçün VBA UsedRange Xüsusiyyəti

Bu nümunədə biz Excel vərəqində boş xanaları saymaq üçün VBA seçmə UsedRange xassəsi istifadə edəcəyik. Bəzən verilənlər bazamızın istifadə olunan diapazonunda boş xanalarımız ola bilər. Biz UsedRange xassəsi ilə həmin boş xanaların sayını asanlıqla saya bilərik. Gəlin bu nümunəni yerinə yetirmək üçün addımlara baxaq.

ADIMLAR:

• İlk olaraq ' adlı aktiv vərəq tabında sağ klikləyin Boş_Hüceyrələr '.
• Sonra ' Koda Baxın ' seçimini seçin.

• Yuxarıdakı hərəkət boş VBA kod pəncərəsini açır. Həmin kod pəncərəsini açmağın alternativ yolu Alt + F11 düyməsini sıxmaqdır.
• Sonra həmin kod pəncərəsinə aşağıdakı kodu daxil edin:

6958

• Bundan sonra kodu çalıştırmaq üçün Run üzərinə klikləyin və ya F5 düyməsini basın.

• Nəhayət, mesaj qutusunda nəticə əldə edəcəyik. Themesaj qutusu istifadə etdiyimiz diapazonda ümumi xanaların və boş xanaların sayını göstərəcək.

8. Excel-də Sütunda İlk Boş Xanəni tapmaq üçün VBA UsedRange

Sonuncu misalda Excel iş səhifəmizdə ilk boş xananı tapmaq üçün sütunda İstifadə olunan Aralıq xassəsi seçmək üçün excel VBA istifadə edəcəyik. Bu üsul müəyyən bir sütunun ilk boş xanasını tapacaqdır. Boş xana həmişə verilənlər toplusunun istifadə olunan diapazonundan kənarda olacaq. Beləliklə, istifadə olunan diapazonda hər hansı bir xana boş və ya boşdursa, bu üsulda nəzərə alınmayacaq. İndi bu metodu yerinə yetirmək üçün aşağıdakı addımları yerinə yetirin.

ADDIMLAR:

• Başlamaq üçün aktiv olana sağ klikləyin ' Birinci_Boş ' adlı vərəq nişanı.
• Bundan əlavə, ' Koda Baxın ' seçimini seçin.

• O, boş VBA kod pəncərəsini açacaq. Biz həmçinin həmin kod pəncərəsini açmaq üçün Alt + F11 düymələrini sıxa bilərik.
• Bundan əlavə, boş VBA kod pəncərəsinə aşağıdakı kodu daxil edin:

8061

• Sonra kodu işə salmaq üçün Çalışdır və ya F5 düyməsini basın.

• Nəhayət, yuxarıdakı kod E16 xanasına ' FirstEmptyCell ' dəyərini daxil edəcək. Bu, verilənlər toplusunun istifadə olunan diapazonundan sonra E sütununun ilk boş xanasıdır.

Ətraflı oxuyun: Excel VBA-dan Boş xanaya qədər diapazonda dövrələyin (4 Nümunə)

Nəticə

Bir sözlə, bu dərslik Excel cədvəlində VBA seçmə UsedRange xassəsi istifadə etmək üçün 8 nümunələri göstərir. Bacarıqlarınızı sınaqdan keçirmək üçün bu məqalə üçün istifadə olunan təcrübə iş vərəqini yükləyin. Hər hansı bir sualınız varsa, aşağıdakı qutuya şərh verməkdən çekinmeyin. Komandamız mesajınıza ən qısa zamanda reaksiya verməyə çalışacaq. Gələcəkdə daha innovativ Microsoft Excel həlləri üçün diqqətli olun.