利用VBA将xls文件批量转为xlsx 2020-12-11

   利用VBA将xls文件批量转为xlsx

   对于单个xls文件，只需要利用“另存为"操作来更改文件格式就能够简单地完成，但是对于多个xls甚至是几十个xls文件时，这个工作量就比较麻烦了，因此需要借助exel开发工具中带有的VBA （Visual Basic宏语言），它是一种应用程式视觉化的 Basic 脚本，可以便捷地处理重复性的操作。

   在对xls进行处理之前，需要首先分辨一下文件格式

   由于部分xls可能是由txt格式文件直接更改文件后缀名得到的，这些xls文件中的记录数会超过2^16=65536（xls格式所支持的最大记录数）。

   这类直接改后缀名的文件在打开时可能会出现以下提示：

   在某些软件中如果读取该类xls文件，会出现超过65536部分的记录（即超过65536的行）丢失的情况，比如MATLAB中的xlsread来读取xls文件。但是如果将xls文件另存为xlsx格式后，由于xlsx格式支持的最大2^20=1048576行，可以完整保存xls中所有数据，在软件中读取时也不会出现数据丢失的情况。

对于单个xls文件：
 1.点击“文件”，然后选择“另存为”，并保存到桌面
 2.然后点击“保存类型”，选择“Excel工作簿（*.xlsx）”，然后点“保存"

对于多个xls文件：
利用VBA脚本进行处理，使用代码如下：

'*********