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

Conas luach cille a chur i gceanntásc / buntásc in Excel?

Is féidir linn ceanntásc nó buntásc a chur isteach go héasca ina bhfuil cosán comhaid, ainm comhaid, dáta reatha nó faisnéis eile le gné Excel, ach, uaireanta, ba mhaith linn luach cille a úsáid mar an ceanntásc nó an buntásc in Excel. Conas is féidir linn ábhar cille a chur i gceanntásc nó buntásc sa leabhar oibre?

Cuir luach cille i gceanntásc nó buntásc bileog oibre le cód VBA

Cuir luach cille i gceanntásc nó buntásc gach bileog oibre le cód VBA

Cuir faisnéis chomhaid isteach sa cheanntásc / buntásc le Kutools for Excel smaoineamh maith3


Más mian leat ábhar cille a chur i gceanntásc nó buntásc na bileoige oibre reatha, is féidir leis an gcód VBA seo a leanas cabhrú leat. Déan na céimeanna seo a leanas le do thoil:

1. Gníomhach do bhileog oibre ar mhaith leat tréada nó buntásc a chur isteach le luach cille, ansin coinnigh síos an ALT + F11 eochracha, agus osclaíonn sé an Fuinneog Microsoft Visual Basic for Applications.

2. Cliceáil Ionsáigh > Modúil, agus greamaigh an cód seo a leanas i bhFuinneog an Mhodúil.

Cód VBA: cuir luach cille sonraithe i gceanntásc bileog oibre

Sub HeaderFrom()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
Application.ActiveSheet.PageSetup.LeftHeader = WorkRng.Range("A1").Value
End Sub

3. Ansin brúigh F5 eochair chun an cód seo a rith, popfaidh dialóg amach le cur i gcuimhne duit cill a roghnú a theastaíonn uait a ábhar a chur sa cheanntásc.doc-insert-cill-luach-go-ceanntásc1

4. Agus ansin cliceáil OK, tá an luach cille sonraithe seo curtha isteach i gceanntásc clé reatha na bileoige oibre. Is féidir leat an ceanntásc a fheiceáil trí chliceáil Comhad > Print. Féach an pictiúr:doc-insert-cill-luach-go-ceanntásc1

Nótaí:

1. Más mian leat an t-ábhar cille a úsáid mar bhuntásc den bhileog oibre ghníomhach, is féidir leat an cód seo a chur i bhfeidhm:

Cód VBA: cuir luach cille sonraithe i buntásc bileog oibre

Sub FooterFrom()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
Application.ActiveSheet.PageSetup.LeftFooter = WorkRng.Range("A1").Value
End Sub

2. Is féidir leat na cóid thuas a chur i bhfeidhm freisin chun luach cille a chur isteach sa cheanntásc / buntásc ceart nó ceanntásc / buntásc an ionaid, ach an ceann a athsholáthar LeftHeader / FootFooter Clé le CeartHeader / Footfooter ar dheis or LárionadHeader / CenterFooter sna cóid.


Uaireanta, ba mhaith leat ceanntásc nó buntásc a bhfuil ábhar cille roghnaithe ann a chur isteach i ngach bileog oibre de do leabhar oibre tosaigh, leis an gcód thuas, ní mór duit iad a athdhéanamh arís agus arís eile. Sa chás seo, is féidir leis an gcód VBA seo a leanas an t-ábhar cille a chur le tréada nó buntásc an leabhair oibre iomláin ag an am céanna.

1. Gníomhaigh do leabhar oibre ar mhaith leat tréada nó buntásc a chur isteach le luach cille, ansin coinnigh síos an ALT + F11 eochracha, agus osclaíonn sé an Fuinneog Microsoft Visual Basic for Applications.

2. Cliceáil Ionsáigh > Modúil, agus greamaigh an cód seo a leanas sa Fuinneog an Mhodúil.

Cód VBA: cuir luach cille sonraithe i buntásc gach bileog oibre

