Excel GoalSeek 宏不起作用

Question

任何人都对如何修复此宏有任何建议。编译错误不断出现，突出显示偏移函数并说未定义子或函数。

Worksheets("Testing").Range(Offset(K51, 0, C41)).GoalSeek _
Goal:=0, _
ChangingCell:=Worksheets("Testing").Range(L58)

Answer 1

您没有正确使用Offset 函数。

来自微软网站https://msdn.microsoft.com/en-us/vba/excel-vba/articles/range-offset-property-excel

expression . Offset( RowOffset , ColumnOffset )

例子

Worksheets("Sheet1").Activate 
ActiveCell.Offset(rowOffset:=3, columnOffset:=3).Activate