Excel GoalSeekmacros不起作用

任何人有任何build议如何解决这个macros。 一个编译错误不断出现,突出显示偏移量函数,并说未定义的子或函数。

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

您没有正确使用Offsetfunction。

从MS网站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