Microsoft Excel ilə işləyərkən biz böyük miqdarda verilənlərin tədqiqindən istifadə edə bilərik. Və bu məlumat diapazonlarını cədvələ çevirmək ən yaxşı variantlardan biridir. Excel cədvəlləri bizə məlumatları sürətlə çeşidləməyə və filtrləməyə, yeni qeydlər əlavə etməyə, diaqramları və Pivot Cədvəlləri dərhal yeniləməyə imkan verir. Və Excel VBA istifadəçiyə sadəcə bəzi sadə kodlarla tətbiqi fərdiləşdirməyə kömək edir. Bu yazıda biz diapazondan cədvəl yaratmaq üçün Excel VBA bir neçə nümunə görəcəyik.

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

Siz yükləyə bilərsiniz iş dəftəri və onlarla məşq edin.

Rəngdən Cədvəl yaratmaq üçün Excel VBA-nın 6 nümunəsi

Cədvəllər Excel-in menyu nəşrində siyahılar kimi başladı, lakin lent variantlarında funksionallıq artdı. Məlumat diapazonunu cədvələ çevirmək imkanları genişləndirir, daha tez və asan işləməyə imkan verir. VBA dən istifadə edərək aralığı cədvələ çevirmək lentdən istifadə etməkdən daha asan yoldur.

Fərz edək ki, bizdə B , C sütununda həmin maddələrin miqdarı və D sütununda hər bir element üçün ümumi satışlar. İndi məlumat diapazonunu cədvələ çevirmək istəyirik. Excel VBA ilə B4:D9 diapazonundan cədvəl yaratmaq üçün müxtəlif nümunələri və addım-addım təlimatları nümayiş etdirək.

ListObjects istifadə edin. .Əlavə et a çevirmək üçünExcel cədvəlinə daxil edin. Elektron cədvəl obyekti xarakterik ListObjects xüsusiyyətinə malikdir. ListObjects Əlavə adlı texnikaya malikdir. .Add üçün kriteriyalar aşağıdakılardır.

expression .Add(SourceType, Source, LinkSource, HasHeaders,Destination)

Və SourceType xlSrcRange .

1. Excel VBA diapazondan Cədvəl yaratmaq üçün

Excel VBA ilə istifadəçilər lentdən Excel menyusu kimi çıxış edən kodu asanlıqla istifadə edə bilərlər. Aralıqdan cədvəl yaratmaq üçün VBA kodundan istifadə etmək üçün proseduru aşağıya endirək.

ADDIMLAR:

• Birincisi, lentdən Developer tabına keçin.
• İkincisi, Kod kateqoriyasından Visual Basic klikləyin ki, açın. Visual Basic Redaktoru . Və ya Visual Basic Redaktoru açmaq üçün Alt + F11 düymələrini basın.
• Bunu etmək əvəzinə, sadəcə olaraq iş vərəqinizə sağ klikləyib bölməsinə keçə bilərsiniz. Koda baxın . Bu, həmçinin sizi Visual Basic Redaktoru -na aparacaq.

• Bu, Visual Basic Redaktoru <2-də görünəcək>aralıqdan cədvəl yaratmaq üçün kodlarımızı yazdığımız yer.
• Üçüncüsü, Daxil et açılan menyu çubuğundan Module üzərinə klikləyin.

• Bu, iş dəftərinizdə Modul yaradacaq.
• Və VBA -ni kopyalayıb yapışdırın. aşağıda göstərilən kod.

VBA Kodu:

4145

• Bundan sonra RubSub düyməsinə klikləməklə kodu işə salın. və ya klaviaturanı sıxmaqqısayol F5 .

Kodu dəyişməyə ehtiyac yoxdur. Edə biləcəyiniz tək şey tələblərinizə uyğun olaraq diapazonu dəyişməkdir.

• Və nəhayət, addımlara əməl etməklə B4:D9 diapazonundan cədvəl yaradılacaq.

VBA kodunun izahı

1113

Sub kodun bir hissəsidir koddakı işi idarə etmək üçün istifadə olunur, lakin heç bir dəyər qaytarmır. O, həmçinin subprosedur kimi tanınır. Beləliklə, biz prosedurumuzu Create_Table() adlandırırıq.

4759

Bu, diapazonun cədvəl kimi çevrildiyi əsas kod xəttidir. Artıq bildiyimiz kimi, diapazonu Excel cədvəlinə çevirmək üçün ListObjects.Add . Və mənbə növü kimi biz xlSrcRange istifadə edirik. Həmçinin, biz diapazonumuzu Range("B4:D9") elan edirik. Və nəhayət, cədvəlimizi Cədvəl1 adlandırın.