Sub AddFooterToAll()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
For Each ws In Application.ActiveWorkbook.Worksheets
    ws.PageSetup.LeftFooter = WorkRng.Range("A1").Value
Next
End Sub

3. Ansin brúigh F5 eochair chun an cód seo a fhorghníomhú, popfaidh dialóg amach le cur i gcuimhne duit cill a roghnú a theastaíonn uait a ábhar a chur i buntásc an leabhair oibre iomláin.

doc-insert-cill-luach-go-ceanntásc1

4. Agus ansin cliceáil OK, cuireadh an luach cille roghnaithe seo le buntásc clé na mbileog oibre go léir. Is féidir leat an buntásc a fheiceáil trí chliceáil Comhad > Print. Féach an pictiúr:

doc-insert-cill-luach-go-ceanntásc1

Nótaí:

1. Más mian leat an t-ábhar cille a úsáid mar cheanntásc ar an leabhar oibre iomlán, is féidir leat an cód seo a chur i bhfeidhm:

Cód VBA: cuir luach cille sonraithe i gceanntásc na mbileog oibre go léir

Sub AddHeaderToAll()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
For Each ws In Application.ActiveWorkbook.Worksheets
    ws.PageSetup.LeftHeader = WorkRng.Range("A1").Value
Next
End Sub

2. Ionadach RightHeader / Buntásc or CenterHeader / Buntásc do LeftHeader / Buntásc sna cóid thuas más mian leat do cheanntásc nó buntásc a bheith suite ar bhealach difriúil.


Más mian leat faisnéis maidir le comhdaitheoir a chur isteach sa cheanntásc nó sa bhuntásc, mar shampla bileog oibre / ainm an leabhair oibre, cosán an leabhair oibre agus mar sin de, is féidir leat í a úsáid Kutools le haghaidh Excel'S Cuir isteach Eolas faoin Leabhar Oibre fóntais má tá Kutools suiteáilte agat le haghaidh Excel.

Kutools le haghaidh Excel, le níos mó ná 300 feidhmeanna úsáideacha, déanann sé do phoist níos éasca. 

Tar éis suiteáil saor in aisce Kutools for Excel, déan mar atá thíos le do thoil:

1. cliceáil Kutools Plus > Leabhar Oibre > Cuir isteach Eolas faoin Leabhar Oibre. Féach an pictiúr:
duga kte 1

2. Sa Cuir isteach Eolas faoin Leabhar Oibre dialóg, seiceáil an fhaisnéis a chaithfidh tú a chur isteach faoi Eolas alt, agus seiceáil ceanntásc or Buntásc mar is maith leat.

Leid: is féidir leat an fhaisnéis a chur isteach ag trí shuíomh ceanntásc nó buntásc: lár, clé nó deas.
cuir isteach cosán leabhar oibre 1

3. cliceáil Ok. Ansin is féidir leat dul chuig Amharc > Leagan Amach Page chun an ceanntásc a fheiceáil.
duga kte 3

Le Faisnéis Ionsáigh Leabhar Oibre, is féidir leat faisnéis chomhaid a chur isteach i gcill nó i raon cealla. Cliceáil anseo chun níos mó eolais a fháil faoin bhfóntas seo.



Leid.Más mian leat leabhar oibre a roinnt go tapa i iliomad leabhar oibre / comhad pdf nó comhaid csv ar leithligh, déan iarracht na Kutools a úsáid le haghaidh Excel's Leabhar Oibre Scoilt mar a thaispeántar sa phictiúr a leanas. Tá sé ag feidhmiú go hiomlán gan teorainn i 30 lá, íoslódáil agus triail saor in aisce anois.

leabhar oibre scoilte doc

Earraí gaolmhara:

Conas ainm nó cosán an chomhaid a chur isteach i gcill / ceanntásc nó buntásc in Excel?

Conas ceanntásc, buntásc, agus pictiúr ceanntásc a chur isteach in Excel?


Na hUirlisí Táirgiúlachta Oifige is Fearr

