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
596
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
Moikka rakas
Oon miettinyt meidän välistä yhteyttä viime aikoina. En ihan osaa pukea sanoiksi, mitä kaikkea tunnen, mutta halusin vaa205924Malmin tapaus on järkyttävä
Kolme ulkomaalaistaustaista miestä raiskasi nuoren tytön tavalla, jota ei meinaa uskoa todeksi. Mikä voisi olla oikeampi5532138- 1431756
- 801163
HS: Kuka vielä uskaltaa mennä sairaalan ensiapuun?
https://www.hs.fi/mielipide/art-2000011212025.html Tässä on hyvin ajankohtainen mielipidekirjoitus koskien Malmin sairaa97932- 72920
Ökyrikas Kurkilahti mussuttaa veroistaan
Pakeni aikoinaan veroja Portugaliin mutta joutui palaamaan takaisin kun Suomi teki verotussopimuksen Portugalin kanssa.69806Jos tämän vaan sulkee ja avaa 5 vuoden päästä
Täällä on luultavasti edelleen näitä ihan samoja juttuja. On kuin kauniit ja rohkeat samat jutut junnaa. Heips. 👋🏻 E10773- 30764
Kuntoportaat sai rahaa
Kuntoportaat sai mojovan tuen. Minua vain ihmetyttää, tuleeko ne pidettyä käyttökunnossa. Televisiossa oli yksi aamu p37696