范围类别的自动填充方法尝试粘贴公式失败

Question

我正在创建一个Excel文件，并在特定的单元格（例如G8）上写了一个公式，将要复制的公式复制到行尾（GI8），我试图使用AutoFill方法但这给了我一个错误。

这是我的代码

Dim src = oBook.Worksheets(2).Range(“G8”)
Dim rng = oBook.Worksheets(2).Range(“H8:GI8”)

src.AutoFill(Destination:=out, Type:=Excel.XlAutoFillType.xlFillCopy)

我做错了什么，我该如何解决？

Answer 1

每Microsoft's Documentation，您的目标范围也必须包括源范围。因为您的rng = oBook.Worksheets(2).Range(“H8:GI8”)和Dim src = oBook.Worksheets(2).Range(“G8”)不会重叠。尝试使您的rng重叠，如下所示。

rng = oBook.Worksheets(2).Range(“G8:GI8”)