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

Как изменить / преобразовать абсолютную ссылку в относительную ссылку в Excel?

Обычно в формуле можно использовать несколько типов ссылок на ячейки, и каждый тип ссылок на ячейки может помочь вам достичь различных целей в формуле. У вас могут быть следующие типы ссылок на ячейки, такие как абсолютная ссылка на ячейку, относительная ссылка на ячейку, относительная ссылка на строку, абсолютная ссылка на столбец, абсолютная ссылка на строку и относительная ссылка на столбец. Но иногда вам может потребоваться изменить назначение формулы, изменив ссылки на ячейки в формуле. Следующие хитрые методы расскажут, как изменить абсолютную ссылку на относительную в Excel.

Измените абсолютную ссылку на относительную с помощью клавиши F4

Измените абсолютную ссылку на относительную ссылку с кодом VBA

Быстро изменить абсолютную ссылку на относительную с помощью Kutools for Excel

Вкладка Office позволяет редактировать и просматривать в Office с вкладками и значительно упрощает работу ...
Kutools for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%
  • Повторное использование чего угодно: Добавляйте наиболее часто используемые или сложные формулы, диаграммы и все остальное в избранное и быстро используйте их в будущем.
  • Более 20 текстовых функций: Извлечь число из текстовой строки; Извлечь или удалить часть текстов; Преобразование чисел и валют в английские слова.
  • Инструменты слияния: Несколько книг и листов в одну; Объединить несколько ячеек / строк / столбцов без потери данных; Объедините повторяющиеся строки и сумму.
  • Разделить инструменты: Разделение данных на несколько листов в зависимости от ценности; Из одной книги в несколько файлов Excel, PDF или CSV; От одного столбца к нескольким столбцам.
  • Вставить пропуск Скрытые / отфильтрованные строки; Подсчет и сумма по цвету фона; Отправляйте персонализированные электронные письма нескольким получателям массово.
  • Суперфильтр: Создавайте расширенные схемы фильтров и применяйте их к любым листам; Сортировать по неделям, дням, периодичности и др .; Фильтр жирным шрифтом, формулы, комментарий ...
  • Более 300 мощных функций; Работает с Office 2007-2021 и 365; Поддерживает все языки; Простое развертывание на вашем предприятии или в организации.

Абсолютная ссылка

Относительная ссылка


стрелка синий правый пузырь Измените абсолютную ссылку на относительную с помощью клавиши F4

С помощью сочетания клавиш F4 мы можем легко переключить абсолютную ссылку на относительную. Для этого выполните следующие действия:

Поместите курсор за $ A $ 1, затем нажмите F4 три раза, он последовательно станет A $ 1, $ A1, A1. Смотрите скриншот:

Согласно этому шагу поместите курсор за $ B $ 1, чтобы получить B1.

И эта ссылка на ячейку станет относительной ссылкой из абсолютной ссылки.

Если необходимо изменить ссылки на ячейки нескольких формул, этот способ будет утомительным и трудоемким.


стрелка синий правый пузырь Измените абсолютную ссылку на относительную ссылку с кодом VBA

С помощью кода VBA вы можете быстро изменить диапазон ссылок на ячейки формул с абсолютных ссылок на относительные за один раз.

1. Выберите диапазон, который вы хотите изменить.

2. Нажмите разработчик > Визуальный Бейсик или вы можете нажать Alt + F11, откроется новое окно Microsoft Visual Basic для приложений, щелкните Вставить > Модули, и введите следующий код в Модули:
VBA: преобразование абсолютной ссылки в относительную.

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. Затем нажмите документ-абсолютный-относительный-6 Нажмите кнопку, чтобы запустить код, и появится окно подсказки для выбора диапазона для преобразования, затем нажмите OK, и откроется другое диалоговое окно с запросом, какой тип вы хотите использовать. Тогда вы сможете выбрать нужный вам тип. В этом примере я вставлю 4. См. Скриншоты:

4. Затем нажмите OK. Все выбранные абсолютные ссылки были заменены на относительные ссылки в формуле.

Это многофункциональный код VBA с этим кодом; вы также можете изменить абсолютную ссылку, изменить абсолютную строку или изменить абсолютный столбец.


