☰

在表中动态使用范围函数；VBA

tag-icon • tag-icon vba microsoft-excel-2013
在表中动态使用范围函数；VBA

我有一个函数，用于将公式粘贴到表格的某个范围内。

有没有办法动态选择范围。例如，如果调整了表格大小或者插入了行或列？

即，如果我在表格上方插入一行，并且“E27”变成“E28”，有没有办法动态改变单元格引用？

我的代码：

Function InnOtra()

    Dim strFormulas(1 To 1) As Variant

    With ThisWorkbook.ActiveSheet

        strFormulas(1) = "=IFERROR([@[Inn Otra kampanje]]*((1-[@[% Enhetspris kunde]])),""-"")"
        .Range("E27").Formula = strFormulas
        .Range("E27:E64").FillDown

    End With

End Function

干杯!

答案1

是的。

您可以使用类似这样的方法：

.Range(Range("E27"),Range("E27").End(xlDown))

进一步阅读：https://msdn.microsoft.com/en-us/library/office/ff839539.aspx

另外你不需要使用FillDown，可以在一行中完成所有操作：

.Range(Range("E27"),Range("E27").End(xlDown)).Formula = strFormulas

相关内容