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
591
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
Saako kaunis ihminen parempaa kohtelua?
Onko kauniin ihmisen elämä "helpompaa" kuin tavallisen näköisen ihmisen? Olen kuullut väittämän, että kaunis ihminen saa1012900En rehellisesti usko et oisit
Sekuntiakaan oikeasti mua kaivannut. Tai edes miettinyt miten mulla menee. Jotenkin todennäköisesti hyödyt tästäkin jos361839- 101834
Suomennettua: professori Jeffrey Sachs avaa Ukrainan sodan taustat luennollaan EU parlamentissa
Jeffrey Sachs on yhdysvaltalainen ekonomisti. Sachs toimii Columbian yliopiston The Earth Instituten johtajana. Aiemmin3861692Näin sinusta taas unta!
Unessa olin pakahtuneesti rakastunut sinuun. Olimme vanhassa talossa jossa oli yläkerran huoneissa pyöreät ikkunat. Pöly211621Nainen, olet jotenkin lumoava
Katselen kauneuttasi kuin kuuta, sen loistoa pimeässä. Sen kaunis valo on kaunista sekä herkkää ja lumoavaa. Olet naisel681457- 1191267
- 131186
En muuttaisi sinusta mitään
Ensin olit etäinen ja yritin pysyä tutkan alapuolella. Mutta ei silmiltäsi jää mitään huomaamatta, kuten minulla ei kuul91156- 201039