стрелка синий правый пузырь Быстро изменить абсолютную ссылку на относительную с помощью Kutools for Excel

Kutools for Excel: с более чем 100 удобными надстройками Excel, которые можно бесплатно попробовать без ограничений в течение 30 дней. Получить сейчас

Kutools for Excel позволяют быстро и легко изменить абсолютную ссылку на относительную или наоборот. Пожалуйста, сделайте следующее:

Шаг 1. Выберите диапазон, содержащий формулы, ссылки на ячейки которых вы хотите изменить на листе.

Шаг 2. Нажмите Кутулс > Преобразовать ссылки. Он будет отображать Преобразование ссылок на формулы диалоговое окно. Смотрите скриншот:

Шаг 3. Проверьте К относительной и нажмите Ok or Применить в Справочник по формулам преобразования диалог. Это изменит абсолютную ссылку на относительную.

Если вы хотите изменить ссылки на ячейки на абсолютные столбцы или абсолютные строки, установите флажок В столбец абсолютный Вариант или Гребать абсолютное опцию.

Для получения более подробной информации о Преобразовать ссылку, Пожалуйста, посетите Описание функции Convert Reference.


Относительная статья:Заменить относительную ссылку на абсолютную


Лучшие инструменты для работы в офисе

Kutools for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%

  • Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма ...
  • Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон...
  • Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы... Предотвращение дублирования ячеек; Сравнить диапазоны...
  • Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор ...
  • Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое ...
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии...
  • Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом ...
  • Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF...
  • Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.
вкладка kte 201905

Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
офисный дно
Сортировать комментарии по
Комментарии (7)
Оценок пока нет. Оцените первым!
Этот комментарий был сведен к минимуму модератором на сайте
Спасибо большое, информативно и понятно.
Этот комментарий был сведен к минимуму модератором на сайте
Большое тебе спасибо. Описательная, легко воспринимаемая информация.
Этот комментарий был сведен к минимуму модератором на сайте
С помощью клавиши быстрого доступа F4 мы можем легко переключить абсолютную ссылку на относительную ссылку, пожалуйста, выполните //как// следующие шаги. Забыл упомянуть, что F4 не работал с моим Excel (Windows 7), но ваш макрос и приглашение в Kutools великолепны. Извините за повторные отправки, я думал, что код не работает.
Этот комментарий был сведен к минимуму модератором на сайте
Переключатель F4 работает во всех версиях. но вы ДОЛЖНЫ быть в режиме редактирования в первую очередь. Я всегда нажимаю F2 (переводит вас в режим редактирования), затем F4 для переключения между четырьмя вариантами.
Этот комментарий был сведен к минимуму модератором на сайте
Excel 2010. Я нажал «Отмена», когда появилось приглашение, но Excel все равно запустил сценарий, и мой компьютер завис на несколько часов. В любом случае у меня была выделена только 1 ячейка, поэтому, даже если скрипт запустился, почему он выполнялся так долго? [Теперь я понимаю, что, несмотря на нажатие кнопки «Отмена», код запустился и сделал каждую ячейку на листе относительной! :( ] Я назначал его кнопке формы, а не нажимал кнопку воспроизведения в окне VBA. Я использовал другие сценарии из KuTools и никогда не сталкивался с этой ерундой.
Этот комментарий был сведен к минимуму модератором на сайте
Wao Отлично, код VBA работает отлично, большое спасибо
Этот комментарий был сведен к минимуму модератором на сайте
Функция ConvertMyAddress(strRng As String) As String
Dim rngSelection As Range

Установите rngSelection = Application.Range(strRng)
'// Проверяем, пусто ли
Если rngSelection ничего не значит, выйти из функции

' 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
Здесь еще нет комментариев
Оставляйте свои комментарии
Публикация как гость
×
Оценить этот пост:
0   Характеристики
Предлагаемые места

Подписывайтесь на Нас

Copyright © 2009 - www.extendoffice.ком. | Все права защищены. Питаться от ExtendOffice, | Карта сайта
Microsoft и логотип Office являются товарными знаками или зарегистрированными товарными знаками Microsoft Corporation в США и / или других странах.
Защищено Sectigo SSL