如何使用VBA在Excel中find一系列单元格的产品?

我想用excel获得一系列单元格值的乘积,使用VBA。

我有一个select,例如:(那工程)

ActiveSheet.Range(Cells(i, j), Cells(i, z)).Select 

我想把一个范围的产品放在另一个单元中,但是这不起作用:

 'Range("X10").Formula = "=PRODUCT(Range(Cells(i, j),Cells(i, z)))" 

帮助真的很感激,提前致谢!

 Range("X10").Formula = "=PRODUCT(" & Cells(i, j).Address & ":" & Cells(i, z).Address & ")"