Əgər Excel iş vərəqimizdə fərdi Çap Düyməsi təyin edə bilsək, bu, vərəqləri çap etmək üçün çox istifadəçi dostu və vaxta qənaət edə bilər. VBA Makrosları istifadə edərək, biz bunu asanlıqla edə bilərik. Beləliklə, bu məqalə sizə Excel-də çap düyməsi üçün VBA kodundan istifadə etmək üçün 5 sadə makro təqdim edəcək.

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

Siz edə bilərsiniz pulsuz Excel şablonunu buradan endirin və özünüz məşq edin.

VBA-dan istifadə etmək üçün 5 nümunə Excel-də Çap Düyməsi üçün Kod

Gəlin əvvəlcə bəzi satıcının müxtəlif Regionlarda satışlarını əks etdirən verilənlər bazamızla tanış olaq.

1. Excel-də Çap Dialoq Qutusu üçün Çap Düyməsi Yaratmaq üçün VBA Kodundan istifadə edin

Əvvəlcə biz Çap Düyməsi yaradacağıq və sonra onun üçün kodlar yazacağıq.

Addımlar:

• Aşağıdakı kimi klikləyin: Developer >> Daxil edin >> Düymə qutusu.

Tezliklə siz kursorunuzda artı işarəsi (+) alacaqsınız.

• İstədiyiniz düymə ölçüsünə uyğun olaraq həmin kursoru çəkin və bir müddət sonra Makro Təyin et adlı dialoq qutusu açılacaq.

• ad və Yeni düyməsini basın.

VBA pəncərəsi görünəcək.

• Sonra yazın içindəki aşağıdakı kodlar-

4873

• İndi geri qayıdın vərəq .

Kod bölgüsü

• Burada , mən Alt prosedur yaratdım, DialoqBox .
• Sonra Dialoqlar (xlDialogPrint).Show -ni açmaq üçün istifadə etdim. Çap dialoq qutusu .

Düymə yaradıldı.

• düyməsinə sağ klikləyin >və düymənin adını dəyişmək üçün Kontekst menyusundan Mətni Redaktə et seçin.

• Daha sonra, sadəcə adını yazın və klikləyin siçanınızı hər yerdə Düymədən kənarda .

Sonra sadəcə Düyməni basın.

Sonra Çap et dialoq qutusu əldə edəcəksiniz. İstəyirsinizsə, onu indi Çap edə bilərsiniz.

Hazırda heç bir Printeriniz yoxdursa, onu Saxla edə bilərsiniz. 1>PDF . sonrakı istifadə üçün və ya daha sonra Çap üçün.

• İndi OK düyməsini basın.

• Hazırda sadəcə ad verin və Saxla düyməsini basın.

Budur çap olunmuş PDF .

Ətraflı oxuyun: Excel-də Çap Parametrlərini Necə Tənzimləmək (8 Uyğun Fövqəladə)

2. Aktiv Vərəq üçün Çap Düyməsini Yaratmaq üçün VBA Kodundan istifadə edin

Burada biz VBA və Aktiv çap etmək üçün VBA istifadə edəcəyik>Cədvəl .

Addımlar:

• yaratmaq üçün ilk bölmədən ilk iki addımı izləyin>düyməsinə və Makro təyin edin .
• Makro adı yazın və basın Yeni .

Bir müddət sonra VBA pəncərəsi açılacaq.

• Sonra aşağıdakı kodları içinə yazın-

2414

• Daha sonra geri qayıdın

Kod Bölməsi

• Burada mən Alt prosedur yaratdım , ActiveSheet .
• Daha sonra PrintOut istifadə edərək aktiv vərəqi seçin və çap edin .

• İndi sadəcə Düyməni basın.

A dialoq qutusu adlı Saxla Çap çıxışını Fərqli saxla açılacaq.

• ad verin və Saxla düyməsini basın. .

Sonra çap olunmuş PDF alacaqsınız.

Siz edə bilərsiniz ehtiyacınız olarsa, printeri asanlıqla dəyişdirin.

• Ev bölməsinin yanında Fayl üzərinə klikləyin

• Sonra Çap seçimini seçin və seçmək üçün açılan menyuda üzərinə klikləyin a Printer .

Ətraflı oxuyun: Excel-də bütün vərəqləri necə çap etmək olar (3 üsul)

3. Excel-də Seçilmiş Vərəqlər üçün Çap Düyməsi yaratmaq üçün VBA Kodunu Tətbiq edin

Əgər siz Çap etmək xüsusi seçilmiş vərəqləri etmək istəyirsinizsə, istifadə etməklə də mümkündür. VBA .

