我目前正在使用Excel中的一个项目来获取原始数据并将其放入表中。当前表格根据复制到其中的数据大小进行调整。我遇到的问题是,大部分故事都充满了基于数据的公式。我试图根据从数据中确定的大小将公式自动填充到表的末尾,并获得错误“范围类的自动填充方法失败”
ColNo = 26 + ((large - Year(Date)) * 4)
ColLet = Split(Cells(, ColNo).Address, "$")(1)
Sheets(sheetsSA).Range("V3:W4").AutoFill Destination:=Sheets(sheetsSA).Range("V3:W" & semi_end + 1)
****Sheets(sheetsSA).Range("X3:Y4").AutoFill Destination:=Sheets(sheetsSA).Range("X3:" & ColLet & semi_end + 1)****
主演的是提出问题的那一行。任何帮助将不胜感激。前两行找到自动填充中使用的列的字母。 感谢
答案 0 :(得分:0)
AutoFill
命令期望range参数的第一部分中的整个列宽。
这行代码应该有效:
Sheets(sheetsSA).Range("X3:" & ColLet & "4").AutoFill Destination:=Sheets(sheetsSA).Range("X3:" & ColLet & semi_end + 1)
此外,您可以使用`With End With Statement'
进行搜索With Sheets(sheetsSA)
.Range("V3:W4").AutoFill Destination:=.Range("V3:W" & semi_end + 1)
.Range("X3:" & ColLet & "4").AutoFill Destination:=.Range("X3:" & ColLet & semi_end + 1)
End With