单个xls格式的Excel转换成xlsx格式,相信大家都会,打开文件后选择菜单[文件]→[另存为],将弹出保存窗口的保存类型改为"Excel工作簿(*.xlsx),然后点击保存即可. 那么如果有很多xls格式Excel要做转换呢,当然是批量操作了,这就需要使用VBA代码 '***********访问当前文件夹下所有子文件夹及文件, Dim iFile(1 To 100000) As String Dim count As Integer Sub xls2xlsx() iPath = ThisWorkbook.Pat…