Отчет за печат на VBA - Как да използвам Excel VBA за разпечатка? (с примери)

Отпечатването във VBA е много подобно на отпечатването в Excel, когато имаме важни данни в Excel или електронни таблици, тогава единственият начин да ги защитим е да ги запазим в PDF или да ги отпечатаме, за печат трябва да настроим командата за печат в VBA първо преди да го използва, какво прави тази команда, ако отпечатва или записва данните в друг файл.

Какво е печат в VBA Excel?

VBA Printout е нищо, но както обикновено, как печатаме в обикновения работен лист, няма разлика в това. Използвайки Excel VBA код, можем да отпечатаме всички данни на работния лист. Можем да отпечатаме работната книга, диаграми, определен диапазон и т.н.

След цялата упорита работа, която сме направили, за да представим отчета на мениджъра, обикновено изпращаме имейли. Но в някои случаи на срещата вашият мениджър се нуждае от хартиено копие на вашите отчети. В тези сценарии трябва да отпечатате отчета, който имате в електронната таблица. Една от причините вашият мениджър да се нуждае от разпечатване на отчета може да бъде много голям отчет, който да прочете на компютъра. В работен лист трябва да сте познавали вече отпечатването на отчетите. В тази статия ще ви покажем как да печатате с помощта на VBA кодиране. Следвайте тази статия през следващите 15 минути, за да научите как да отпечатвате отчети във VBA.

Синтаксис на VBA PrintOut във VBA Excel

Преди да видим синтаксиса, нека първо изясня това. Какво печатаме? Отпечатваме диапазони, диаграми, работни листове, работни книги. Така че методът PrintOut () е достъпен с всички тези цели.

(От): От коя страница на печата трябва да започне. Ако не предоставим никаква стойност, тя ще се третира като от първата страница.

(До): Каква трябва да бъде последната страница за отпечатване? Ако се пренебрегне, ще се отпечата до последната страница.

(Копия): Колко копия трябва да отпечатате.

(Предварителен преглед): Бихте ли искали да видите предварителен преглед, преди да продължите да печатате. Ако отговорът е „да“, аргументът е „TRUE“, ако не „FALSE“.

Примери за печат във VBA Excel

По-долу са примерите за Печат във VBA Excel.

За целите на илюстрацията съм създал фиктивни данни, както е показано на снимката по-долу.

Сега трябва да отпечатаме отчета от A1 до D14. Това е моят диапазон. Въведете диапазона в кода на VBA за достъп до метода PrintOut.

Код:

Sub Print_Example1 () Обхват ("A1: D14") Край Sub

Сега отворете метода PrintOut.

Код:

Sub Print_Example1 () Диапазон ("A1: D14"). PrintOut Край Sub

Не пипам нито един от параметрите. Това е достатъчно за отпечатване на избрания диапазон. Ако стартирам този код, той ще отпечата диапазона от A1 до D14 клетка.

Параметри на метода за разпечатване в VBA Excel

Сега съм копирал и поставил същите данни, за да използвам други параметри на метода PrintOut във VBA Excel.

Когато искаме да отпечатаме целия лист, можем да посочим целия лист като Активен лист. Това ще покрие целия лист в него.

  • Код за отпечатване на целия работен лист.

Код:

Sub Print_Example1 () ActiveSheet.UsedRange.PrintOut 'Това ще отпечата целия използван диапазон на листа. Крайна под

  • Код за справка с името на листа .

Код:

Sub Print_Example1 () Sheets ("Ex 1"). UsedRange.PrintOut 'Това също ще отпечата целия използван диапазон на листа, наречен Ex 1. End Sub

  • Код за отпечатване на всички работни листове в работната книга .

Код:

Sub Print_Example1 () Worksheets.UsedRange.PrintOut 'Това ще отпечата и целия използван диапазон на целия лист в работната книга. Крайна под

  • Код за отпечатване на данните от цялата работна книга .

Код:

Sub Print_Example1 () ThisWorkbook.UsedRange.PrintOut 'Това ще отпечата и целия използван диапазон на целия лист в работната книга. Крайна под

  • Код за отпечатване само на избраната област .

Код:

Sub Print_Example1 () Selection.PrintOut 'Това ще отпечата само избрания диапазон End Sub

Как да използвам параметрите на метода за отпечатване в Excel VBA?

Сега ще видим как да използваме параметрите на метода за разпечатване. Както казах, бях разширил данните, за да използвам други свойства.

Със сигурност това няма да се отпечата на един лист. Изберете диапазона от A1 до S29.

Код:

Sub Print_Example2 () Обхват ("A1: S29") Край Sub

Сега изберете метода за разпечатване.

Код:

Sub Print_Example2 () Диапазон ("A1: S29"). PrintOut Край Sub

Първият и вторият параметър са От & До, каква е началната и крайната позиция на страниците. По подразбиране ще отпечата всички страници, така че не докосвам тази част. Сега искам да видя предварителен преглед, така че ще избера Преглед като ИСТИНСКИ.

Код:

Поддиапазон Print_Example2 () Обхват ("A1: S29"). Преглед на PrintOut: = True End Sub

Сега ще стартирам този код. Ще видим предварителен преглед.

Това идва в 2 страници.

Така че първо искам да настроя страницата да излиза на един лист. Използвайте кода по-долу, за да настроите страницата да излиза на един лист.

Код:

Sub Print_Example2 () С работни листове ("Пример 1"). PageSetup .Zoom = False .FitToPagesTall = 2.

Това ще настрои страницата да печата на един лист, както и да печата в пейзажен режим. Сега визуализацията на печат ще бъде такава.

По този начин можем да използваме метод за отпечатване на VBA, за да отпечатаме нещата, които искаме да отпечатаме, и да си поиграем с тях.

Интересни статии...