Вставка и оценка столбца в таблице - PullRequest
0 голосов
/ 20 января 2020

Я пытаюсь добавить формулу в столбец, но она просто сохраняется как текст и не обрабатывается, и если я добавлю знак "=", она вернет ошибку. Есть ли способ сказать Excel, чтобы оценить полный столбец в конце или даже лучше, есть ли правильный способ написать формулу?

    Dim arreglo_formulas() As Variant
    'If Error, Index, Match in spanish excel, I get an error if I add "=" before the plus sign
    arreglo_formulas() = Array("+SI.ERROR(INDICE(CASOS_ESPECIALES[Saldo Proyección];COINCIDIR([@Llave];CASOS_ESPECIALES[Llave];0));[@[Distribución]]*[@[Saldo Balance Sheet]])")
    Call AgregaFilas(table_name, arreglo_formulas)

    Sub AgregaFilas(ByVal nombre_tabla As String, arrData As Variant)
        Dim Tbl As ListObject
        Dim NewRow As ListRow
        Set Tbl = Range(nombre_tabla).ListObject
        Set NewRow = Tbl.ListRows.Add(AlwaysInsert:=True)

        ' Handle Arrays and Ranges
        If TypeName(arrData) = "Range" Then
            NewRow.Range = arrData.Value
        Else
            NewRow.Range = arrData
        End If

    End Sub

Самая большая проблема в том, что этот код работает, но формула не оценивается так что мне нужно go строка за строкой, «нажав ввод», чтобы оценить его.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...