Avatar billede jensen363 Forsker
17. oktober 2007 - 10:48 Der er 9 kommentarer og
1 løsning

Benyt Page andre steder end i sidehoved eller sidefod

I en regnearksskabelon, har benytter jeg de første 5 rækker for en form for header, og har i den forbindelse behov for automatisk sidenummerering i dette område ... dvs. at jeg eksempelvis i celle E1 vil have stående side 1 / side 2 / side 3 ....

Jeg synes ikke rigtig jeg har kunnet finde noget om dette ????
Avatar billede jlemming Nybegynder
17. oktober 2007 - 10:55 #1
Hvis du laver din side hoved som
view, header footer, (vis, sidehove/sideod)
her kan du vælge side 1 af ?, bliver først vist når du vælger udskrift
Avatar billede jensen363 Forsker
17. oktober 2007 - 11:02 #2
Det var ikke lige det jeg ønskede ( den er kendt ). Min header består af en standardopsætning ( incl. logo m.v. ) hvoraf sidenummereringen gerns skulle placeres i denne standardopsætning for hele skabelonen
Avatar billede jlemming Nybegynder
17. oktober 2007 - 11:15 #3
Nåå ja, det har du også skrevet i overskriften, sorry :o)
så er jeg blank på spm.
Avatar billede jensen363 Forsker
17. oktober 2007 - 11:18 #4
No problemo :-)
Avatar billede panebb Novice
17. oktober 2007 - 11:43 #5
Hvis dine sider har fast længde og din header er på alle sider kan du måske bruge antallet af rækker på siden til at generere et sidenr.
=RUND.OP(((RÆKKE()-5))/60;0)
-5 er antal rækker nede sidenr er placeret
60 er antal rækker på siden
Avatar billede jensen363 Forsker
17. oktober 2007 - 13:11 #6
panebb > header er som udgangspnkt kun een gang, men vises udskriftsmæssigt på alle sider .... og antallet af rækker pr side er variabelt :-(
Avatar billede kabbak Professor
17. oktober 2007 - 18:10 #7
Du bliver nok nødt til at bruge en makro.
Her er en som skriver det aktive ark ud og som samtidig skriver sidenummer i E1

Sub SpecialPrint()
    Application.EnableEvents = False' slår automatiske makroer fra
    Dim i As Long, lPages As Long
    lPages = ExecuteExcel4Macro("Get.Document(50)")
    For i = 1 To lPages
        Range("E1") = "side " & i' Skriver i E1
        ActiveSheet.PrintOut i, i' Skriver 1 side ud af gangen
    Next i
    Application.EnableEvents = True' slår automatiske makroer til
  Range("E1") = "" ' tømmer E1 inden du ser den igen
End Sub
Avatar billede jensen363 Forsker
23. oktober 2007 - 16:24 #8
Kabbak > læg venligst et svar :-)
Avatar billede kabbak Professor
23. oktober 2007 - 16:31 #9
Virkede det efter hensigten ??

et svar ;-))
Avatar billede jensen363 Forsker
24. oktober 2007 - 08:40 #10
Det virker efter hensigten :-)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester