打開csv文件會導致VBA代碼中的中斷模式

Question

我試圖在我的vba代碼中打開一個csv文件，但在打開文件后出現錯誤“無法在中斷模式下執行”

Sub extern_rd_grab()
Dim file_name2
Dim wb As Workbook
Dim sheet_name As String
Dim sCSVFullName As String
Dim sWbkFullName, sFileRoot As String
Application.ScreenUpdating = False
Sheets("Round Scores").Select

For x = 1 To 23:
    file_name1 = "2015-R" & x & "_TSstat.csv"
    sFileRoot = Left$(file_name1, InStrRev(file_name1, ".") - 1)
    sWbkFullName = sFileRoot & ".xlsx"
    file_name2 = "C:\Users\Sean\Desktop\2015 Stats\" & file_name1
    Workbooks.Open Filename:=file_name2
    Set wb = ActiveWorkbook
    wb.SaveAs sWbkFullName, xlWorkbookDefault
Next

使用Workbooks.Open命令打開文件后出現錯誤

Answer 1

@PaulvdElst你的回答似乎是最接近問題的描述。 我接受在VBE中使用F5作為解決方案