Réitíonn Kutools for Excel an chuid is mó de do chuid Fadhbanna, agus Méadaíonn sé do Tháirgiúlacht 80%

  • Athúsáid: Cuir isteach go tapa foirmlí casta, cairteacha agus aon rud a d'úsáid tú roimhe seo; Cealla a Chriptiú le pasfhocal; Cruthaigh Liosta Ríomhphoist agus seol ríomhphoist ...
  • Barra Foirmle Super (cuir línte iolracha téacs agus foirmle in eagar go héasca); Leagan Amach Léitheoireachta (líon mór cealla a léamh agus a chur in eagar go héasca); Greamaigh go dtí an Raon Scagtha...
  • Cumaisc Cealla / Sraitheanna / Colúin gan Sonraí a chailleadh; Ábhar Cealla Scoilt; Comhcheangail Sraitheanna / Colúin Dúblacha... Cill Dúblach a Chosc; Déan comparáid idir Ranganna...
  • Roghnaigh Dúblach nó Uathúil Sraitheanna; Roghnaigh Blank Rows (tá na cealla uile folamh); Aimsigh Super agus Fuzzy Aimsigh i go leor Leabhar Oibre; Roghnaigh go randamach ...
  • Cóip Díreach Cealla Il gan tagairt fhoirmle a athrú; Tagairtí Cruthaigh Auto chuig Bileoga Il; Cuir Urchair isteach, Boscaí Seiceála agus go leor eile ...
  • Sliocht Téacs, Cuir Téacs leis, Bain de réir Poist, Bain Spás; Subtotals Paging a chruthú agus a phriontáil; Tiontaigh Idir Ábhar Cealla agus Tráchtanna...
  • Scagaire Super (scéimeanna scagaire a shábháil agus a chur i bhfeidhm ar bhileoga eile); Ard-Sórtáil de réir míosa / seachtaine / lae, minicíocht agus níos mó; Scagaire Speisialta le cló trom, iodálach ...
  • Comhcheangail Leabhair Oibre agus Bileoga Oibre; Cumaisc Táblaí bunaithe ar eochaircholúin; Roinn Sonraí i Ilbhileoga; Baisc Tiontaigh xls, xlsx agus PDF...
  • Níos mó ná 300 gné chumhachtach. Tacaíonn Office / Excel 2007-2021 agus 365. Tacaíonn sé le gach teanga. Imscaradh éasca i d'fhiontar nó d'eagraíocht. Gnéithe iomlána triail saor in aisce 30-lá. Ráthaíocht airgid ar ais 60-lá.
cluaisín kte 201905

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á!
bun officetab
Sórtáil tuairimí de réir
Comments (9)
Níl rátálacha ar bith fós. Bí ar an gcéad duine a rátáil!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
B'éigean dom raon dáta gníomhach párolla a chur isteach i leatháin iolracha. Osclaíonn an t-úsáideoir an leathán Dáta Párolla, iontrálann sé an raon dáta agus sula ndéanann sí priontaí déanann sí nuashonrú ar na bileoga go léir sa leabhar oibre. Seo é mar is féidir liom cealla iolracha a chur isteach sa raon le cód beagán níos lú 2010 comhoiriúnach: Foleabhar Oibre Príobháideach_BeforePrint(Cealaigh Mar Boolean) Dim WorkRng Mar Raon Ar Earráid Lean Ar Aghaidh Do Gach ws In Application.ActiveWorkbook.Worksheets ws.PageSetup. RightHeader = Raon ("'Dáta Párolla'!A1").Luach & vbCr & Raon ("'Dáta Párolla'!A2").Luach ar an gCéad Deiridh Fo
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Ba mhaith liom a chur isteach ceithre cealla i header.This VB ach amháin le haghaidh cille amháin. Conas is féidir liom é a dhéanamh. Go raibh maith agat
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Is féidir leat triail a bhaint as luach rht ceithre chealla a chomhdhlúthú isteach i gcill amháin agus ansin an chill singil a úsáid mar cheanntásc.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit Tá, An bhfuil bealach ann inar féidir leat luach cille a chur leis a chuireann scagairí feidhmithe san áireamh? Mar shampla... A1 = Dé Luain A2 = Dé Máirt A3 = Dé Céadaoin. Ag baint úsáide as an gcód VBA chun cill A1 a thaispeáint oibreofar ar dtús, ach nuair a chuirim scagaire i bhfeidhm ar laethanta na seachtaine, níl an luach cille "barr" A1 a thuilleadh. An bhfuil bealach ann leis an athróg a phiocadh suas? Go raibh míle maith agat,
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Agus do "cód VBA á úsáid agat: cuir luach cille sonraithe i gceanntásc gach bileog oibre", ba mhaith liom go ndéanfaí an luach a chuirtear i bhformáid: Tahoma, trom, i gclómhéid 12.
Conas is féidir é seo a chur le do chód?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Haigh,

