Supportnet / Forum / Tabellenkalkulation
Excel-Datei läßt sich nicht richtig speichern, weil im VBA-Code Activesheet angewendet wurde - und auch muß - was machen?
Frage
Hallo zusammen,
ich habe folgendes Problem:
Ich habe ein Programm in Excel geschrieben, in welchem ein Sheet immer wieder kopiert wird.
[code]s = "Fertigung"
On Error Resume Next
Sheets("Fertigung").Copy after:=ActiveSheet
ActiveSheet.Name = s[/code]
Somit erhalte ich folgende Sheets: Fertigung(1), Fertigung(2) etc
In allen Sheets muß der mitkopierte VBA-Code laufen. Deshalb hab ich im Code immer ActiveSheet anstatt Sheets("Fertigung") genommen.
Am Ende des Programmes möchte ich die ganze Datei speichern.
[code]Private Sub CommandButton2_Click()
Dim Dateiname As String
Dateiname = Application.InputBox(prompt:="Bitte Dateinamen eingeben:")
ActiveWorkbook.SaveAs Filename:="S:\...\" & Dateiname
ActiveWorkbook.Close
Application.DisplayAlerts = True
End Sub[/code]
Nun meckert Excel jedes Mal bei Speichern und Debuggt mir mein ActiveSheet.
Weiß jemand warum bzw. kann mir helfen?
Vielen Dank!
Catze
[*][sup][i]
*Threadedit*
Admininfo: bitte vermeide Mehrfachanfragen in verschiedenen, bzw. gleichen Gruppen. Siehe [u][url=https://supportnet.de/groupfaqs/3]FAQ 2.[/url][/u][/i][/sup]
Antwort 1 von Catze
Hab diese Frage übrigens auch im VB-Programmieren-Forum gestellt. Wußte nicht wo ich richtig bin, die iennen verweisen einen hier hin, die anderen zu den Programmierern...
Antwort 2 von DukeNT
Hi Catze,
Ist der Speicherpfad so richtig? "S:\...\"
Teste mal mit einem anderen Pfad. z.B. "C:\"
Gruß Niels
Zitat:
ActiveWorkbook.SaveAs Filename:="S:\...\" & Dateiname
ActiveWorkbook.SaveAs Filename:="S:\...\" & Dateiname
Ist der Speicherpfad so richtig? "S:\...\"
Teste mal mit einem anderen Pfad. z.B. "C:\"
Gruß Niels
Antwort 3 von Catze
Hallo Niels,
der Pfad ist richtig. Er speichert auch ab, wenn ich 100 mal auf beenden geklickt hab, wenn die Fehlermeldung kommt.
Grüße, Catze
der Pfad ist richtig. Er speichert auch ab, wenn ich 100 mal auf beenden geklickt hab, wenn die Fehlermeldung kommt.
Grüße, Catze
Antwort 4 von DukeNT
Welche Fehlermeldung gibt er denn aus, bzw. welche zeile markiert er dir als Fehler?

