Kako uporabiti različne glave ali noge na vsaki strani v preglednici Excel?
Privzeto bo pri vstavljanju glave ali noge na delovni list vsebina glave ali noge uporabljena na vseh straneh. Za mnoge ljudi imajo lahko različne strani na svojih delovnih listih različne vsebine. Te strani ponavadi ločijo po vsebini glave ali noge po tiskanju delovnega lista. Kako uporabiti različne glave ali noge na vsaki strani na delovnem listu? Metoda v tem članku vam lahko pomaga.
Na vsaki strani s kodo VBA uporabite različne glave ali noge
Na vsaki strani s kodo VBA uporabite različne glave ali noge
Naslednja koda VBA vam lahko pomaga uporabiti različne glave ali noge na vsaki strani delovnega lista. Naredite naslednje.
1. Pritisnite druga + F11 tipke hkrati, da odprete Microsoft Visual Basic za uporabookno.
2. V Ljubljani Microsoft Visual Basic za aplikacije okno, kliknite Vstavi > Moduli. Nato kopirajte in prilepite spodnjo kodo VBA v Koda okno. Oglejte si posnetek zaslona:
Koda VBA: Na vsaki strani v Excelu uporabite različne glave
Sub DifferentHeaderFooter()
Dim ws As Worksheet
Dim vLeft As Variant, vRight As Variant, xRg As Variant
Set ws = ActiveSheet
On Error Resume Next
vLeft = Array("First page", "Second page", "Third page", "fourth page")
xRg = Array("A1:C50", "A51:C100", "A101:C150", "A151:C200")
Application.ScreenUpdating = False
For i = 0 To UBound(vLeft)
With ws.PageSetup
.PrintArea = xRg(i)
.LeftHeader = vLeft(i)
End With
ws.PrintPreview
Next i
Application.ScreenUpdating = True
ws.PageSetup.PrintArea = ""
End Sub
Opombe:
3. Pritisnite F5 tipko za zagon kode. Nato predogled odpre se okno, kliknite Tiskanje , da začnete tiskati strani z različnimi glavami ali nogami.
Opombe: Če so na delovnem listu določene 4 natisnjene strani, morate klikniti Tiskanje štirikrat, da končate celotno tiskanje.
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!