【VBA】常用代码--四舍五入

Sub Sswr()Dim i As Integer, j As IntegerFor i = 2 To 16 For j = 2 To 4 Cells(i, j) = Application.WorksheetFunction.Round(Cells(i, j), 2) Next j Next iMsgBox "OK!!"End Sub这里为什么不用自带的round()函数,而是调用excel自

- 阅读全文 -