Font size i sidefod

Lav det i css..!

Der kan du både lave typografier mm...

Undskyld - men HVAD er css????

er ike helt med er det i word eller på en hjemmeside du skal have det lavet?

Excel...

I Excel:
Vis-->Sidehoved og sidefod
klik på Tilpas sidefod
Marker tekst med musen
Tryk på A
Lav formatteringen som du vil ha' den

Det har jeg skam prøvet - men det virker ikke. Er det mon min Excel der er noget galt med?

nej problemet er snarere, at du definerer sidefoden i en makro. Den vil givetvis ignorere den formatering du laver og i stedet bruge standardformateringen, medmindre du koder den til noget andet.

ActiveSheet.PageSetup.LeftFooter = "&""Times New Roman,Normal""test"

Denne linier formaterer sidefoden til Times New Roman

men prøv at eksperimentere lidt med at optage en makro, mens du tilretter din sidefod. Bagefter vil du kunne klippe formateringen over til den rigtige makro

Her er teksten til en fuld makro der indsætter filnavnet i left.footer med fed, kursiv og understreget Georgia i punkt 11.

Denne linie hedder:
        .LeftFooter = "&""Georgia,fed kursiv""&11&U&A"

Jeg tror heller ikke der er noget i vejen med din Excel.

Sub Formfod()
'
' Formfod Makro
' Makro indspillet 13-11-02 af Carsten Hansen
'

'
    With ActiveSheet.PageSetup
        .PrintTitleRows = "$1:$3"
        .PrintTitleColumns = ""
    End With
    ActiveSheet.PageSetup.PrintArea = ""
    With ActiveSheet.PageSetup
        .LeftHeader = ""
        .CenterHeader = ""
        .RightHeader = ""
        .LeftFooter = "&""Georgia,fed kursiv""&11&U&A"
        .CenterFooter = ""
        .RightFooter = ""
        .LeftMargin = Application.InchesToPoints(0.196850393700787)
        .RightMargin = Application.InchesToPoints(0.196850393700787)
        .TopMargin = Application.InchesToPoints(0.196850393700787)
        .BottomMargin = Application.InchesToPoints(0.590551181102362)
        .HeaderMargin = Application.InchesToPoints(0.511811023622047)
        .FooterMargin = Application.InchesToPoints(0.118110236220472)
        .PrintHeadings = False
        .PrintGridlines = False
        .PrintComments = xlPrintNoComments
        .PrintQuality = 600
        .CenterHorizontally = False
        .CenterVertically = False
        .Orientation = xlLandscape
        .Draft = False
        .PaperSize = xlPaperA4
        .FirstPageNumber = xlAutomatic
        .Order = xlOverThenDown
        .BlackAndWhite = False
        .Zoom = 100
    End With
End Sub

Jeg har prøvet at optage en makro hvor jeg ændrer tekststørrelsen i sidefoden, men det skriver den mærkværdigvis ikke noget om i makroen.

Dit forslag ændrer teksten til Times New Roman, men hvad med størrelsen, har du også et bud på det?

Prøv:

ActiveSheet.PageSetup.LeftFooter = "&""Times New Roman,Normal""test"&"11"

der var lige en lille fejl:

ActiveSheet.PageSetup.LeftFooter = "&""Times New Roman,Normal""&11test"

Og i dit tilfælde må det så blive:

ActiveSheet.PageSetup.LeftFooter = "&""Times New Roman,Normal""&11" ThisWorkbook.FullName

til b hansen: der skulle lige et & foran ThisWorkBook.FullName før det virkede. Men den skriver Ark1 foran stien. Hvad er det der får den til det?

Nåeh - deyt var bare mig der brugte "&A" fra hcars's forslag. I får 10 point hver. Tak for hjælpen!

lyder mystisk.... Men har du på et tidspunkt lavet en "normal" sidefod? Det kunne være det

Det er ikke særlig mystisk, eftersom "&A" betyder at den skriver navnet på fanen, og "&U" betyder at den understreger.

&11 i linien giver størrelsen 11 pkt. Når du får Times New Roman frem, må det være, fordi du ikke har Georgia på maskinen, men du kan selvfølgeligt ændre til, hvad du synes.

.LeftFooter = "&""Georgia,fed kursiv""&11&U&A"

Jeg forstår godt det hele, og jeg kan få en hvilkensomhelst skrifttype og størrelse jeg vil, men nu har jeg et andet problem: en gang imellem får jeg fejlen:

Run-time error '1004':
Kan ikke angive egenskaben LeftFooter for klassen PageSetUp

men jeg sytes det er tilfædigt hvornår den gør det.
Min kode ser sådan ud:

ActiveSheet.PageSetup.LeftFooter = "&""Arial,normal""&6" & ThisWorkbook.FullName & Chr(13) & "&8Moving ITS" & Chr(13) & "Karlshøj 34" & Chr(13) & "DK-4733 Tappernøje"

Fejlen kommer når der også står noget i CenterFooter og i RightFooter, men hvorfor???

Det bliver jo en ret lang tekst, du har i din venstre side. Så problemet kunne skyldes, at der kommer til at ske et overlap.

Nej, jeg har prøvet at skrive meget lang tekst, det er ikke problemet, den skriver bare oven i. I øvrigt har jeg jo linieskift (Chr(13)). Nu har jeg fået den til at acceptere LeftFooter og CenterFooter, men skriver jeg også noget i RightFooter kommer fejlen. Mystisk!

er din sidefod stor nok?

Det kan godt være det er noget med det, men sjovt nok virker det i Stående format, men ikke i Liggende!?

enig!

Men jeg er efterhånden løbet tør for ideer, så jeg håber der er andre, der kan hjælpe

Nu har jeg fundet ud af det!! Det er fordi sidehoveder og sidefødder kun må indeholde 255 tegn! Derfor så det ud som en tilfældighed hvornår den meldte fejl, det afhang af jo hvor lang stien var.

Så blev vi så kloge!

tillykke *S*