Is cosúil nach n-oibríonn sé seo ach uair amháin.
Cad a tharlaíonn má athraíonn luach na cille?
An bhfuil bealach ann chun an chill a nascadh le go n-athraíonn an ceanntásc nuair a athraíonn luach na cille?

Tá leabhar oibre agam ina bhfuil trí bhileog agam.

Bileog 1 lipéadaithe "Bileog Scriosta" - Bileog a sheolaimid chuig an stóras le faisnéis cad ba cheart a ghreamú don ordú
Bileog 2 lipéadaithe "OA" - M' admháil ordaithe don chustaiméir a tharraingíonn an chuid is mó de na sonraí ón gcéad leathán lena n-áirítear an Uimhir Ordaithe a chaithfidh mé a bheith i mo cheannteideal. Mar sin táim ag iarraidh an Ceanntásc a nascadh leis an gcill ar an leathanach seo leis an uimhir ordaithe (F5) a fhaigheann a luach ó (C7) sa chéad bhileog oibre ("Bileog Scriosta")
Bileog 3 lipéadaithe "Sonrasc - Sonrasc a tharraingíonn an chuid is mó den fhaisnéis chéanna ón gcéad leathán freisin a mbeadh gá leis an gceanntásc freisin chun luach (F5) na bileoige seo a tógadh ó (C7) a chur san áireamh sa "Bileog Scriosta"
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Ní cosúil go ndéanann sé seo nasc dinimiciúil, ie, ní athraíonn an luach a chuirtear isteach sa cheanntásc nuair a thagann luach na cille. Mar sin cad é cuspóir an chóid VBA, nuair a dhéanfaidh cóip / greamaigh an rud céanna?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit, Neil,
Más mian leat an luach cille a nascadh leis an gceanntásc nó leis an mbuntásc go dinimiciúil, cuir an cód VBA seo a leanas i bhfeidhm:

nótaí: Ba chóir duit an cód a chur isteach sa chód leatháin agus ní sa ghnáthmhodúl.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim WorkRng As Range
Dim xStR As String
On Error Resume Next
xStR = "A1" '
Set WorkRng = Intersect(Application.ActiveSheet.Range("A1"), Target)
If WorkRng Is Nothing Then Exit Sub
Application.ActiveSheet.PageSetup.RightHeader = WorkRng.Range("A1").Value
End Sub


Bain triail as, le do thoil, tá súil gur féidir leis cabhrú leat
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
maksudnya bagaimana?
Níl aon tráchtanna curtha suas anseo go fóill
Fág do chuid tuairimí
Ag postáil mar Aoi
×
Ráta an post seo:
0   Carachtair
Suímh Molta

Lean orainn

Cóipcheart © 2009 - www.extendoffice.com. | Gach ceart ar cosaint. Cumhachtaithe ag ExtendOffice. | léarscáil an tSuímh
Is trádmharcanna nó trádmharcanna cláraithe de chuid Microsoft Corporation sna Stáit Aontaithe agus / nó i dtíortha eile iad lógó Office agus Office.
Cosanta ag Sectigo SSL