Przejdź do głównej zawartości

Jak zmienić / przekonwertować odniesienie bezwzględne na odniesienie względne w programie Excel?

Zwykle istnieje kilka typów odwołań do komórek, których można używać w formule, a każdy typ odwołań do komórek może pomóc w osiągnięciu różnych celów w formule. Dostępne są następujące typy odwołań do komórek, takie jak bezwzględne odwołanie do komórki, względne odwołanie do komórki, względne odwołanie do wiersza, bezwzględne odwołanie do kolumny oraz bezwzględne odwołanie do wiersza i względne odwołanie do kolumny. Czasami jednak może zajść potrzeba zmiany celu użycia formuły, zmieniając odwołania do komórek w formule. Poniższe trudne metody pokażą, jak zmienić odniesienie bezwzględne na względne w programie Excel.

Zmień odniesienie bezwzględne na odniesienie względne za pomocą klawisza F4

Zmień odniesienie bezwzględne na odniesienie względne za pomocą kodu VBA

Szybko zmień odniesienie bezwzględne do odniesienia względnego za pomocą Kutools for Excel

Bezwzględne odniesienie

Względne odniesienie


strzałka niebieski prawy bąbelek Zmień odniesienie bezwzględne na odniesienie względne za pomocą klawisza F4

Za pomocą klawisza skrótu F4 możemy łatwo przełączać odniesienie bezwzględne do odniesienia względnego, wykonaj następujące czynności:

Ustaw kursor za $ A $ 1, a następnie naciśnij trzykrotnie F4, będzie to kolejno A $ 1, $ A1, A1. Zobacz zrzut ekranu:

Zgodnie z tym krokiem umieść kursor za $ B $ 1, aby uzyskać B1.

To odwołanie do komórki stanie się odniesieniem względnym względem odniesienia bezwzględnego.

Jeśli istnieje potrzeba zmiany odwołań do komórek wielu formuł, będzie to żmudne i czasochłonne.


strzałka niebieski prawy bąbelek Zmień odniesienie bezwzględne na odniesienie względne za pomocą kodu VBA

Za pomocą kodu VBA można szybko zmienić jednocześnie odwołania do komórek formuł z bezwzględnych na względne.

1. Wybierz zakres, który chcesz zmienić.

2. kliknij Deweloper > Visual Basic lub możesz nacisnąć Alt + F11, pojawi się nowe okno Microsoft Visual Basic for applications, kliknij wstawka > Modułi wprowadź następujący kod do pliku Moduł:
VBA: Konwertuj bezwzględne na względne odniesienie.

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. Następnie kliknij doc-absolut-względny-6 aby uruchomić kod, pojawi się okienko zachęty do wyboru zakresu do konwersji, a następnie kliknij OK i pojawi się kolejne okno dialogowe z pytaniem, jakiego typu chcesz użyć. Następnie możesz wybrać odpowiedni typ, którego potrzebujesz. W tym przykładzie wstawię 4. Zobacz zrzuty ekranu:

4. Następnie kliknij OK. Wszystkie bezwzględne odniesienia w zaznaczeniu zostały zamienione we wzorze na odniesienia względne.

To jest wielofunkcyjny kod VBA z tym kodem; można również zmienić odniesienie względne do odniesienia bezwzględnego, zmienić wiersz bezwzględny lub zmienić kolumnę bezwzględną.


strzałka niebieski prawy bąbelek Szybko zmień odniesienie bezwzględne do odniesienia względnego za pomocą Kutools for Excel

Kutools dla programu Excel: z ponad 100 poręcznymi dodatkami Excela, które można wypróbować bez ograniczeń w ciągu 30 dni. Pobierz teraz

Kutools dla programu Excel pozwalają szybko i łatwo zmienić odniesienie bezwzględne na względne lub odwrotnie. Wykonaj następujące czynności:

Krok 1. Przejdź do zakresu zawierającego formuły, dla których chcesz zmienić odwołania do komórek w arkuszu.

Krok 2. Kliknij Kutools > Konwertuj odniesienia. Wyświetli się Konwertuj odwołania do formuł Okno dialogowe. Zobacz zrzut ekranu:

Krok 3. Czek Do krewnego i kliknij Ok or Aplikuj Konwertuj odniesienie do formuły dialog. Zmieni odniesienie bezwzględne na odniesienie względne.

Jeśli chcesz zmienić odwołania do komórek na bezwzględne w kolumnie lub bezwzględne w wierszu, zaznacz opcję Do kolumny bezwzględnej opcja lub Aby wiosłować absolutnie opcja.

Więcej szczegółowych informacji na temat Konwertuj odniesienieMożna znaleźć na stronie Opis funkcji odniesienia konwersji.


Względny artykuł:Zmień odniesienie względne na odniesienie bezwzględne

Najlepsze narzędzia biurowe

🤖 Pomocnik AI Kutools: Zrewolucjonizuj analizę danych w oparciu o: Inteligentne wykonanie   |  Wygeneruj kod  |  Twórz niestandardowe formuły  |  Analizuj dane i generuj wykresy  |  Wywołaj funkcje Kutools...
Popularne funkcje: Znajdź, wyróżnij lub zidentyfikuj duplikaty   |  Usuń puste wiersze   |  Łącz kolumny lub komórki bez utraty danych   |   Okrągły bez wzoru ...
Super wyszukiwanie: Wiele kryteriów VLookup    Wiele wartości VLookup  |   Przeglądanie pionowe na wielu arkuszach   |   Wyszukiwanie rozmyte ....
Zaawansowana lista rozwijana: Szybko twórz listę rozwijaną   |  Zależna lista rozwijana   |  Lista rozwijana wielokrotnego wyboru ....
Menedżer kolumn: Dodaj określoną liczbę kolumn  |  Przesuń kolumny  |  Przełącz stan widoczności ukrytych kolumn  |  Porównaj zakresy i kolumny ...
Polecane funkcje: Fokus siatki   |  Widok projektu   |   Duży pasek formuły    Menedżer skoroszytów i arkuszy   |  Biblioteka zasobów (Automatyczny tekst)   |  Selektor dat   |  Połącz arkusze   |  Szyfruj/odszyfruj komórki    Wysyłaj e-maile według listy   |  Super filtr   |   Specjalny filtr (filtruj pogrubienie/kursywa/przekreślenie...) ...
15 najlepszych zestawów narzędzi12 Tekst Tools (Dodaj tekst, Usuń znaki, ...)   |   50 + Wykres rodzaje (Wykres Gantta, ...)   |   40+ Praktyczne Wzory (Oblicz wiek na podstawie urodzin, ...)   |   19 Wprowadzenie Tools (Wstaw kod QR, Wstaw obraz ze ścieżki, ...)   |   12 Konwersja Tools (Liczby na słowa, Przeliczanie walut, ...)   |   7 Połącz i podziel Tools (Zaawansowane wiersze łączenia, Podział komórki, ...)   |   ... i więcej

Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas.  Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...

Opis


Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę

  • Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
  • Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
  • Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!
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