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
570
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
Mikä on kaivattusi etunimi?
Otsikossa siis on kysymys eriteltynä. Vain oikeat vastaukset hyväksytään.1222251En kestä katsoa
Sitä miten sinusta on muut kiinnostuneita. Olen kateellinen. Siksi pitäisi lähteä pois1021340Peräti 95 % persujen kannattajista rasisteja
Kertoo EVA:n teettämä kysely. Pakollista yhdenvertaisuuskoulutusta tarvitsee siis paljon laajempi joukko kuin pelkästää3141043Kun viimeksi kohtasitte/näitte
Mitä olitte tekemässä? Millainen ympäristö oli? Löydetään toisemme...1031021- 1081004
Olet kyllä vaarallisen himokas
Luova, kaunis, määrätietoinen, pervo, mielenkiintoinen, kovanaama, naisellinen ja erikoinen.85906On minulla suunitelma
Siitä ei vain tiedä kukaan muu kuin tällä hetkellä minä. Suunnitelma ja varasuunnitelma. Sinun takiasi nainen. Vain s44690Palstan ylivoimaisesti suosituin keskustelunaihe
Palstan suosituin keskustelunaihe näyttää olevan homoseksuaalisuus. Otsikoiden perusteella voisi kuvitella olevansa Seks251686- 50664
Ei koskaan saatu tuntea
Mitä olisi ollut painautua toisiimme vasten. Hengittää syvään, hyväillä ja rakastella vailla kiirettä. Tai repiä vaattee33660