如何将此值提取到2位小数？

Question

dub = Application.Sum（wb.Sheets（＆＃34; Sheet1＆＃34;）。range（＆＃34; A：A＆＃34;））

我试过.numberformat＆＃34; 0.00＆＃34;并将变量类型设置为double，没有运气。

提前致谢。

Answer 1

尝试：

dub = Round(Application.Sum(wb.Sheets("Sheet1").range("A:A")),2)

Round（数字，精度）函数根据指定的精度对数字进行舍入。

希望我帮助过你！