Skip i'r prif gynnwys

Sut i newid / trosi cyfeiriad absoliwt at gyfeirnod cymharol yn Excel?

Fel rheol mae yna sawl math o gyfeiriadau celloedd y gallwch eu defnyddio mewn fformiwla, a gall pob math o gyfeiriadau celloedd eich helpu i gyflawni gwahanol ddibenion yn y fformiwla. Gallwch gael y mathau canlynol o gyfeiriadau celloedd, megis cyfeirnod celloedd absoliwt, cyfeirnod celloedd cymharol, cyfeirnod rhes cymharol cyfeirnod colofn absoliwt a chyfeirnod rhes absoliwt a chyfeirnod colofn gymharol. Ond weithiau efallai y bydd angen i chi newid y defnydd o bwrpas y fformiwla trwy newid y cyfeiriadau celloedd yn y fformiwla. Y dulliau anodd canlynol a fyddwch chi'n dweud sut i newid cyfeiriad absoliwt at berthynas yn Excel.

Newid cyfeiriad absoliwt i gyfeirnod cymharol gyda'r allwedd F4

Newid cyfeiriad absoliwt i gyfeirnod cymharol gyda chod VBA

Newid cyfeiriad absoliwt yn gyflym i gyfeiriad cymharol gyda Kutools ar gyfer Excel

Cyfeiriad Absoliwt

Cyfeiriad Cymharol


swigen dde glas saeth Newid cyfeiriad absoliwt i gyfeirnod cymharol gyda'r allwedd F4

Gyda'r allwedd llwybr byr F4, gallwn yn hawdd toglo'r cyfeiriad absoliwt at gyfeirnod cymharol, gwnewch fel y camau canlynol:

Rhowch y cyrchwr y tu ôl i $ A $ 1, yna pwyswch F4 dair gwaith, bydd yn dod yn A $ 1, $ A1, A1 yn olynol. Gweler y screenshot:

Yn ôl y cam hwn, rhowch y cyrchwr y tu ôl i $ B $ 1 i gael B1.

A bydd y cyfeirnod cell hwn yn dod yn gyfeirnod cymharol o gyfeirnod absoliwt.

Os oes sawl fformiwla mae angen newid cyfeiriadau celloedd, bydd y ffordd hon yn ddiflas ac yn cymryd llawer o amser.


swigen dde glas saeth Newid cyfeiriad absoliwt i gyfeirnod cymharol gyda chod VBA

Gyda chod VBA, gallwch newid ystod o gyfeiriadau celloedd fformiwlâu yn gyflym o gyfeiriadau absoliwt i gyfeiriadau cymharol ar y tro.

1. Dewiswch yr ystod rydych chi am ei newid.

2. Cliciwch Datblygwr > Visual Basic neu gallwch chi wasgu Alt + F11, bydd ffenestr Microsoft Visual Basic newydd ar gyfer cymwysiadau yn cael ei harddangos, cliciwch Mewnosod > Modiwlau, a mewnbynnu'r cod canlynol i'r Modiwlau:
VBA: Trosi absoliwt i gyfeirnod cymharol.

Sub ConverFormulaReferences()
'Updateby20140603
Dim Rng As Range
Dim WorkRng As Range
Dim xName As Name
Dim xIndex As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeFormulas)
xIndex = Application.InputBox("Change formulas to?" & Chr(13) & Chr(13) _
& "Absolute = 1" & Chr(13) _
& "Row absolute = 2" & Chr(13) _
& "Column absolute = 3" & Chr(13) _
& "Relative = 4", xTitleId, 1, Type:=1)
For Each Rng In WorkRng
    Rng.Formula = Application.ConvertFormula(Rng.Formula, XlReferenceStyle.xlA1, XlReferenceStyle.xlA1, xIndex)
Next
End Sub

3. Yna cliciwch doc-absoliwt-perthynas-6 botwm i redeg y cod, a bydd blwch prydlon yn galw allan am ddewis ystod i'w drosi, yna cliciwch ar OK ac arddangosiadau deialog arall i'ch annog pa fath rydych chi am ei ddefnyddio. Yna gallwch ddewis y math cywir sydd ei angen arnoch chi. Er enghraifft, byddaf yn mewnosod 4. Gweler sgrinluniau:

4. Yna cliciwch OK. Mae'r holl gyfeiriadau absoliwt wrth ddewis wedi'u newid i gyfeiriadau cymharol yn y fformiwla.

Cod VBA amlswyddogaeth yw hwn, gyda'r cod hwn; gallwch hefyd newid yn gymharol â chyfeirnod absoliwt, newid rhes absoliwt neu newid colofn absoliwt.


swigen dde glas saeth Newid cyfeiriad absoliwt yn gyflym i gyfeiriad cymharol gyda Kutools ar gyfer Excel

Kutools ar gyfer Excel: gyda mwy na 100 o ychwanegiadau Excel defnyddiol, am ddim i geisio heb unrhyw gyfyngiad mewn 30 diwrnod. Get it Now

Kutools ar gyfer Excel gadewch ichi newid absoliwt i gyfeirnod cymharol neu i'r gwrthwyneb yn gyflym ac yn hawdd. Gwnewch fel a ganlyn:

Cam 1. Ewch i ddewis yr ystod sy'n cynnwys fformwlâu rydych chi am newid cyfeiriadau celloedd yn y daflen waith.

