2016-03-01 117 views
1

在Excel 2016年,我試圖單獨的表保存爲Excel中的CSV和我不斷收到VBA:運行時錯誤「424」:當儲蓄CSV Error對象在Mac上需要

「運行時錯誤‘424’:所需的對象」錯誤或運行時錯誤:「1004」

我已經搜索漫長而艱難的,但根本無法找到一個合適的答案/修復:

錯誤line in bold

Sub AV_Guest_Macro( ) ' ' AV_Guest_Macro宏

LastRow = Range("aa1").Value 

'複製公式

Range("L2:U2").Copy 
Range("L3:U" & LastRow).Select 
ActiveSheet.Paste 


RowCheck = 2 

Do Until RowCheck > LastRow 

' 刪除有重複的電子郵件 行如果範圍( 「N」 & RowCheck).value的= 「排除」 然後 範圍( 「X」 & RowCheck).EntireRow.Delete

LastRow = LastRow - 1 

Else 'this row will be imported 
    RowCheck = RowCheck + 1 

End If 

個環路

Application.DisplayAlerts =假

CurrentWorkbook.Sheets( 「用戶」)另存爲文件名:= _ 「\用戶\ Jhartley416 \桌面\ JB_Test \ AV_Users_Update_2016」 _ ,的FileFormat:= 6 ,CreateBackup:=假

Application.DisplayAlerts =真

ActiveWorkbook.Save 
ActiveWorkbook.Close 


Windows("AB JB Template - JLH2.xlsm").Activate 
Sheets("Users").Activate 

Sheets("Users").Range("A4:U10000").ClearContents 
Range("A1").Select 

結束子

+0

我使用Excel的舊版本,但這樣或許真的改變了,但在我的版本,你會使用'ThisWorkbook'不' CurrentWorkbook'。我沒有看到CurrentWorkbook在任何地方聲明。你有'Option Explicit'嗎? – Sobigen

回答

0

引用選定的工作簿正確的方法是ActiveWorkbook而不是CurrentWorkbook:

ActiveWorkbook.SaveAs Filename:= _ "\Users\Jhartley416\Desktop\JB_Test\AV_Users_Update_2016" _ , FileFormat:=6, CreateBackup:=False 
+0

我也這麼認爲,但測試過它,顯然你可以保存一張工作表。 – Sobigen

相關問題