فهرست مطالب
اگر بتوانیم یک دکمه پرینت سفارشی را در کاربرگ اکسل خود تنظیم کنیم، می تواند برای چاپ برگه ها بسیار کاربرپسند و در زمان صرفه جویی شود. با استفاده از VBA Macros ، ما به راحتی می توانیم این کار را انجام دهیم. بنابراین این مقاله 5 ماکرو ساده برای استفاده از کد VBA برای دکمه چاپ در اکسل در اختیار شما قرار می دهد.
دانلود کتاب تمرین تمرین
شما می توانید قالب رایگان اکسل را از اینجا دانلود کنید و خودتان تمرین کنید.
کد VBA برای ایجاد دکمه چاپ.xlsm
5 مثال برای استفاده از VBA کد برای دکمه چاپ در اکسل
اجازه دهید ابتدا با مجموعه داده خود آشنا شویم که نشان دهنده برخی فروش فروشندگان در مناطق مختلف است.
1. از کد VBA برای ایجاد دکمه چاپ برای کادر گفتگوی چاپ در اکسل استفاده کنید
ابتدا یک دکمه چاپ ایجاد می کنیم و سپس کدهایی را برای آن می نویسیم.
مراحل:
- روی به شرح زیر کلیک کنید: توسعه دهنده >> درج >> جعبه دکمه.
به زودی، علامت علاوه (+) را در مکان نما خود دریافت خواهید کرد.
- آن مکان نما را با توجه به اندازه دکمه دلخواه خود بکشید و پس از مدتی یک کادر محاوره ای با نام Assign Macro باز می شود.
- یک نام بدهید و New را فشار دهید.
یک پنجره VBA ظاهر می شود.
- سپس تایپ کنید کدهای زیر در آن-
8473
- اکنون برگردید به خود برگ .
تجزیه کد
- اینجا ، من یک Sub روش، DialogBox ایجاد کردم.
- سپس از Dialogs (xlDialogPrint) استفاده کردم. Show برای باز کردن چاپ کادر محاوره ای .
دکمه ایجاد شد.
- راست کلیک کنید روی دکمه و برای تغییر نام دکمه Edit Text را از Context menu انتخاب کنید.
- بعد، فقط تایپ نام و کلیک موس خود در هر نقطه خارج از دکمه .
سپس فقط دکمه را فشار دهید.
سپس کادر محاوره ای چاپ را خواهید دید. اگر میخواهید میتوانید اکنون آن را چاپ کنید.
اگر در حال حاضر هیچ چاپگر ندارید، میتوانید ذخیره آن را به عنوان PDF . برای استفاده بیشتر یا چاپ بعداً.
- اکنون OK را فشار دهید.
- در این لحظه فقط یک نام وارد کنید و ذخیره را فشار دهید.
اینجا <1 چاپ شده است>PDF .
بیشتر بخوانید: نحوه تنظیم تنظیمات چاپ در اکسل (8 ترفند مناسب) <3
2. از کد VBA برای ایجاد دکمه چاپ برای برگه فعال استفاده کنید
در اینجا، ما از VBA برای چاپ و فعال <1 استفاده می کنیم>صفحه .
مراحل:
- برای ایجاد <1 دو مرحله اول از بخش اول را دنبال کنید>دکمه و تخصیص یک ماکرو .
- یک نام ماکرو بنویسید و فشار دهید جدید .
به زودی، یک پنجره VBA باز می شود.
- سپس کدهای زیر را در آن بنویسید-
2316
- بعد، برگردید به
تجزیه کد
- در اینجا، من یک روش Sub ایجاد کردم ، ActiveSheet .
- سپس از PrintOut برای انتخاب برگ فعال و چاپ آن استفاده کرد .
- اکنون فقط دکمه را فشار دهید .
A کادر گفتگو با نام ذخیره خروجی چاپ به عنوان باز می شود.
- یک نام داده و ذخیره را فشار دهید. .
سپس PDF چاپ شده را دریافت خواهید کرد.
شما می توانید در صورت نیاز چاپگر را به راحتی تغییر دهید.
- روی روی فایل در کنار صفحه اصلی <13 کلیک کنید>
- سپس گزینه Print را انتخاب کنید و روی روی کششو کلیک کنید تا انتخاب شود a Printer .
بیشتر بخوانید: نحوه چاپ همه برگه ها در اکسل (3 روش)
3. کد VBA را برای ایجاد دکمه چاپ برای برگه های انتخاب شده در اکسل اعمال کنید
اگر می خواهید چاپ برگ های انتخابی خاص را انجام دهید، با استفاده از نیز امکان پذیر است. VBA .
مراحل:
- برای ایجاد دو مرحله اول از بخش اول را دنبال کنید دکمه و تخصیص یک ماکرو .
- سپس یک نام ماکرو بنویسید و جدید را فشار دهید.
به زودی پس از آن،یک پنجره VBA باز می شود.
- بعداً، کدهای زیر را در آن تایپ کنید-
8659
سپس برگردید به برگ خود.
تجزیه کد
- در اینجا، من یک روش Sub ، SelectedSheets ایجاد کردم.
- سپس از ActiveWindow برای <1 استفاده کردم>صفحه را از فعال Excel پنجره انتخاب کنید.
- بعد، از PrintOut برای چاپ چند انتخاب شده استفاده شد برگها .
- اکنون برگها را انتخاب کنید و دکمه چاپ را فشار دهید. من دو برگه انتخاب کردم.
- یک نام برای PDF داده و ذخیره را فشار دهید .
فایل PDF دارای t دو صفحه برای دو برگه<2 است>.
بیشتر بخوانید: نحوه چاپ برگه های خاص با استفاده از VBA ماکرو در اکسل (4 روش)
خواندنی مشابه:
- نحوه چاپ برگه اکسل در اندازه A4 (4 روش)
- نحوه نگهداری هدر در اکسل هنگام چاپ (3 روش)
- Excel VBA: نحوه تنظیم ناحیه چاپ به صورت پویا (7 روش)
- نحوه چاپ Excel برگه با خطوط (3 روش آسان)
- نحوه چاپ نمودار در اکسل (5 روش)
4. جاسازی Excel VBA برای ایجاد دکمه چاپ برای برگه خاص با محدوده انتخاب شده
در اینجا، ما یک Print Button برای چاپ یک انتخاب می سازیم محدوده از برگ خاص .
مراحل:
- اولین را دنبال کنیددو مرحله از بخش اول برای ایجاد دکمه و اختصاص یک ماکرو.
- یک نام ماکرو بنویسید و جدید را فشار دهید. .
به زودی، یک پنجره VBA باز می شود.
- سپس نوشتن کدهای زیر –
5764
- بعد، به برگه خود بازگردید.
تجزیه کد
- در اینجا، من یک روش Sub ، SpecificSheetnRange ایجاد کردم.
- سپس از با عبارت برای انتخاب یک خاص
- بعد، PrintArea = "B2:D11".PrintOut<2 استفاده شد> محدوده را از برگ خاص انتخاب می کند و آن را چاپ می کند.
- اکنون فقط دکمه چاپ را فشار دهید.
- یک نام برای PDF و ذخیره را فشار دهید.
این برگه خاص چاپ است.
بیشتر بخوانید: Excel VBA: تنظیم ناحیه چاپ برای چندین محدوده (5 مثال)
5. جاسازی Excel VBA برای ایجاد دکمه چاپ برای برگه فعال با محدوده انتخاب شده
همچنین، می توانید یک محدوده را از برگ فعال انتخاب کنید و می توانید 1>دکمه چاپ برای چاپ آن را با استفاده از VBA .
مراحل:
- دنبال کنید دو مرحله اول از بخش اول برای ایجاد دکمه و اختصاص ماکرو .
- بعد، یک نام ماکرو بنویسید. و جدید را فشار دهید.
به زودی یک VBA پنجره باز خواهد شد.
- در پنجره VBA ، کدهای زیر را بنویسید -
7932
- سپس برگردید به برگ خود.
تجزیه کد
- در اینجا، من یک روش Sub ، ActiveSheetnRange ایجاد کردم.
- سپس از <1 استفاده کردم> Range("B2:D11").PrintOut تا a محدوده و چاپ را انتخاب کنید.
- <12 دکمه چاپ را فشار دهید.
- یک نام بدهید و ذخیره<2 را فشار دهید>.
سپس محدوده چاپی را دریافت خواهید کرد.
بیشتر بخوانید: دکمه اکسل برای چاپ برگه های خاص (با مراحل آسان)
نتیجه گیری
امیدوارم مراحلی که در بالا توضیح داده شد برای استفاده از کد VBA برای دکمه چاپ در اکسل به اندازه کافی خوب است. هر گونه سوالی را در بخش نظرات بپرسید و لطفاً بازخورد خود را به من بدهید.