Přejít k hlavnímu obsahu

Jak změnit / převést absolutní odkaz na relativní odkaz v aplikaci Excel?

Normálně existuje několik typů odkazů na buňky, které můžete použít ve vzorci, a každý typ odkazů na buňky vám může pomoci dosáhnout ve vzorci různých účelů. Můžete mít následující typy odkazů na buňky, například absolutní odkaz na buňku, relativní odkaz na buňku, relativní odkaz na řádek, absolutní odkaz na sloupec a absolutní odkaz na řádek a relativní odkaz na sloupec. Někdy ale možná budete muset změnit použití účelu vzorce změnou odkazů na buňky ve vzorci. Následující složité metody vám řeknou, jak změnit absolutní odkaz na relativní v aplikaci Excel.

Změňte absolutní odkaz na relativní odkaz pomocí klávesy F4

Změňte absolutní odkaz na relativní odkaz pomocí kódu VBA

Rychle změňte absolutní odkaz na relativní odkaz pomocí Kutools pro Excel

Absolutní reference

Relativní reference


šipka modrá pravá bublina Změňte absolutní odkaz na relativní odkaz pomocí klávesy F4

Pomocí klávesové zkratky F4 můžeme snadno přepínat absolutní odkaz na relativní odkaz, proveďte následující kroky:

Umístěte kurzor za $ A $ 1, poté třikrát stiskněte klávesu F4, postupně se změní na A $ 1, $ A1, A1. Viz screenshot:

Podle tohoto kroku umístěte kurzor za $ B $ 1, abyste získali B1.

A tento odkaz na buňku se stane relativním odkazem z absolutního odkazu.

Pokud je třeba změnit odkazy na buňky více vzorců, bude to zdlouhavé a časově náročné.


šipka modrá pravá bublina Změňte absolutní odkaz na relativní odkaz pomocí kódu VBA

S kódem VBA můžete rychle změnit rozsah odkazů na buňky vzorců z absolutních odkazů na relativní odkazy najednou.

1. Vyberte rozsah, který chcete změnit.

2. cvaknutí Vývojka > Visual Basic nebo můžete stisknout Alt + F11, zobrazí se nové okno Microsoft Visual Basic pro aplikace, klikněte na Vložit > Modula vložte následující kód do Modul:
VBA: Převést absolutní na relativní referenci.

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. Pak klikněte na tlačítko doc-absolutní-relativní-6 Chcete-li spustit kód, zobrazí se výzva k výběru rozsahu, který chcete převést, poté klepněte na OK a zobrazí se další dialogové okno s výzvou, který typ chcete použít. Pak si můžete vybrat ten správný typ, který potřebujete. V tomto příkladu vložím 4. Viz screenshoty:

4. Pak klikněte na tlačítko OK. Všechny absolutní odkazy ve výběru byly změněny na relativní odkazy ve vzorci.

Toto je multifunkční kód VBA s tímto kódem; můžete také změnit relativně k absolutní referenci, změnit absolutní řádek nebo změnit absolutní sloupec.


šipka modrá pravá bublina Rychle změňte absolutní odkaz na relativní odkaz pomocí Kutools pro Excel

Kutools pro Excel: s více než 100 praktickými doplňky Excel, můžete si je vyzkoušet bez omezení do 30 dnů. Získat nyní

Kutools pro Excel vám umožní rychle a snadno změnit absolutní na relativní referenci nebo naopak. Postupujte prosím následovně:

Krok 1. Přejděte k výběru rozsahu obsahujícího vzorce, které chcete změnit odkazy na buňky v listu.

Krok 2. Klikněte na tlačítko Kutools > Převést odkazy. Zobrazí se Převést odkazy na vzorce dialogové okno. Viz snímek obrazovky:

Krok 3. Kontrola K relativnímu a klepněte na tlačítko Ok or Podat žádost v Převést odkaz na vzorec dialog. Změní absolutní odkaz na relativní odkaz.

Pokud chcete změnit odkazy na buňky na absolutní sloupec nebo absolutní řádek, zkontrolujte Do sloupce absolutní Možnost nebo Do řádku absolutní volba.

Podrobnější informace o Převést odkaz, prosím navštivte Převést popis funkce reference.


Relativní článek:Změnit relativní odkaz na absolutní odkaz

Nejlepší nástroje pro produktivitu v kanceláři

🤖 Kutools AI asistent: Revoluční analýza dat založená na: Inteligentní provedení   |  Generovat kód  |  Vytvořte vlastní vzorce  |  Analyzujte data a generujte grafy  |  Vyvolejte funkce Kutools...
Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více

Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...

Popis


Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
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