Mündəricat
Əgər siz VBA Range Ofset-dən istifadə etməyin ən asan yollarını axtarırsınızsa, onda siz bu məqaləyə dəyər tapacaqsınız. Gəlin VBA Range Ofset-dən istifadə üsulları ilə başlayaq.
İş kitabını endirin
VBA Range Offset.xlsm
VBA Range Ofset-dən istifadə etməyin 11 yolu
Məndə kollec haqqında bəzi tələbələrin məlumatlarından ibarət aşağıdakı məlumat cədvəli var. Bu verilənlər toplusundan istifadə edərək, mən VBA Range Ofset-dən istifadə yollarını izah edəcəyəm.
Bu məqsədlə mən Microsoft Excel 365 versiyasından istifadə etmişəm, siz istənilən istifadə edə bilərsiniz. rahatlığınıza uyğun digər versiyalar.
Metod-1: VBA diapazonundan istifadə edərək xananın seçilməsi
Burada biz
Addım-01 :
➤ Developer Tab>> Visual Basic Seçim
Sonra gedin Visual Basic Redaktoru açılacaq.
➤ Daxil et Tab>> Modul Seçim
bölməsinə keçin.
Bundan sonra Modul yaradılacaq.
Addım-02 :
➤Aşağıdakı kodu yazın
3959
O, B8 xanasını seçəcək.
➤ F5 düyməsini basın
Nəticə :
Beləliklə, Daniel Defo olan xananı seçmiş olacaqsınız.
Ətraflı oxuyun: Excel-də VBA diapazonunun obyektindən necə istifadə etməli
Metod-2: VBA diapazonundan istifadə etməklə bitişik xanalar qrupunun seçilməsi
Siz Tələbə adı sütun və Nəticə sütun kimi bir sıra bitişik xanalar seçə bilərsiniz. bu metodu izləməklə aşağıdakı cədvəli tərtib edin.
Addım-01 :
➤Follow Addım-01 Metod-1
6083
O, B5 -dən C10 -ə qədər olan xanaları seçəcək.
➤ F5
Nəticə düyməsini basın:
Bundan sonra siz Sütun B xanalarını alacaqsınız və C sütunu seçildi.
Metod-3: VBA diapazonundan istifadə etməklə bitişik olmayan xanalar qrupunun seçilməsi
Fərz edək ki, siz William David və Michael Anthony adlı tələbələri, o cümlədən müvafiq E-poçt İd-si seçmək istəyirsiniz. Bu uyğun olmayan xanaları seçmək üçün bu üsula əməl edə bilərsiniz.
Addım-01 :
➤Follow Addım -01 -dən Metod-1
5376
O, B6 , D6 , B9, <2 xanalarını seçəcək>və D9 .
➤ F5
Nəticə düyməsini basın:
Sonra siz şagirdin adı William David , Michael Anthony, və onların müvafiq E-poçt İd-si seçilmiş xanaları əldə edəcəksiniz.
Metod-4: VBA diapazonundan istifadə etməklə bitişik olmayan hüceyrələr qrupunun və diapazonun seçilməsi
Siz eyni vaxtda bir sıra xanalar və bəzi bitişik olmayan xanalar seçə bilərsiniz buna əməl etməkləmetodu.
Addım-01 :
➤ Metodun Addım-01 -ni izləyin. 1
3264
O, B5:B10 diapazonunda və digər iki xananı D6 , D10 diapazonunda seçəcək. .
➤ F5
Nəticə düyməsini basın:
Sonra alacaqsınız William David və Donald Paul üçün Tələbə Adı və iki E-poçt İdsi sütundakı xanalar seçildi.
Metod-5: VBA Diapazon Ofsetindən istifadə etməklə Aralığın Seçilməsi
Siz -dən istifadə edərək Tələbə Adı sütununda bir sıra xanalar seçə bilərsiniz. OFFSET funksiyası .
Addım-01 :
➤ Addım-01 i izləyin. 1>Metod-1
9759
Əvvəlcə Range(“A1:A6”) diapazonu A1:A6 , sonra isə <1 seçəcək>Offset(4, 1) A1 xanasından 4 cərgə aşağı və 1 sütunu sağ tərəfə keçirəcək. Bundan sonra A1:A6 diapazonunda bərabər sayda xanalar buradan seçiləcək.
➤ F5 düyməsini basın.
Nəticə :
Bu yolla siz Tələbə Adı sütununu seçəcəksiniz.
Metod-6: VBA Range Ofset Negatif
Bu üsula əməl etməklə E-poçt İd sütunu seçə bilərsiniz.
Addım-01 :
➤ Metod-1
1620
-dən Addım-01 ə əməl edin Əvvəlcə Range(“F11:F16”) diapazonu seçəcək F11:F16 , sonra isə Offset(-6, -2) 6 hərəkət edəcək F11 xanasından yuxarı sətirlər və sol tərəfdə 2 sütun. Bundan sonra F11:F16 diapazonunda bərabər sayda xanalar buradan seçiləcək.
➤ F5 düyməsini basın.
Nəticə :
Bundan sonra siz E-poçt İd sütununu seçə biləcəksiniz.
Oxşar oxunuşlar:
- Excel-də diapazondakı hər bir hüceyrə üçün VBA (3 Metod)
- Excel-də mətni necə saymaq olar (7 asan hiylə)
Metod-7: Aktiv Hüceyrə ilə bağlı diapazonun seçilməsi
Burada, aktiv xanamız var ( A1 xanası) və bu xanaya münasibətdə biz bu üsulla məlumat diapazonunu seçəcəyik.
Addım-01 :
➤ Metod-1-dən Addım-01 ə əməl edin
6057
Burada, activecell A1
Birinci hissə activecell.Offset(4, 1) xanadan 4 sıra aşağı və 1 sütun sağdan A1
Nəhayət, hamısı bu ikisi arasındakı hüceyrələrdən xanalar seçiləcək.
➤ F5
Nəticə düyməsini basın:
Sonra , siz bütün məlumat diapazonunu seçə biləcəksiniz.
Metod-8: Aralığı kopyalayın
Bir sıra xanaları kopyalamaq istəyirsinizsə, onda siz bu üsula əməl edə bilərsiniz.
Addım-01 :
➤Addım-01 1-i izləyin. Metod-1
1603
Əvvəlcə, Range(“A1:A6”) diapazonu seçəcək A1:A6 və sonra Offset(4, 1) xanadan 4 cərgə aşağı hərəkət edəcək. 1>A1 və 1 sütun sağ tərəfə. Bundan sonra A1:A6 diapazonunda bərabər sayda xanalar buradan seçiləcək.
Nəhayət, B5:B10<2 diapazonunda olan dəyərləri kopyalayacaq>.
➤ F5
Nəticə düyməsini basın:
Bundan sonra siz Tələbə Adı sütununda verilənlər diapazonunu kopyalaya biləcək.
Metod-9: Aralığın silinməsi
Burada, VBA kodundan istifadə etməklə bir sıra verilənləri silməyin yolunu göstərəcəyik.
Addım-01 :
➤ Metod-1
9070
in Addım-01 ə əməl edin
İlk olaraq, Rəng("F11:F17") seçəcək diapazon F11:F17 və sonra Offset(-7, -2) F11 xanasından 7 sətir yuxarı və 2 sütunu sol tərəfə keçirəcək. Bundan sonra, F11:F17 diapazonunda bərabər sayda xanalar buradan seçiləcək.
Nəhayət, D4:D10 diapazonunu siləcək.
➤ F5
Nəticə düyməsini basın:
Bu yolla siz kopyalayacaqsınız E-poçt İd sütununda məlumat diapazonu.
Metod-10: Dəyər Daxil etmək üçün VBA Diapazon Ofsetindən istifadə
Burada, Tələbə adı sütununda boş bir xanamız var (bu üsulu izah etmək üçün bu xanadakı dəyəri sildik) və biz onu Jozef Maykl adı ilə doldurmaq istəyirik. istifadə edərək a VBA kodu biz asanlıqla bu dəyəri daxil edə bilərik.
Addım-01 :
➤Follow Addım-01 Metod-1
3770
İlk olaraq, Range(“A1”) A1 xanasını seçəcək, və sonra Offset(6, 1) A1 xanasından 6 cərgə aşağı və 1 sütunu sağ tərəfə keçirəcək. Bundan sonra B7 xanası seçiləcək və nəhayət, bu xanaya “Jozef Maykl” qiymətini daxil edəcək.
➤ F5
Nəticə düyməsini basın:
Bu yolla siz Joseph Michael adını alacaqsınız B7 xanasında.
Metod-11: Nəticə əldə etmək üçün VBA Aralığının Ofsetindən istifadə etmək
Fərz edək ki, siz Keçildi və ya yazmaq istəyirsiniz Mötərizədə Uğur və ya Uğursuz yazılan Nəticə sütunu -dən asılı olaraq tələbələrin adlarına uyğun gəlmədi . Bu alt sətri Nəticə sütununda tapmaq və onu Uğursuz/Uğursuz sütununda yazmaq üçün bu üsula əməl edin.
Addım-01 :
➤ Metod-1
7864
-dən Addım-01 ə əməl edin
Burada xana diapazonu C5:C10 Range(“C5:C10”) ilə seçilir ki, bu da Nəticə sütunu
InStr(xana. dəyəri, “Keçmək”) > 0 rəqəmin sıfırdan böyük olduğu şərtdir (xanada “Keçmə” olduqda) onda aşağıdakı sətir davam edəcək və bitişik xanada çıxışı Keçildi<2 kimi verəcəkdir>. Burada bitişik xana tərəfindən seçiləcək cell.Offset(0, 1) , bu o deməkdir ki, o, giriş xanasından sağa 1 sütun köçürür.
Şərt yanlış olarsa, xanada heç bir yoxdur. “Keç” sonra Else altındakı sətir yerinə yetiriləcək və bitişik xanada çıxış dəyərini Uğursuz kimi verəcəkdir.
Bu dövrə hər bir xana üçün davam edəcək .
➤ F5
Nəticə düyməsini basın:
Sonra, siz əldə edəcəksiniz Uğursuz/Uğursuz sütununda Keçdi və ya Uğursuz çıxışlar.
Təcrübə Bölməsi
Təcrübə etmək üçün Özünüz biz Təcrübə adlı vərəqdə aşağıdakı kimi bir Təcrübə bölməsini təqdim etdik. Zəhmət olmasa özünüz edin.
Nəticə
Bu məqalədə mən VBA diapazonunun ofsetindən istifadə etməyin ən asan yollarını əhatə etməyə çalışdım. Excel-də effektiv şəkildə. Ümid edirəm ki, faydalı tapacaqsınız. Hər hansı təklif və ya sualınız varsa, onları bizimlə bölüşməkdən çəkinməyin.
