Runtime 1004 Fehler Hilfe erforderlich

Was ist das Problem mit dem Code unten? Ich erhalte den Laufzeitfehler 1004.Runtime 1004 Fehler Hilfe erforderlich

Sub Save_CSV() 
' 
' Save_CSV Macro 
' 

' 
     Columns("A:K").Select 
     Selection.Copy 
     Workbooks.Add 
     Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,  SkipBlanks _ 
     :=False, Transpose:=False 
    Application.CutCopyMode = False 
    ThisWorkbook.SaveAs Filename:= _ 
     "G:\Business & Facility\Finance\Finance Documents\Payroll Journal\EH Payroll Journal IMPORT.csv" _ 
     , FileFormat:=xlCSV, CreateBackup:=False 
    Windows("EH Payroll Journal TEMPLATE Xero.xlsm").Activate 
End Sub

Quelle

2017-03-07 Iona

Es ist unklar, in welcher Zeile Sie den Fehler 1004 erhalten. Aber es gibt einige Dinge in Ihrem Code, die Sie beheben können, die Ihnen helfen, diesen Fehler und andere zu vermeiden ... lesen [this] (http://stackoverflow.com/documentation/excel-vba/1107/vba- Best-Practices/9292/Vermeiden-Verwenden-Wählen oder Aktivieren # t = 201703070253108353635) und [dies] (http://StackOverflow.com/Documentation/Excel-VBA/1107/VBA-Best-Practices/11274/Always -define-and-set-Referenzen-zu-allen-Arbeitsmappen-und-Blätter # t = 201703070253108353635). – PeterT

ThisWorkbook Unter der Annahme, „EH Lohnjournal TEMPLATE Xero.xlsm“, dann, wenn Sie die ThisWorkbook.SaveAs Sie nicht mehr getan haben, wird das Fenster aktivieren enthält es, weil Sie es als „EH Lohnjournal gespeichert haben IMPORT.csv ".

Sie möchten wahrscheinlich stattdessen eine ActiveWorkbook.SaveAs erstellen, um die neu hinzugefügte Arbeitsmappe zu speichern, in die Sie Daten kopiert haben.

Quelle

2017-03-07 03:44:41 YowE3K

Runtime 1004 Fehler Hilfe erforderlich

Antwort

Verwandte Themen