VBA Excel公式化地将范围插入到公式中

Question

我有这样的代码。

wsModel.Range("C4").FormulaArray = "=MMULT(B11:L11,TRANSPOSE(B8:L8))"

但源数据并不总是相同的，行的长度也可能不同。(例如，代替L11和L8，我可能有AD11和AD8(

所以我试着写代码，但这不起作用

dataLastColumn = wsClose.Cells(1, Columns.Count).End(xlToLeft).Column
Set weightsRange = wsModel.Range("B11", wsModel.Cells(11, (dataLastColumn - 1)))
Set returnRange = wsModel.Range("B8", wsModel.Cells(8, (dataLastColumn - 1)))
wsModel.Range("C4").FormulaArray = "=MMULT(" & weightsRange & ",TRANSPOSE(" & returnRange & "))"

Answer 1

最后一行(未测试(试试这个…

wsModel.Range("C4").FormulaArray = "=MMULT(" & weightsRange.Address & ",TRANSPOSE(" & returnRange.Address & "))"