设置单元格的格式：objImportSheet.Cells(i, 1) .NumberFormatLocal = "0.0" objImportSheet.Cells(i, 2).NumberFormatLocal = "0.000E+00"下面的都一样。
用int函数