Addımlar:

• yaratmaq üçün ilk bölmədən ilk iki addımı izləyin. düyməsi və təyin makro .
• Sonra Makro Adı yazın və Yeni düyməsini basın.

Bir müddət sonra, VBA pəncərəsi açılacaq.

• Daha sonra aşağıdakı kodları daxil edin-

1495

Sonra qeriyə qayıdın vərəqinizə .

Kod Bölgüsü

• Burada mən Alt prosedur yaratdım, SelectedSheets .
• Sonra ActiveWindow -dən <1-ə qədər istifadə etdim>vərəq seçin aktiv Excel pəncərəsi .
• Sonra, çox seçilmişləri çap etmək üçün PrintOut istifadə edildi vərəqlər .

• İndi vərəqləri seçin və Çap düyməsini basın. Mən iki vərəq seçdim.

• PDF üçün ad verin və Saxla düyməsini basın .

PDF faylında iki vərəq<2 üçün t iki səhifə var>.

Ətraflı oxuyun: Excel-də VBA Makrosundan istifadə edərək xüsusi vərəqləri necə çap etmək olar (4 yol)

Oxşar oxunuşlar:

• Excel vərəqini A4 ölçüsündə necə çap etmək olar (4 üsul)
• Necə saxlamaq olar Çap edərkən Excel-də başlıq (3 yol)
• Excel VBA: Çap sahəsini dinamik olaraq necə təyin etmək olar (7 üsul)
• Excel-i necə çap etmək olar Xəttli vərəq (3 asan yol)
• Excel-də qrafiki necə çap etmək olar (5 üsul)

4. Seçilmiş diapazonlu xüsusi vərəq üçün Çap düyməsini yaratmaq üçün Excel VBA-nı yerləşdirin

Burada biz Çap düyməsini çap üçün seçilmiş edəcəyik diapazon xüsusi vərəqdən .

Addımlar:

• Birinci ə əməl edin düyməsinə yaratmaq və makro təyin etmək üçün birinci bölmədən iki addım.
• Makro adı yazın və Yeni düyməsini basın. .

Bir müddət sonra VBA pəncərəsi açılacaq.

• Sonra yazın aşağıdakı kodlar –

2525

• Daha sonra vərəqinizə qayıdın.

Kod bölgüsü

• Burada mən Alt prosedur, SpecificSheetnRange yaratdım.
• Sonra ifadəsi ilə seçmək üçün a xüsusi
• Növbəti, PrintArea = “B2:D11” istifadə olunur.PrintOut xüsusi vərəqdən aralığı seçəcək və çap edəcək .

• İndi sadəcə Çap Düyməsinə basın.

• Üçün ad təyin edin PDF və Saxla düyməsini basın.

Bu, çap edilmiş xüsusi vərəqdir.

Ətraflı oxuyun: Excel VBA: Çoxlu diapazonlar üçün Çap Sahəsini Ayarlayın (5 Nümunə)

5. Seçilmiş diapazonlu Aktiv Vərəq üçün Çap Düyməsi yaratmaq üçün Excel VBA-nı yerləşdirin

Həmçinin, siz aktiv vərəqdən aralıq seçə bilərsiniz və VBA istifadə edərək çap etmək üçün 1>Çap düyməsini edin.

Addımlar:

• ilk bölmədən ilk iki addım düyməsinə yaratmaq və makro təyin etmək.
• Daha sonra Makro Adı yazın. və Yeni düyməsini basın.

Bir müddət sonra VBA pəncərə açılacaq.

• VBA pəncərəsində, aşağıdakı kodları -
<14 yazın >

2959

• Sonra geri qayıdın vərəqinizə .



Kod Dağılımı

• Burada mən Alt prosedur, ActiveSheetnRange yaratdım.
• Sonra <1 istifadə etdim>Range("B2:D11").PrintOut - seçmək a aralıq və çap etmək.
• Çap düyməsini basın.



• ad verin və Saxla<2 düyməsini basın>.



Sonra siz çap edilmiş diapazonu alacaqsınız.



Daha ətraflı: Xüsusi vərəqləri çap etmək üçün Excel düyməsi (Asan addımlarla)

Nəticə

Ümid edirəm ki, yuxarıda təsvir edilən prosedurlar Excel-də çap düyməsi üçün VBA kodundan istifadə etmək üçün kifayət qədər yaxşı olacaq. Şərh bölməsində istənilən sualı verməkdən çekinmeyin və mənə rəy bildirin.