Supportnet Computer
Planet of Tech

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,
Zitat:
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

Antwort 4 von DukeNT

Welche Fehlermeldung gibt er denn aus, bzw. welche zeile markiert er dir als Fehler?

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: