Sut i argraffu troedyn ar y dudalen olaf yn unig yn Excel?
Yn ddiofyn, gyda'r adeiledig yn Pennawd a throedyn nodwedd o Excel, gallwch yn hawdd ychwanegu troedynnau ar waelod pob tudalen argraffedig mewn taflen waith. Os ydych chi am ychwanegu troedyn at y dudalen argraffedig ddiwethaf mewn taflen waith yn unig, sut allwch chi wneud? Mae'r tiwtorial hwn yn darparu sgript VBA i'ch helpu i gyflawni'r dasg hon gam wrth gam.
Argraffwch droedyn ar y dudalen olaf gyda chod VBA yn unig
Rhedwch y cod VBA canlynol i argraffu troedyn wedi'i deilwra ar y dudalen argraffedig ddiwethaf yn Excel yn unig.
1. Agorwch y daflen waith rydych chi am ei hargraffu gyda throedyn wedi'i deilwra yn dangos ar y dudalen argraffedig ddiwethaf yn unig.
2. Gwasgwch y Alt + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
3. Yn y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, cliciwch Mewnosod > Modiwlau. Yna copïwch y cod VBA canlynol yn y Modiwl (Cod) ffenestr.
Cod VBA: Argraffwch y troedyn ar y dudalen olaf yn unig
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
Nodyn: Yn y cod, rhowch y cynnwys hwn yn lle "Teipiwch eich gwybodaeth troedyn yma" gyda'ch gwybodaeth troedyn eich hun.
4. Gwasgwch y F5 allwedd i redeg y cod.
Yna bydd y daflen waith weithredol yn cael ei hargraffu gyda'r troedyn arferol yn cael ei fewnosod ar y dudalen argraffedig olaf yn unig.
Offer Cynhyrchiant Swyddfa Gorau
Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer Excel Yn Cynnig Dros 300 o Nodweddion Uwch i Hybu Cynhyrchiant ac Arbed Amser. Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...
Mae Office Tab yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer
- Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
- Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
- Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!