none
Access VBA keine Rückmeldung beim öffnen von Excel Dateien, die eine Messagebox mit einer Fehlermeldung anzeigen RRS feed

  • Frage

  • Hallo,

    ich habe ein VBA Script, mit denen ich bestimmte Verbindungsdaten in einer Liste von Excel Dateien suche.
    Leider kommt es immer mal wieder vor, dass diese Excel Dateien beim Öffnen Message Boxen auf machen, die mir einen Fehler oder andere Meldungen anzeigen.
    Beim Öffnen in VBA wird der Befehl nicht beendet und das Script hängt sich quasi auf.
    Gibt es eine Möglichkeit solche Fehlermeldungen beim Öffnen einer Excel Datei mit VBA zu unterdrücken uoder diese abzufangen?

    Set oAppXL = CreateObject("Excel.Application")
            
    oAppXL.workbooks.Open fileNamePath, True

    Hier bleibt das Script hängen:

    oAppXL.workbooks.Open

    Hat jemand eine Idee, wie ich das Problem in den Griff bekommen kann?

    Gruß

    cheapy

    Mittwoch, 5. August 2020 13:54

Alle Antworten

  • https://www.computerwissen.de/office/excel/artikel/warnmeldungen-per-vba-abschalten.html

    Für dich also:

    oAppXL.DisplayAlerts = False

    Dies sollte funktionieren. Du must dann aber Fehler mit Try/Catch abfangen.

    Solche Fehler können allerdings auchvorher abgefangen werden:
    https://docs.microsoft.com/de-de/dotnet/api/system.io.file.exists?view=netcore-3.1


    Mittwoch, 5. August 2020 14:16