Формула относительно ячейки, вызывающая формулу в Excel

Question

Я использую Excel XP. Моя проблема в том, что я написал очень короткую функцию, чтобы упростить одну задачу.

Код следующий:

Function getLastValue() as Integer
  getLastValue = ActiveCell.End(xltoLeft).Value
End Function

Затем я хочу заполнить, перетащив эту ячейку вниз, но та же самаязначение будет скопировано, независимо от того, какое значение появляется в каждой строке. Поэтому я хотел сделать это относительно ячейки, вызывающей функцию, чтобы она перешла к ближайшей левой ячейке, имеющей значение, и скопировал ее в ячейку, вызывающую функцию.

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

Answer 1

Application.Caller - это то, что вы хотите. Вам также понадобится Application.Volatile, чтобы обновить формулу при изменении вашего рабочего листа.

---

Function getLastValue() As Integer
  Application.Volatile
  getLastValue = Application.Caller.End(xlToLeft).Value
End Function