Относительный адрес ячейки в макросах Excel - VBA

Узнай цену своей работы

Формулировка задачи:

Добрый день! Чтобы присвоить ячейке значение из макроса пишу так: Cells(1,1).Value="АБВГД" или Range("A1").value="АБВГД" Есть ли способ сделать, чтобы когда пользователь вставил перед нужной нам ячейкой из макроса произвольное количество строк или столбцов, то в макросе автоматически изменялся этот адрес "А1" ?

Решение задачи: «Относительный адрес ячейки в макросах Excel»

textual
Листинг программы
  1. Sub test()
  2.    'В ячейку A1 запишем текст "АБВГД"
  3.   Range("A1").Value = "АБВГД"
  4.    'Присвоим ячейке A1 имя "МояЯчейка"
  5.   ActiveWorkbook.Names.Add Name:="МояЯчейка", RefersToR1C1:="=Лист1!R1C1"
  6.    'Юзер вставил строку. A1 сместится ниже, но у неё теперь есть имя, _
  7.    по которому можно делать с ней, что угодно.
  8.   Rows("1:1").Insert
  9.    'В ячейку с именем "МояЯчейка" запишем текст "ДГВБА"
  10.   [МояЯчейка] = "ДГВБА"
  11.  End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

5   голосов , оценка 4 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут