Mundarija
Excelda VBA bilan ishlashda biz duch keladigan eng muhim va keng qo'llaniladigan vazifalardan biri bu kerakli ma'lumotlarni chop etishdir. Bugun ushbu maqolada men sizga Excel VBA da tegishli misollar va rasmlar bilan ma'lumotlarni qanday chop etishingiz mumkinligini ko'rsataman.
Amaliy ish kitobini yuklab oling
Maqolani oʻqiyotganda mashq qilish uchun ushbu mashq kitobini yuklab oling.
VBA Print.xlsm
Ma'lumotlarni Excel VBA yordamida chop etish bosqichlari
Bu yerda men Martin kitob do‘koni nomli kitob do‘konining Nomlari, turlari va Narxlari ko‘rsatilgan ma’lumotlar to‘plamini oldim.
Bugun biz ushbu ma'lumotlar to'plamini VBA yordamida qanday chop etishimiz mumkinligini bilib olamiz.
1-qadam: Chop etish uchun VBA muharririni ochish Excelda
Klaviaturangizda ALT+F11 tugmalarini bosing. U Visual Basic muharririni ochadi.
Batafsil o'qing: Excelda chop etish maydonini qanday sozlash kerak ( 5 ta usul)
2-qadam: Excelda chop etish uchun yangi modulni kiritish
<1-dagi Qo'shish opsiyasiga o'ting>VBA asboblar paneli. Qo'shish > Yangi modul ochish uchun modul .
Aloqador tarkib: Excelda panjara chiziqlarini qanday chop etish mumkin (2 usul)
3-bosqich: Excelda chop etish uchun VBA kodini kiritish
Module1 nomli yangi modul ochiladi. U yerga quyidagi VBA kodini kiriting.
⧭ VBA kodi:
9906
⧭ Eslatmalar :
- Bu yerda men chop qilmoqchimanmening ish kitobimning faol ish varag'i. Boshqa har qanday ish varag'ini chop etish uchun to'g'ridan-to'g'ri kodga ishchi varaq nomini yozing.
Masalan, Sheet1 deb nomlangan ishchi varaqni chop etish uchun:
<0 dan foydalaning> ActiveWorkbook.Worksheets(“Sheet1”).PrintOut copies:=1- Shuningdek, siz faol boʻlmagan ish kitobidan ham chop etishingiz mumkin. Masalan, Ish kitobi1 deb nomlangan ishchi daftardan Vraq1 ni chop etish uchun:
Ish kitobi(“Ishchi kitob1”).Ish varaqlari(“Varaq11”). ”).PrintOut copies:=1
- Bu yerda biz ishchi varaqning faqat bitta nusxasini chop etmoqdamiz. Agar siz bir nechta nusxani chop qilmoqchi bo'lsangiz, nusxalar xossasini mos ravishda o'zgartiring.
- Agar siz bir nechta ishchi varaqlarni chop etishni va chop etish vaqtida ularni jamlashni istasangiz, siz uchun ham variant mavjud. VBA ning PrintOut funksiyasi Collate deb nomlangan xususiyatga ega. Uni True qilib belgilang.
ActiveWorkbook.ActiveSheet.PrintOut copies:=10, Collate:=True
Tegishli tarkib: Excel VBA: Chop etish maydonini dinamik ravishda qanday o'rnatish kerak (7 usul)
O'xshash o'qishlar:
- Ma'lum varaqlarni chop etish uchun Excel tugmasi (oson qadamlar bilan)
- Excelda gorizontal chop etish (4 usul)
- Bir nechta Excelni chop etish VBA (6 mezon) bilan bitta PDF faylga varaqlar
- Excelda sarlavhalarni chop etish o'chirilgan, uni qanday yoqish mumkin?
- Qanday qilib chop etish kerak A4 o'lchamdagi Excel varag'i (4 usul)
Qadam4: Excelda chop etish uchun VBA kodini ishga tushirish
VBA kodini to'g'ri kiritgandan so'ng, Ishga tushirish<2 tugmasini bosib Makro ni ishga tushiring> opsiyasi VBA asboblar panelida.
Tegishli tarkib: Excel VBA: Koʻp diapazonlar uchun chop etish maydonini oʻrnatish ( 5 ta misol)
5-qadam: Yakuniy natija: VBA bilan chop etish
Agar siz kodni muvaffaqiyatli yozib, uni ishga tushirsangiz, topasiz printerda chop etilgan ishchi varaq va shunday kichik oyna paydo bo'ldi.
Aloqador tarkib: Excel VBA: Hujayralarni chop etish diapazoni ( 5 ta oson usul)
Eslash kerak bo'lgan narsalar
Bu erda biz VBA ning PrintOut funksiyasidan foydalandik. . VBA da PrintPreview deb nomlangan yana bir funksiya mavjud boʻlib, u chop etishdan oldin maʼlumotlarni oldindan koʻrishni koʻrsatadi.
PrintPreview funksiyasining sintaksisi: PrintOut funktsiyasi bilan bir xil, faqat PrintOut o'rniga PrintPrview dan foydalaning.
ActiveWorkbook.ActiveSheet.PrintPreview
U chop etishdan oldin ishchi varaqni oldindan ko'rishni ko'rsatadi.
Xulosa
Demak, bu Excel ish varag'idan VBA yordamida istalgan ma'lumotlarni chop etishingiz mumkin bo'lgan usul. Savollaringiz bormi? Bemalol bizdan so'rang. Yana postlar va yangilanishlar uchun ExcelWIKI saytimizga tashrif buyurishni unutmang.