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
583
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
JOKO OLETTE KUULLET, MITÄ KIURUVEDELLÄ ON SATTUNUT!
Oletteko jo kuulleet, mitä Kiuruvedellä on sattunut, voi hyvänen aika? Aivan viime tuntien aikana olisi sattunut, jos t3612231V*ttuu että mä haluan sua
Jos jotain ihmistä voi kunnolla haluta, niin hän on se. Voi Luoja auta jo! Joku jeesus hjelppa mej!894138Nolointa ikinä miehelle
On ghostata nainen jonka kanssa on ollut ystävä tai ollu orastavaa tapailua pidemmän aikaa. Osoittaa sellaista moukkamai1083921- 513618
Eli jos toisen hiki haisee ns. omaan nenään siedettävältä
Se kertoo hyvästä yhteensopivuudesta. Selvä! Olet mies minun. 🫵🥳533288- 1103240
Sattuma ja muutama väärinkäsitys
vaikuttivat siihen millaiseksi tämä kaikki muodostui. Pienet aikanaan huomaamattomat käänteet. Seuraava näytös on jo tul342109- 382082
Keskusta hajoaa Palojärvi lähtee
Suomen Keskustan ryhmä hajoaa Kemijärvellä. Kalastaja Palojärvi sai tarpeekseen ja loikkasi Sitoutumattomat Aati Virkkul261915On sillä rääpyä
Tuo ex kuntajohtaja Lea Tolonen kehtaakin tulla Ähtäriin. Ajoi laivan Karille. Kari Heikkilä oikaisi taloutta, sai laiva111603