Conas buntásc ar an leathanach deiridh a phriontáil in Excel amháin?
De réir réamhshocraithe, leis an ionsuite Ceanntásc & buntásc gné de Excel, is féidir leat buntásca a chur go héasca ag bun gach leathanaigh chlóite i mbileog oibre. Más mian leat buntásc a chur leis an leathanach priontáilte deiridh amháin i mbileog oibre, conas is féidir leat a dhéanamh? Soláthraíonn an teagasc seo script VBA chun cabhrú leat an tasc seo a chur i gcrích céim ar chéim.
Priontáil buntásc ar an leathanach deiridh le cód VBA amháin
Rith an cód VBA seo a leanas le do thoil chun buntásc saincheaptha a phriontáil ar an leathanach deireanach clóite in Excel amháin.
1. Oscail an bhileog oibre is mian leat a phriontáil le buntásc saincheaptha a thaispeánann ar an leathanach clóite deiridh amháin.
2. Brúigh an Eile + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.
3. Sa Microsoft Visual Basic d’Fheidhmchláir fuinneog, cliceáil Ionsáigh > Modúil. Ansin cóipeáil an cód VBA seo a leanas sa Modúl (Cód) fhuinneog.
Cód VBA: Priontáil buntásc ar an leathanach deiridh amháin
Sub SetFooterOnLastPage()
'Updated by Extendoffice 20221024
Dim xCount As Long
Dim xWSh
xCount = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
Set xWSh = Application.ActiveSheet
With Application.ActiveSheet
.PageSetup.RightFooter = ""
If xCount > 1 Then
.PrintOut From:=1, To:=xCount - 1
End If
.PageSetup.RightFooter = "Type your footer information here"
.PrintOut From:=xCount, To:=xCount
End With
End Sub
nótaí: Sa chód, cuir an t-inneachar seo in ionad "Clóscríobh do bhuntásc eolais anseo" le do chuid faisnéise buntásc féin.
4. Brúigh an F5 eochair chun an cód a rith.
Ansin déanfar an bhileog oibre gníomhach a phriontáil agus an buntásc saincheaptha á chur isteach ar an leathanach clóite deiridh amháin.
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á!