运行时错误'1004'-VBA中对象'_Global'的方法'Range'失败

Question

ActiveCell.FormulaR1C1 = "Y"
Range("B1").Select

Dim lastcellex As String

Range("A1").Select
Selection.End(xlDown).Select
ActiveCell.Offset(0, 1).Select

lastcellex = ActiveCell.Address
Range("B1").Select
Selection.AutoFill Destination:=Range("B1:lastcellex")

谁能帮我解决为什么继续出现此错误？ 我将变量设置为等于范围中的最后一个单元格，但超出了一列。 因此，如果列A中的范围是A55，lastcellex将是B55。 我正在尝试使其从B1：B55自动填充。

请让我知道你们的想法。

Answer 1

它应该是：

Selection.AutoFill Destination:=Range("B1:" & lastcellex)