Kuidas luua vormingus päis Excelis VB6 abil

Exceli päised tähistavad nende printimisel arvutustabelite ülaosa. Neid päiseid saab kujundada Exceli graafilise kasutajaliidese abil, kuid saate kasutada ka Visual Basic'i, et määrata päise mall, laiendades teavet, mida päised võivad sisaldada. Näiteks võib iga päis sisaldada teie ettevõtte nime, dokumendi nime ja leheküljenumbrit. Kuid Visual Basic võib lisada päise mallile muutujaid ja tõmmata iga muutuja väärtuse mujal tabelis.

1.

Vajuta "Alt-F11", et avada Exceli Visual Basic redaktor. Koodiakna avamiseks topeltklõpsake projekti aknas olevat lehte.

2.

Sisestage VBA protseduuri avamiseks järgmine kood:

Sub CreateHeaderTemplate ()

3.

Iga töölehel töötava lingi avamiseks tippige järgnev:

Iga ws jaoks ActiveWorkbook.Worksheets

4.

Sisestage järgmine plokk, mis käivitatakse igal lehel:

Ws.PageSetup .LeftHeader = "a" .CenterHeader = "b" .RightHeader = "c" Lõpeta

5.

Asendage "a", "b" ja "c" vasakule, keskmisele ja paremale päisele. Näiteks selleks, et panna fraas "Jacob & Sons" vasakule, lahtri A10 sisu keskel ja lehekülje number paremal, muutke kood:

Ws.PageSetup .LeftHeader = "Jacob & Sons" .CenterHeader = ws.Range ("A10") .RightHeader = "& P" Lõpeta

6.

Sisestage silmuse sulgemiseks järgmine rida:

Järgmine ws

7.

Sisestage menetluse lõpetamiseks järgmine rida:

Lõpeta alam

8.

Toimingu käivitamiseks ja päiste rakendamiseks vajutage nuppu "F5".

 

Jäta Oma Kommentaar