尝试使用Round（）函数时抛出错误

Question

dimension = dimension + CStr(Round(Cells(i, 6).Value, 1)) + """Hx"

我正在尝试对单元格值进行舍入，然后将该值转换为字符串，如上所示。我正在处理的代码完美无缺，直到我尝试舍入单元格值。它抛出了类型不匹配错误，我不知道为什么。我甚至试图将单元格值转换为Double和Long（尽管它应该已设置为Long）。任何帮助将不胜感激。