Hei!
Miten saisin alatunnisteen (footer) tulemaan aina automaattisesti? Minulla on valmiina oma alatunniste jota haluan käyttää, mutta tällä hetkellä se pitää aina erikseen valita. Joten tietääkö joku ratkaisun tähän. Samalla säästän vähän luontoa, kun ei tarvitse printata niin usein.
Kiitoksia etukäteen!
Alatunniste
Header/Footer
5
607
Vastaukset
- muuan mies
Lisää se alatunniste käyttämääsi asiakirjamalliin. Jos et erikseen valitse mallia, niin lisää se oletuksena olevaan Normal.dot malliin.
- normal.dot
Hei!
Valitettavasti Normal.dot muutos ei toimi excelissä. Nimittäin muokkasin sitä ja muutokset näkyvät vain wordissä. - oletusmalli
normal.dot kirjoitti:
Hei!
Valitettavasti Normal.dot muutos ei toimi excelissä. Nimittäin muokkasin sitä ja muutokset näkyvät vain wordissä.Wordin mallin tiedostotunniste on .dot. Katso tiedoston tallennusvalikosta, mikä on oman Excel-versiosi mallin tunniste. Saattaapi olla esimerkiksi .xlt.
Oletusmalli voi siis olla esimerkiksi Normal.xlt tai Työkirja.xlt, tai sitten jotain ihan muuta. oletusmalli kirjoitti:
Wordin mallin tiedostotunniste on .dot. Katso tiedoston tallennusvalikosta, mikä on oman Excel-versiosi mallin tunniste. Saattaapi olla esimerkiksi .xlt.
Oletusmalli voi siis olla esimerkiksi Normal.xlt tai Työkirja.xlt, tai sitten jotain ihan muuta.tee haluamasi tunnisteet ja tallenna haluamallasi nimellä XLSTART kansioon. Nyt kun avaat excelin, niin se avaa tämän kansiossa olevan tiedoston automaattisesti...
kansio on oletusasennuksella tuolla C:\Program Files\Microsoft Office\Office10\XLStart- muuan mies
normal.dot kirjoitti:
Hei!
Valitettavasti Normal.dot muutos ei toimi excelissä. Nimittäin muokkasin sitä ja muutokset näkyvät vain wordissä.Sorry meni edellä excel ja word sekaisin..
Yksi ratkaisu on tehdä OMAT.XLS piilotiedostoon ylä- ja alatunnisteet tai sitten tehdä sinne makso, joka tekee tunnisteet vaikka kaikkille välilehdille, esim. seuraavasti:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim WS As Worksheet
For Each WS in Worksheets
With ws.PageSetup
.LeftHeader = "Firm name"
.CenterHeader = "Page &P of &N"
.RightHeader = "Printed &D &T"
.LeftFooter = "Path : " & ActiveWorkbook.Path
.CenterFooter = "Workbook name &F"
.RightFooter = "Sheet name &A"
End With
Next WS
End Sub
Ketjusta on poistettu 1 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Jalankulkija kuoli. Poliisi etsii mustaa BMW Coupe -autoa, jossa on punertavat vanteet.
Jalankulkija kuoli jäätyään auton alle Joensuussa – kuljettaja pakeni, poliisi pyytää havaintoja https://www.mtvuutiset.1904353Mikä vasemmistolaisista jankkaavaa vaivaa?
Pahasti on ihon alle, siis korvien väliin sinne tyhjään tilaan, päässeet kummittelemaan. Ei ole terveen ihmisen merkki313160Ohjelma "Rikollisjengien Ruotsi" hyvin paljasti jakautuneen maan
eli ns. ruotsalaiset yhdellä puolella, muslimit ja muut kehitysmaalaiset toisella puolella. Siinäkin hyvin näki mitä ma292861Vassarina hymyilyttää vaurastuminen persujen kustannuksella
Olen sijottanut määrätietoisesti osan Kelan tuista pörssiosakkeisiin, ja salkku on paisunut jo toiselle sadalle tuhanne602746PÄIVÄN PARAS: Nigerialainen haki turvapaikkaa Suomesta, lähti takas huilaamaan
kotimaahansa, koska turvapaikan saaminen kesti niin kauan. Ja tämän kertoo ihan Yle, eikä yhtään toimittaja kyseenalaist672723Riikka runnoo: Elisalta potkut 400:lle
Erinomaisen hallitusohjelman tavoite 100 000 työllistä lisää yksityisellä sektorilla on kohta saavutettu. Toivotaan toiv902605Pidennetään viikko 8 päiväiseksi
Ja jätetään työpäivien määrä nykyiseen 5:een. Tuo olisi kompromissiratkaisu vellovaan keskusteluun työajan lyhentämisest142341Pääseekö kuka tahansa hoitaja katselemaan kenen tahansa ihmisen terveystietoja?
"Meeri selaili puhelinta uteliaisuuttaan ja katuu nyt – Moni hoitaja on tehnyt saman rikoksen Tuttujen ihmisten asiat k992098- 881122
- 601072