2547

Bu, proseduru bitirəcək.

Ətraflı oxuyun: Pivotu necə yeniləmək olar Cədvəl diapazonu (5 Uyğun Metod)

2. Excel VBA istifadə edərək diapazondan Cədvəl qurun

Gəlin Excel VBA-dan istifadə edərək diapazondan cədvəl qurmaq üçün başqa bir nümunəyə baxaq.

ADIMLAR:

• İlk olaraq lentdən İnkişaf et r nişanına keçin.
• İkincisi, Visual Basic Redaktoru<2 açmaq üçün Visual Basic üzərinə klikləyin>.
• Visual Basic Redaktoru açmağın başqa bir yolu sadəcə Alt + F11 düymələrini sıxmaqdır.
• Və ya vərəqə sağ klikləyin , sonra Koda Baxın seçin.
• Sonra, Daxil edin vəaçılan menyudan Module seçin.
• Və bu, vizual əsas pəncərəni açacaq.
• Bundan sonra VBA kodunu kopyalayıb yapışdırın. aşağıda.

VBA Kodu:

5501

• Daha sonra F5 düyməsini basın və ya Kodu işə salmaq üçün Alt düyməsini işə salın.

• Və Metod 1<-də göstərildiyi kimi nəticə əldə edəcəksiniz. 2>.

VBA kodunun izahı

3870

VBA<2-də DIM ifadəsi> “ declare, ” ifadəsinə istinad edir və dəyişəni elan etmək üçün ondan istifadə edilməlidir. Beləliklə, biz diapazonumuzu tb2 və iş vərəqini ws olaraq elan edirik.

6161

VBA Set sadəcə bizə seçmək üçün lazım olan diapazonda yazmaq məcburiyyətindən qaçmağa imkan verir. və kodu işlədərkən təkrar. Beləliklə, biz diapazonumuzu cari bölgəyə, iş səhifəmizi isə aktiv iş vərəqinə təyin edirik.

8488

Bu kod sətri ilə biz diapazondan cədvəl yaradırıq və cədvəlimizi Cədvəl2 adlandırırıq.

Ətraflı oxuyun: VBA ilə Excel Cədvəlindən Necə İstifadə Edilir (9 Mümkün Yol)

3. Excel-də VBA ilə Aralıqdan Cədvəl yaradın

Gəlin diapazondan cədvəl yaratmaq üçün Excel VBA-dan istifadənin başqa bir nümunəsinə baxaq.

ADIMLAR:

• Başlamaq üçün cədvələ çevirmək istədiyiniz bütün diapazonu seçin.
• İkincisi, lentdəki Developer tabına klikləyin.
• Üçüncü, Visual üzərinə klikləməklə Visual Basic Redaktoru işə salın.Əsas .
• Alternativ olaraq, Alt + F11 düymələrini basaraq Visual Basic Redaktoru -na daxil ola bilərsiniz.
• Və ya, sağ -vərəqdə klikləyin və menyudan Koda Baxın seçin.
• Sonra, Daxil et altındakı açılan qutudan Modulu seçin. .
• Və vizual əsas pəncərə görünəcək.
• Ora kodu yazın.

VBA Kodu:

5963

• Nəhayət, kodu işə salmaq üçün F5 düyməsini basın.

• Və bu, yaradacaq Metod 1 -də əldə etdiyimiz kimi verilənlər diapazonundan cədvəl.

Ətraflı oxuyun: Excel-də Cədvəl Necə Yaradılır (Fərdiləşdirmə ilə) )

Oxşar oxunuşlar

• Hesablanmış Sahənin Cəmi Pivot Cədvəldə Sayıya Bölməsi
• Excel-də Nisbi Tezlik Paylanmasını Necə Göstərmək olar
• Həftəyə görə Excel Pivot Cədvəli Qrupu (3 Uyğun Nümunə)
• [Düzelt] Tarixləri Qruplaşdırmaq mümkün deyil Pivot Cədvəldə: 4 Mümkün Həllər
• Excel-də Amortizasiya Cədvəlini Necə Yaratmaq olar (4 Metod) <1 3>

4. Aralıqdan Dinamik Cədvəl Yaratmaq üçün VBA tətbiq edin

