Excel este un instrument puternic pentru organizarea, analiza și prezentarea datelor. Cu toate acestea, atunci când vine vorba de tipărirea unor cantități mari de date, procesul poate fi consumator de timp și plictisitor. Din fericire, Visual Basic pentru aplicații (VBA) din Excel poate automatiza procesul de imprimare, economisind timp și efort prețios.
Primul pas în utilizarea VBA pentru imprimare este să activați fila Developer din Excel. Pentru a face acest lucru, mergeți la File > Options > Customize Ribbon (Fișier > Opțiuni > Personalizare panglică) și bifați caseta de lângă "Developer". Acest lucru va adăuga fila Developer la panglica Excel, unde puteți accesa instrumentele VBA.
Pentru a începe să automatizați procesul de imprimare, va trebui să scrieți o macro VBA. O macro este o serie de instrucțiuni pe care Excel le poate urma pentru a finaliza o sarcină. În acest caz, dorim ca Excel să tipărească o anumită foaie de lucru sau un anumit interval de celule.
Pentru a crea o macro, mergeți la fila Developer și faceți clic pe "Visual Basic". Acest lucru va deschide editorul VBA. De aici, puteți să vă scrieți macroul. De exemplu, pentru a imprima o anumită foaie de lucru, ați putea utiliza următorul cod:
Sub PrintWorksheet()
Worksheets("Sheet1").PrintOut
End Sub
Acest cod îi spune lui Excel să tipărească foaia de lucru numită "Sheet1". Puteți personaliza acest cod schimbând numele foii de lucru pentru a se potrivi cu cea pe care doriți să o imprimați.
Sub PrintRange()
Range("A1:C10").PrintOut
End Sub
End Sub
Acest cod îi spune lui Excel să tipărească intervalul de celule de la A1 la C10. Din nou, puteți personaliza acest cod modificând intervalul de celule pentru a se potrivi cu cel pe care doriți să îl imprimați.
După ce v-ați scris macroul, îl puteți rula mergând la fila Developer și făcând clic pe "Macros". Acest lucru va afișa o listă cu toate macrourile pe care le-ați creat. Selectați macroul pe care doriți să îl executați și faceți clic pe "Run". Excel va urma apoi instrucțiunile din macro și va imprima foaia de calcul sau intervalul de celule pe care l-ați specificat.
În concluzie, utilizarea VBA pentru tipărire în Excel vă poate crește foarte mult eficiența și vă poate economisi timp. Prin crearea de macro-uri care automatizează procesul de imprimare, puteți imprima rapid cantități mari de date fără a fi nevoit să selectați și să imprimați manual fiecare foaie de lucru sau interval de celule. Cu puțină cunoaștere VBA, puteți profita din plin de capacitățile Excel și vă puteți eficientiza fluxul de lucru.
În Visual Basic, comanda print este utilizată pentru a trimite ieșirea către o imprimantă sau către fereastra de depanare. Sintaxa pentru comanda print este următoarea:
Print output
Aici, "output" poate fi orice expresie sau variabilă pe care doriți să o imprimați. De exemplu, pentru a imprima textul "Hello, world!" în fereastra de depanare, se va utiliza următorul cod:
Print "Hello, world!"
Dacă doriți să imprimați o variabilă sau o expresie, o puteți include în cadrul comenzii print, astfel:
Dim x As Integer
x = 42
Print "The value of x is " & x
Acest lucru ar imprima textul "The value of x is 42" în fereastra de depanare.
Dacă doriți să imprimați pe o imprimantă, puteți utiliza obiectul Printer din Visual Basic. Mai întâi, trebuie să setați obiectul Printer la imprimanta pe care doriți să o utilizați, astfel:
Printer.Print "Hello, printer!"
Acest lucru ar trimite textul "Hello, printer!" la imprimanta implicită. De asemenea, puteți seta proprietățile obiectului Printer, cum ar fi fontul și dimensiunea, înainte de imprimare.
Pe scurt, comanda print din Visual Basic este un instrument util pentru trimiterea datelor de ieșire către fereastra de depanare sau către o imprimantă. Sintaxa este simplă și puteți imprima text, variabile și expresii.
Pentru a crea un buton de imprimare în Excel VBA, puteți urma acești pași:
1. Deschideți foaia de lucru Excel în care doriți să creați butonul de imprimare.
2. Apăsați tastele Alt + F11 pentru a deschide editorul VBA.
3. În editorul VBA, selectați foaia de lucru în care doriți să creați butonul de imprimare din fereastra Project Explorer din partea stângă.
4. Faceți clic pe meniul Insert (Inserare) și selectați controlul butonului din listă.
5. Desenați butonul pe foaia de lucru făcând clic și trăgând mouse-ul.
6. Faceți clic dreapta pe buton și selectați opțiunea "View Code".
7. În editorul VBA, veți vedea o fereastră de cod pentru buton. Introduceți următorul cod:
Private Sub CommandButton1_Click()
ActiveSheet.PrintOut
End Sub
End Sub
8. Închideți editorul VBA și reveniți la foaia de lucru.
9. Faceți clic pe butonul pe care tocmai l-ați creat pentru a imprima foaia activă.
Notă: Puteți personaliza codul pentru a imprima anumite foi de calcul, pentru a seta opțiuni de imprimare și pentru a efectua alte acțiuni înainte sau după imprimare.
Pentru a imprima foile selectate în Excel cu o macro, urmați acești pași:
1. Deschideți registrul de lucru Excel care conține foile pe care doriți să le imprimați.
2. Apăsați simultan tastele "Alt" și "F11" pentru a deschide editorul Visual Basic.
3. În Visual Basic Editor, faceți clic pe "Insert" din meniul de sus, apoi selectați "Module" pentru a crea un nou modul.
4. Tastați sau copiați și lipiți următorul cod în modul:
Sub PrintSelectedSheets()
Dim i As Integer
Dim SheetNames As Variant
SheetNames = Application.InputBox("Select sheets to print", Type:=64)
If VarType(SheetNames) = vbBoolean And Not SheetNames Then Exit Sub
If VarType(SheetNames) = vbString Then SheetNames = Array(SheetNames)
If VarType(SheetNames) = vbArray Then
For i = LBound(SheetNames) To UBound(SheetNames)
Worksheets(SheetNames(i)).PrintOut
Next i
End If
End If
End Sub
5. Faceți clic pe "File" din meniul de sus, apoi selectați "Save" pentru a salva macroul.
6. Închideți editorul Visual Basic.
7. Reveniți la registrul de lucru Excel și selectați foile pe care doriți să le imprimați ținând apăsată tasta "Ctrl" și făcând clic pe fiecare filă a foii.
8. Apăsați simultan tastele "Alt" și "F8" pentru a deschide caseta de dialog Macro.
9. Selectați macroul "PrintSelectedSheets" din listă, apoi faceți clic pe "Run" pentru a executa macroul.
10. Foile selectate vor fi trimise la imprimantă și vor fi tipărite.
Notă: Macroul vă va solicita să selectați foile pe care doriți să le imprimați cu ajutorul unei casete de dialog InputBox. Puteți selecta mai multe foi prin separarea numelor foilor cu virgule sau puteți introduce un interval de nume de foi separate prin două puncte. De exemplu, "Sheet1, Sheet3, Sheet5" sau "Sheet1:Sheet5".