Thema Datum  Von Nutzer Rating
Antwort
Rot Fehlermeldung nach VBA-"Speichern unter"
 17.06.2023 11:36:52 Daniel
NotSolved
17.06.2023 11:43:47 Daniel
NotSolved
18.06.2023 13:34:23 ralf_b
NotSolved
18.06.2023 17:20:57 Gast01287
NotSolved
18.06.2023 18:09:40 Daniel
NotSolved
19.06.2023 10:15:19 Gast01
Solved
30.06.2023 14:29:16 Daniel
NotSolved
19.06.2023 19:28:22 ralf_b
NotSolved

Ansicht des Beitrags:
Von:
Daniel		 Datum:
17.06.2023 11:36:52		 Views:
401		 Rating:
     
Antwort:
  Ja
Thema:
Fehlermeldung nach VBA-"Speichern unter"

Hallo zusammen,

folgender Code ruft das "speichern unter" Fenster auf, was auch gut klappt. Wenn ich die Datei dann aber schließe und neu öffne, kommt folgende Fehlermeldung für die ich keine Lösung finden kann. Verwendet wird Excel 2019. Vielleicht weiß hier jemand Rat.

Schönes Wochenende
Daniel

Die Datei abc.xlsx kann von Excel nicht geöffnet werden da das Dateiformat oder doe Dateierweiterung ungültig ist. Überprüfen Sie, ob die Datei beschädigt ist und ob die Dateierweiterung dem Dateiformat entspricht!

Public Sub Grobplanung_saeubern()
...
    Set wb = ActiveWorkbook
    Set ws = wb.Sheets("Teilnehmerliste")
...

    ' Prompt the user to save the file
    With saveFileDialog
        .InitialFileName = savePath & saveFileName & ".xls"
        .Title = "Save As"
        '.Filter = "Excel Files (*.xlsx), *.xlsx"
        .ButtonName = "Save"
        .AllowMultiSelect = False
        
        ' Display the Save As dialog box
        If .Show = -1 Then
            ' Get the chosen file name and format
            saveFileName = .SelectedItems(1)
            
            ' Save the workbook with the chosen file name and format
            Application.DisplayAlerts = False ' Disable alerts
            wb.SaveAs saveFileName
            Application.DisplayAlerts = True ' Enable alerts
            
        Else
            MsgBox "File not saved.", vbInformation
            Exit Sub
        End If
    End With

End Sub

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Fehlermeldung nach VBA-"Speichern unter"
 17.06.2023 11:36:52 Daniel
NotSolved
17.06.2023 11:43:47 Daniel
NotSolved
18.06.2023 13:34:23 ralf_b
NotSolved
18.06.2023 17:20:57 Gast01287
NotSolved
18.06.2023 18:09:40 Daniel
NotSolved
19.06.2023 10:15:19 Gast01
Solved
30.06.2023 14:29:16 Daniel
NotSolved
19.06.2023 19:28:22 ralf_b
NotSolved