Cum se determină cât de multe pagini vor fi imprimate în Excel

Rezumat

Microsoft Visual Basic for Applications nu furnizează o metodă pentru a determina numărul total de pagini care va imprima într-o foaie de lucru. Cu toate acestea, utilizați metoda ExecuteExcel4Macro de utilizare a lua. DOCUMENT(50) macrocomandă foaie de funcție pentru a reveni la numărul total de pagini care va fi imprimată din foaia de lucru activă.

Mai multe informații

Microsoft oferă exemple de programare pentru ilustrare numai, fără garanţie, fie explicite sau implicite, inclusiv dar nu limitat la, garanţiile implicite de vandabilitate și adecvare la un scop anume. Acest articol presupune că sunteţi familiarizat cu limbajul de programare fiind demonstrat şi instrumentele folosite pentru a crea şi procedurile de depanare. Specialişti de suport Microsoft pot ajuta la explicarea funcţionalităţii unei anumite proceduri, dar ei nu vor modifica aceste exemple pentru a creşte functionalitatea nici nu vor alege alte proceduri care ar răspunde unor necesităţi de ordin particular.
Dacă este limitată în programare, se recomandă să contactați un partener certificat Microsoft sau serviciile de consultanţă Microsoft. Pentru mai multe informaţii, vizitaţi aceste site-uri Web Microsoft:

Parteneri Microsoft Certified - https://partner.microsoft.com/global/30000104

Microsoft Advisory Services - http://support.microsoft.com/gp/advisoryservice

Pentru mai multe informații despre opțiunile de suport care sunt disponibile și despre cum să contactați Microsoft, vizitaţi următorul site Web Microsoft:http://support.microsoft.com/default.aspx?scid=fh; EN-US; CNTACTMSpentru a utiliza următoarele macrocomanda, configurați un fișier Microsoft Excel după cum urmează:

1. Creați un nou registru de lucru Microsoft Excel.
   

2. Selectați zona A1:J100.
   

3. Introduceți numărul 1 și apăsați CTRL + ENTER. Ar trebui să vedeți toate celulele selectate umplute cu numărul 1.
   

4. Introduceți un modul de macrocomenzi Visual Basic.
   

5. Introduceți codul următor în modulul:

6. Sub ShowMe()
       MsgBox ExecuteExcel4Macro("GET.DOCUMENT(50)") & _
           " pages will be printed."
   End Sub
   

7. Executați macrocomanda.

Referințe

Informații suplimentare despre funcția Get.Document macrocomenzi pot fi găsite în manualul de referință funcţia Excel.