Gəlin Excel VBA-dan istifadə edərək diapazondan cədvəl yaratmaq üçün başqa üsula nəzər salaq.

ADIMLAR:

• Başlamaq üçün lenti açın və Developer seçimini seçin.
• Sonra Visual Basic Redaktor -ə daxil olmaq üçün <üzərinə klikləyin. 1>Visual Basic .
• Alt + F11 düymələrinə basmaq da Visual Basic-i gətirəcək.Redaktor .
• Alternativ olaraq, vərəqi sağ klikləyin və görünən menyudan Koda Baxın seçin.
• İndi, Daxil et açılan seçimi, Module seçin.
• Sonra aşağıdakı VBA kodu kopyalayın və yapışdırın.

VBA Kodu:

3454

• F5 düyməsini basaraq kodu işə salın.

• Metod 1 -in təsvirində göstərildiyi kimi, cədvəl diapazondan qurulacaq.

VBA Kodun izahı

8302

Bu sətir alt prosedurun adını göstərir.

5021

Bu iki sətir dəyişən elanı üçün istifadə olunur.

8649

İlə bəyanat obyektin adını dəyişdirmədən bir obyekt üzrə bəyanatlar ardıcıllığı yaratmağa imkan verir. Beləliklə, biz With ifadəsini vərəq adı ilə əlavə edirik.

4543

Bunlar müvafiq olaraq sonuncu sətir və sonuncu sütunu tapmaq üçündür.

7756

Cədvəl yaratmaq üçün diapazon.

5798

Yuxarıda göstərilən diapazonda cədvəl yaradın.

7275

Cədvəl adının göstərilməsi

6627

Cədvəl üslubunu göstərin.

Ətraflı oxuyun: Qısayoldan istifadə edərək Excel-də Cədvəl yaradın (8 Metod)

5. Diapazondan Dinamik Cədvəl Yaradın

İndi isə diapazondan cədvəl yaratmaq üçün başqa Excel VBA metoduna nəzər salın.

ADIMLAR:

• Başlamaq üçün lenti açın və açılan menyudan Developer -i seçin.
• Sonra Visual Basic seçin. Visual Basic Redaktoru .
• Visual Basic Redaktoru -nə Alt + F11 düymələrini basmaqla da daxil olmaq olar.
• Alternativ olaraq, vərəqi sağ klikləyin və açılan menyudan Koda Baxın seçə bilərsiniz.
• Bundan sonra <-dan Modul seçin. 1> açılan menyunu daxil edin.
• Sonra aşağıdakı VBA kodunu kopyalayın və yapışdırın.

VBA Kodu:

1172

• Nəhayət, klaviaturada F5 düyməsinə basaraq kodu işə salın və nəticəni iş vərəqinizdə görürsünüz.

• Və Metod 1 -in təsvirində göstərildiyi kimi, cədvəl diapazondan qurulacaq.

Ətraflı oxuyun: Necə Excel cədvəllərinin gözəl görünməsini təmin edin (8 Effektiv Məsləhət)

6. Dinamik Cədvəl yaratmaq üçün Excel VBA-dan istifadə edin

Gəlin diapazondan cədvəl qurmağın başqa Excel VBA üsulunu araşdıraq.

ADIMLAR:

• Əvvəlcə, Developer nişanına keçin > Visual Basic > Daxil et > Modul .
• Və ya, iş vərəqində sağ klikləmək pəncərəni açacaq. Oradan View Code -ə keçin.
• Və bu sizi Visual Basic Redaktor sahəsinə aparacaq, burada VBA Makroslarını yaza bilərik.
• Digər tərəfdən, Alt + F11 düymələrinə basmaqla da Visual Basic Redaktoru açılacaq.
• Bundan sonra VBA kodu yazın. .

VBA Kodu:

3790

• Və nəticəni görmək üçün kodu işlədin F5 düyməsini basaraq.

• Və cədvəl <1-də göstərildiyi kimi diapazondan yaradılacaq>Metod 1 .

Ətraflı oxuyun: Məlumatla Excel-də Cədvəl Yaratmaq (5 üsul)

Nəticə

Yuxarıdakı üsullar Excel-də diapazondan cədvəl yaratmağa kömək edəcək. Ümid edirik ki, bu sizə kömək edəcək! Hər hansı bir sualınız, təklifiniz və ya rəyiniz varsa, şərh bölməsində bizə bildirin. Və ya ExcelWIKI.com bloqunda digər məqalələrimizə nəzər sala bilərsiniz!