Excel VBA运行时错误'；1004'；：方法'；SaveAs'；对象的'_工作手册'；失败

当我在另一台电脑上使用宏文件时，我尝试保存分割的excel文件，并且运行宏代码将失败

运行时错误“1004”：对象“U工作簿”的方法“SaveAs”失败

VBA代码

Option Explicit

Const Target_Folder As String = "C:\OutputData\"
Dim wsSource As Worksheet, wsHelper As Worksheet
Dim LastRow As Long, LastColumn As Long

    Private Sub SplitWorksheet(ByVal Category_Name As Variant)
    Dim dif As Variant
    dif = "_DeviceInfo"
    
    Dim n As String
    n = String(5 - Len(Category_Name), "0") & Category_Name
    
    
    Dim wbTarget As Workbook
    Set wbTarget = Workbooks.Add
    With wsSource
        With .Range(.Cells(1, 1), .Cells(LastRow, LastColumn))
            .AutoFilter .Range("M1").Column, Category_Name
       .Copy

            'wbTarget.Worksheets(1).Paste
           
           wbTarget.Worksheets(1).Range("A1").Select
            Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
        True, Transpose:=True
           
            wbTarget.Worksheets(1).Name = Category_Name & dif
            wbTarget.SaveAs Target_Folder & n & dif & ".csv", 62
            wbTarget.Close False
            
        End With
        
    End With
    
    Set wbTarget = Nothing
    
End Sub

---

请帮助我解决此运行时错误1004

我将文件格式从

62

更改为

6

，现在可以使用了

wbTarget.SaveAs Target_Folder & n & dif & ".csv", 6

---

Target\u Folder&n&dif&“.csv”的计算结果是什么？
wbTarget.SaveAs Target\u Folder&n&dif&“.csv”，62
csv的文件格式是
xlCSV
，它的值是
6，而不是
62
@SiddharthRout
62
是UTF-8 csv。这不应该是问题