Conas teidil a phriontáil arís agus arís eile i iliomad bileoga?
Is gnách go n-úsáidtear an tsraith ceanntásc ag an mbarr arís agus arís eile i ngach leathanach inár gcuid oibre, ach an ndearna tú iarracht riamh sraitheanna teidil a phriontáil arís agus arís eile i mbileoga iolracha? San alt seo, tá dhá bhealach éasca agam an cheist seo a láimhseáil in Excel.
Priontáil teidil arís agus arís eile i iliomad bileoga oibre le VBA
Priontáil teidil arís agus arís eile i iliomad bileoga oibre le Kutools for Excel
Priontáil teidil arís agus arís eile i iliomad bileoga oibre le VBA
Níl aon ghné ionsuite ann chun teidil a phriontáil arís agus arís eile i iliomad bileoga, ach is féidir leat macra a úsáid chun é a láimhseáil.
1. Gníomhachtaigh an chéad bhileog i do leabhar oibre, cliceáil an t-ancaire ag an gcúinne ag bun ar dheis de Socrú Leathanaigh grúpa ar an Leagan Amach Page cluaisín. Féach an pictiúr:
2. Sa Socrú Leathanaigh dialóg, cliceáil Bileog cluaisín, roghnaigh an tsraith teidil is mian leat a phriontáil arís agus arís eile Sraitheanna a athrá ag an mbarr, agus cliceáil OK. Féach an pictiúr:
3. Brúigh Alt + F11 eochracha chun an Microsoft Visual Basic d’Fheidhmchláir fuinneog, cliceáil Ionsáigh > Modúil chun nua a chruthú Modúil.
4. Ansin greamaigh thíos an cód leis an script bán, agus brúigh F5 chun an cód a rith.
VBA: Déan teidil a phriontáil arís agus arís eile i iliomad bileoga
Sub SetAttributes()
'UpdatebyExtendoffice20170810
Dim xSheet As Worksheet
Dim xSheetOne As Worksheet
Dim xSheets As Sheets
Set xSheets = ActiveWorkbook.Worksheets
Set xSheetOne = xSheets(1)
For Each xSheet In xSheets
xSheet.PageSetup.PrintTitleRows = xSheetOne.PageSetup.PrintTitleRows
Next xSheet
End
Tar éis duit an VBA a chur i bhfeidhm, déanfar an tsraith barr i ngach bileog a athdhéanamh ag barr an bhileog chomhfhreagraigh agus é á phriontáil.
Priontáil teidil arís agus arís eile i iliomad bileoga oibre le Kutools for Excel
Má tá tú suiteáilte agat Kutools le haghaidh Excel, is féidir leat a Cóipeáil Socrú Leathanach chun an leathanach iomlán nó an tacar sonrach leathanach a chóipeáil go tapa ó bhileog amháin go bileoga eile i leabhar oibre.
Kutools le haghaidh Excel, le níos mó ná 300 feidhmeanna úsáideacha, déanann sé do phoist níos éasca. |
Tar éis a shuiteáil Kutools for Excel, déan mar atá thíos le do thoil:Download Kutools Íoslódáil saor in aisce do Excel Anois!)
1. Roghnaigh bileog amháin, mar shampla, roghnaigh Bileog1, agus cliceáil an t-ancaire ag an gcúinne ag bun ar dheis de Socrú Leathanaigh grúpa ar an Leagan Amach Page cluaisín. Féach an pictiúr:
2. Sa Socrú Leathanaigh dialóg, cliceáil Bileog cluaisín, agus roghnaigh na teidil is mian leat a phriontáil arís agus arís eile Sraitheanna a athrá ag an mbarr. Féach an pictiúr:
3. cliceáil OK, cliceáil ansin Kutools Plus > Priontáil > Cóipeáil Socrú Leathanach. Féach an pictiúr :
4. Sa Cóipeáil Socrú Leathanach dialóg, seiceáil ainmneacha na mbileog ar mhaith leat an socrú leathanaigh céanna a chur i bhfeidhm iontu Cóip le liosta, ansin seiceáil Sraitheanna a athrá ag an mbarr sa Roghanna liosta. Féach an pictiúr:
5. cliceáil Ok. Anois rinneadh na sraitheanna barr arís agus arís eile ag an mbarr thar iliomad bileoga agus iad á bpriontáil.
Demo
Uirlisí Táirgiúlachta Oifige is Fearr
Supercharge Do Scileanna Excel le Kutools le haghaidh Excel, agus Éifeachtúlacht Taithí Cosúil Ná Roimhe. Kutools le haghaidh Excel Tairiscintí Níos mó ná 300 Ardghnéithe chun Táirgiúlacht a Treisiú agus Sábháil Am. Cliceáil anseo chun an ghné is mó a theastaíonn uait a fháil ...
Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca
- Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
- Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
- Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!