Как ссылаться на именованную ячейку в Excel VBA - PullRequest
0 голосов
/ 10 апреля 2019

У меня есть 2 типа ячеек, к которым мне нужно получить доступ через код. оба названы ячейками. один - это ячейка с фиксированным столбцом и строкой ($ B $ 3). Я могу получить к нему доступ в коде, используя его имя => Range ("Montante"). Никаких проблем до сих пор. проблема заключается в том, что я пытаюсь получить доступ к другой ячейке под названием «LEntrada» с фиксированным столбцом, но не с фиксированной строкой, как ($ C8). Есть ли способ получить доступ к LEntrada в соответствии с ячейкой, в которой находится функция?

спасибо заранее.

Public Function QtdEntradaSimulado3() As Variant
    On Error GoTo TratarErro
    Dim qtdEntrada As Integer
    Dim Montante As Range
    Dim LEntrada As Range

    Application.Volatile True

    Set Montante = Range("Montante")
    Set LEntrada = Range("LEntrada")

    qtdEntrada = Fix((Montante / LEntrada) / 100) * 100
    QtdEntradaSimulado3 = IIf(qtdEntrada = 0, "", qtdEntrada)

Sair:
    Exit Function
TratarErro:
    QtdEntradaSimulado3 = ""
    GoTo Sair
End Function

1 Ответ

0 голосов
/ 10 апреля 2019

Объект Range () не смотрит на активную ячейку, чтобы определить, на что должен ссылаться именованный диапазон, но делает коллекцию Names ().Вы можете использовать его следующим образом:

    Set LEntrada = Names("LEntrada").RefersToRange

или если LEntrada была определена как Double:

    LEntrada = Names("LEntrada").RefersToRange.Value
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...