運行時錯誤5在宏中無效的過程調用

Question

我想使用宏導入文本文件，但我想得到錯誤5，無效的過程調用。我試圖錄制宏並重新運行，但它在「commandtype」行顯示錯誤。我找不到原因。任何幫助表示讚賞

Sub Macro1() 
' 
' Macro1 Macro 
' 

' 
Application.DisplayAlerts = False 
    With ActiveSheet.QueryTables.Add(Connection:= _ 
     "TEXT;C:\Users\491840\Desktop\IE11 scripts link.txt", Destination:=Range(_ 
     "$A$1")) 
     .CommandType = 0 
     .Name = "IE11 scripts link" 
     .FieldNames = True 
     .RowNumbers = False 
     .FillAdjacentFormulas = False 
     .PreserveFormatting = True 
     .RefreshOnFileOpen = False 
     .RefreshStyle = xlInsertDeleteCells 
     .SavePassword = False 
     .SaveData = True 
     .AdjustColumnWidth = True 
     .RefreshPeriod = 0 
     .TextFilePromptOnRefresh = False 
     .TextFilePlatform = 437 
     .TextFileStartRow = 1 
     .TextFileParseType = xlFixedWidth 
     .TextFileTextQualifier = xlTextQualifierDoubleQuote 
     .TextFileConsecutiveDelimiter = False 
     .TextFileTabDelimiter = True 
     .TextFileSemicolonDelimiter = False 
     .TextFileCommaDelimiter = False 
     .TextFileSpaceDelimiter = False 
     .TextFileColumnDataTypes = Array(1, 1, 1, 1, 1) 
     .TextFileFixedColumnWidths = Array(10, 17, 21, 16) 
     .TextFileTrailingMinusNumbers = True 
     .Refresh BackgroundQuery:=False 
    End With 
Application.DisplayAlerts = True 

End Sub 

Answer 1

我認爲它試圖做一個不兼容的文件類型的過程。嘗試刪除commmandtype行然後重新運行。希望那作品