Question

我需要计算变量范围内的列数，并使用最后一列的地址构成定义范围的一部分。一旦我定义了范围，我就想输入一个公式。有人可以帮忙吗？

实施例

Dim lastcolumn as string

Lastcolumn = sheet("test").range("a1").end(xltoright).column

Sheets("test").range("b1:" & lastcolumn).select

Selection.formula = "myformula"

Answer 1

该列返回的数字不是单元格，因此您需要提供更多信息。您需要使用Cells()。

同时避免使用选择它会减慢代码：

Dim lastcolumn as Long

Lastcolumn = sheets("test").range("a1").end(xltoright).column

Sheets("test").range("b1",Sheets("test").Cells(1,lastcolumn)).formula ="myformula"

Answer 2

你可以摆脱lastColumn计算（并打扰它的类型......）

With Sheets("test")
    .Range("B1", .Range("A1").End(xlToRight)).Formula = "myformula"
End With

如何在excel中定义变量字符串范围

2 个答案: