2021-07-20批量将xlsx文件转换成csv格式

python读取xlsx格式的excel表格太慢，读取csv的却很快，批量把xlsx文件转换成csv格式读取文件

1.新建一个excel表格
2.打开“开发工具”
路径：文件》选项》自定义功能区》开发工具》确定



打开开发工具，查看代码，把下面的改代码贴入代码框
需要修改2点，第一是源文件地址，第二是文件保存的位置
然后运行代码

Sub SaveToCSVs()
    Dim fDir As String
    Dim wB As Workbook
    Dim wS As Worksheet
    Dim fPath As String
    Dim sPath As String
    fPath = "C:\Users\qiany\Desktop\文件\"
    sPath = "C:\Users\qiany\Desktop\csv保存位置\"
    fDir = Dir(fPath)
    Do While (fDir <> "")
        If Right(fDir, 4) = ".xls" Or Right(fDir, 5) = ".xlsx" Then
            On Error Resume Next
            Set wB = Workbooks.Open(fPath & fDir)
            'MsgBox (wB.Name)
            For Each wS In wB.Sheets
                wS.SaveAs sPath & wB.Name & ".csv", xlCSV
            Next wS
            wB.Close False
            Set wB = Nothing
        End If
        fDir = Dir
        On Error GoTo 0
    Loop
End Sub