Cam 2. Cliciwch Kutools > Trosi Cyfeiriadau. Bydd yn arddangos Trosi Cyfeiriadau Fformiwla blwch deialog. Gweler y screenshot:

Cam 3. Gwiriwch I berthynas a chliciwch Ok or Gwneud cais yn y Trosi Cyfeirnod Fformiwla deialog. Bydd yn newid y cyfeiriad absoliwt i gyfeirnod cymharol.

Os hoffech chi newid y cyfeiriadau celloedd at golofn absoliwt neu res absoliwt, gwiriwch I golofn absoliwt opsiwn neu I rwyfo absoliwt opsiwn.

Am wybodaeth fanylach am Trosi Cyfeirnod, Ewch i Trosi disgrifiad nodwedd Cyfeirnod.


Erthygl gymharol:Newid cyfeiriad cymharol i gyfeirnod absoliwt

Offer Cynhyrchiant Swyddfa Gorau

🤖 Kutools AI Aide: Chwyldro dadansoddi data yn seiliedig ar: Cyflawniad Deallus   |  Cynhyrchu Cod  |  Creu Fformiwlâu Personol  |  Dadansoddi Data a Chynhyrchu Siartiau  |  Invoke Swyddogaethau Kutools...
Nodweddion Poblogaidd: Darganfod, Amlygu neu Adnabod Dyblygiadau   |  Dileu Rhesi Gwag   |  Cyfuno Colofnau neu Gelloedd heb Colli Data   |   Rownd heb Fformiwla ...
Super-edrych: VLookup Meini Prawf Lluosog    VLookup Gwerth Lluosog  |   VLookup Ar Draws Taflenni Lluosog   |   Edrych Niwlog ....
Rhestr gwympo Uwch: Creu Rhestr Gollwng yn Gyflym   |  Rhestr Gollwng Dibynnol   |  Rhestr Gollwng Aml-ddewis ....
Rheolwr Colofn: Ychwanegu Nifer Penodol o Golofnau  |  Symud Colofnau  |  Toglo Statws Gwelededd Colofnau Cudd  |  Cymharwch Ystodau a Cholofnau ...
Nodweddion dan Sylw: Ffocws ar y Grid   |  Golwg Dylunio   |   Bar Fformiwla Mawr    Rheolwr Llyfr Gwaith a Thaflen   |  Llyfrgell Adnoddau (Testun Auto)   |  Dewiswr Dyddiad   |  Cyfuno Taflenni Gwaith   |  Amgryptio/Dadgryptio Celloedd    Anfon E-byst trwy Restr   |  Hidlo Super   |   Hidlo Arbennig (hidlo mewn print trwm/italig/strikethrough...) ...
15 Set Offer Gorau12 Testun offer (Ychwanegu Testun, Dileu Cymeriadau,...)   |   50 + Siart Mathau (Siart Gantt,...)   |   40+ Ymarferol Fformiwlâu (Cyfrifwch oedran yn seiliedig ar ben-blwydd,...)   |   19 mewnosod offer (Mewnosod Cod QR, Mewnosod Llun o'r Llwybr,...)   |   12 Trosi offer (Rhifau i Eiriau, Trosi arian cyfred,...)   |   7 Uno a Hollti offer (Rhesi Cyfuno Uwch, Celloedd Hollt,...)   |   ... a mwy

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...

Disgrifiad


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!
Comments (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Function ConvertMyAddress(strRng As String) As String
Dim rngSelection As Range

Set rngSelection = Application.Range(strRng)
'// Test if empty
If rngSelection Is Nothing Then Exit Function

' MsgBox rngSelection.Address(0, 0) 'A1
' MsgBox rngSelection.Address(1, 0) '$A1
' MsgBox rngSelection.Address(0, 1) 'A$1
' MsgBox rngSelection.Address(1, 1) '$A$1
' MsgBox rngSelection.Address '$A$1
'
' MsgBox rngSelection.Parent.Name & "!" & rngSelection.Address(0, 0)
' MsgBox "[" & rngSelection.Parent.Parent.Name & "]" & rngSelection.Parent.Name & "!" & rngSelection.Address(0, 0)

ConvertMyAddress = rngSelection.Address(1, 1)

End Function
This comment was minimized by the moderator on the site
Wao Excellent teh VBA Code Works Perfect, Thank You very Much
This comment was minimized by the moderator on the site
Excel 2010. I clicked on cancel when the prompt comes up, but excel still ran the script and it froze my computer for several hours. I only had 1 cell highlighted anyway, so even if the script did run, why did it take so long to run? [i realize now that despite pressing cancel, the code ran and made every cell in the worksheet relative ! :( ] I was assigning it to a form button vs pressing play within VBA window. I've used other scripts from KuTools and never experienced this nonsense.
This comment was minimized by the moderator on the site
The F4 toggle works in all versions. but you MUST be in edit mode first. I always press F2 (puts you into edit mode) then F4 to toggle between the four options.
This comment was minimized by the moderator on the site
With the shortcut key F4, we can easily toggle the absolute reference to relative reference, please do //as// the following steps. Forgot to mention F4 didn't work with my excel (windows 7) but your macro and invite to Kutools is great. Sorry about repeat sends, I thought the code wasn't working.
This comment was minimized by the moderator on the site
Thank you very much. Descriptive, easy to follow information.
This comment was minimized by the moderator on the site
Thank you very much, descriptive, easy to follow information.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations