Note: The other languages of the website are Google-translated. Back to English

Sut i argraffu rhesi dro ar ôl tro ar waelod pob tudalen argraffedig yn Excel?

Yn ddiofyn, mae Excel yn darparu nodwedd i ddefnyddwyr argraffu rhesi dro ar ôl tro ar y brig. Ond mewn rhai achosion, efallai y byddai'n well gennych argraffu rhesi dro ar ôl tro ar waelod tudalennau ac eithrio ar y brig. Bydd yr erthygl hon yn dangos triciau bach i chi.

Argraffwch resi dro ar ôl tro ar y gwaelod gyda chod VBA


Argraffwch resi dro ar ôl tro ar y gwaelod gyda chod VBA

Gallwch redeg y cod VBA isod i fewnosod y rhes benodol yn nhroedyn pob tudalen. Ac yna gallwch argraffu'r rhes hon dro ar ôl tro ar waelod pob tudalen argraffedig yn Excel.

1. Gwasgwch Alt + F11 allweddi ar yr un pryd i agor y Microsoft Visual Basic ar gyfer Cymhwyso ffenestr.

2. Yn y Microsoft Visual Basic ar gyfer Cymhwyso blwch deialog ffenestr, cliciwch Mewnosod > Modiwlau. Ac yna copïwch a gludwch y cod VBA isod i mewn i ffenestr y Modiwl.

Cod VBA: Mewnosod rhes benodol yn troedynnau pob tudalen argraffedig

Sub MyFooter()
	Dim xTxt As String
	Dim xAddress As String
	Dim xRg As Range
	Dim xCell As Range
	On Error Resume Next
	xAddress = ActiveWindow.RangeSelection.Address
	Set xRg  = Application.InputBox("Select the row you will insert repeatedly at the bottom:", "Kutools for Excel", xAddress, , , , , 8)
	If xRg Is Nothing Then Exit Sub
		For Each xCell In xRg
			xTxt = xTxt & xCell.Value & " "
		Next
		ActiveSheet.PageSetup.LeftFooter = xTxt
	End Sub

3. Gwasgwch y F5 allwedd i redeg y cod. Yna mae blwch deialog Kutools for Excel yn ymddangos, dewiswch y rhes y mae angen i chi ei hargraffu dro ar ôl tro ar waelod pob tudalen argraffedig, ac yna cliciwch ar y OK botwm.

Nawr mae'r cynnwys rhes penodedig yn cael ei ychwanegu at droedyn pob tudalen argraffedig yn y daflen waith gyfredol. Gallwch chi ddechrau argraffu'r daflen waith.

Nodyn: Os ydych chi am argraffu'r cynnwys a ddewiswyd dro ar ôl tro ar waelod pob tudalen yn y llyfr gwaith cyfan, gallwch gymhwyso'r swyddogaeth troedyn i fewnosod y cynnwys yn nhroedyn yr holl daflenni.


Ailadroddwch resi teitl yn hawdd ym mhob nawfed rhes yn Excel:

Kutools ar gyfer Excel's Mewnosod Rhesi Teitl gall cyfleustodau hep eich bod yn mewnosod rhes teitl yn gyflym cyn pob nawfed rhes mewn ystod ddethol yn Excel fel y screenshot isod a ddangosir.
Dadlwythwch a rhowch gynnig arni nawr! (llwybr 30 diwrnod am ddim)


Yr Offer Cynhyrchedd Swyddfa Gorau

Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%

  • Ailddefnyddio: Mewnosod yn gyflym fformwlâu cymhleth, siartiau ac unrhyw beth rydych chi wedi'i ddefnyddio o'r blaen; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
  • Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
  • Uno Celloedd / Rhesi / Colofnau heb golli Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi / Colofnau Dyblyg... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
  • Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
  • Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
  • Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
  • Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
  • Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
  • Mwy na 300 o nodweddion pwerus. Yn cefnogi Swyddfa / Excel 2007-2019 a 365. Yn cefnogi pob iaith. Defnydd hawdd yn eich menter neu sefydliad. Nodweddion llawn treial am ddim 30 diwrnod. Gwarant arian yn ôl 60 diwrnod.
tab kte 201905

Mae Tab Office yn Dod â rhyngwyneb Tabbed i'r Swyddfa, a 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!
gwaelod officetab
sylwadau (11)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch am rannu Macro. Mae'n gwasanaethu fy mhwrpas. Diolch yn fawr.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch yn fawr. Mae'r macro hwn yn gwasanaethu fy mhwrpas, Diolch i'r crëwr a'r person a oedd wedi rhannu Macro
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch am rannu'r macro i ailadrodd y rhesi ar waelod y dudalen. A ellir addasu'r Macro hwn i Ailadrodd Rhesi a ddewiswyd gyda'r fformat hefyd.. Yn y Macro a ddarperir yn unig mae Gwerthoedd yn cael eu hailadrodd ar waelod pob tudalen, rwy'n edrych ymlaen at gopïo'r fformat hefyd ar waelod y dudalen.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch am Rhannu. a oes unrhyw bosibilrwydd o god VBA i droedyn ailadrodd yr un peth â'r opsiwn "teitlau print" gan gynnwys llinellau a rhif tudalen auto. os yn bosibl, helpwch fi.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch yn fawr iawn...
Fe helpodd fi yn fawr iawn.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Heia,
Rwy'n ceisio ychydig o weithiau ond nid yw'n gweithio. Rhowch wybod.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Da dydd,
Diolch i chi am eich sylw. Pa fersiwn Office ydych chi'n ei ddefnyddio?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Os caf, defnyddiaf Office365 ond nid yw'n gweithio. Wedi ceisio rhoi'r olygfa ar Page Layout Mode yn ofer. Gobeithio y gallwch chi helpu. Diolch.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Heia,

Pan fyddaf yn cychwyn y macro a dewis y rhesi a ddymunir nid yw'n gweithio pan fyddaf yn ceisio argraffu. Beth all hwn fod?
Gan ddefnyddio swyddfa 365.

Diolch,
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Heia,

Dwi wedi bod yn trio defnyddio'r côd uchod ond pan dwi'n trio argraffu te cod dyw e ddim yn gweithio. Dilynais yr holl gamau uchod ac nid yw'n rhoi unrhyw wallau i mi.
Rwy'n defnyddio office 365. Unrhyw awgrymiadau ?

Diolch ymlaen llaw,
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo Tim,
Helo, bydd y rhes a ddewiswyd yn cael ei mewnosod yn nhroedyn y dudalen, mae angen i chi newid i'r wedd Cynllun Tudalen i wirio am y canlyniad. Diolch i chi am eich sylw.
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir