设置一个范围,并在公式中使用该范围

我无法弄清楚如何在公式中使用set范围:

 set range = Application.InputBox(prompt:="test", Title:="test", Type:=8) Sheets("sheet1").Cells(3, 4).Formula = "=sum(range)" 

所有返回的是sum(range) ,而不是所选单元格的实际总和。

我试过range.address和其他一些变化无济于事。

你的公式是一个string,所以你需要连接你的范围地址到你的公式:

 Sheets("sheet1").Cells(3, 4).Formula = "=sum(" & range.Address & ")" 

但是,您应该为variables使用不同的名称,因为Range是Excel VBA中的内置types/函数。