Einer meiner Mitarbeiter hat 9 Excel-Arbeitsmappen, die einen Produktionsserver abfragen, die Daten organisieren und .mht-Dateien als „Dashboards“ für Produktionsmitarbeiter ausgeben.
Manche fragen alle 3 Minuten ab, manche nur stündlich.
Wir sehen 2 allgemeine Fehler.
Dieses hier
und das hier
die tatsächlich nach einem „Ungültige Webabfrage“-Fehler mit nur einer „OK“-Schaltfläche erscheint.
Dies stellt derzeit kein wirkliches Problem dar, da es selten vorkommt und nur, wenn die gelesene Datei gesperrt ist.
Der erste Fehler tritt nur beim Speichern auf, wenn die Zieldatei gesperrt ist. Ich habe Application.DisplayAlerts = False
vor jedem Speichern in jedem Buch ein Makro eingefügt, aber der obere Fehler wurde dadurch nicht behoben.
Ich habe versucht, eine Zwischendatei in das Durcheinander einzufügen, aber es hat sich keine Verbesserung ergeben.
Heute habe ich versuchtdies in AutoITund es kann den zweiten Fehler beheben, schlägt aber bei jeder (da bin ich mir ziemlich sicher) Kombination von „Tasten“ fehl, wie der Autor es ausdrückt.
Es funktioniert, wenn ich es allgemein nach Excel suchen lasse, aber das zerstört auch mein Tabellenblatt.
Ich kann jedes Mal auf „Nicht anzeigen…“ klicken und tue dies auch. Wenn wir jedoch Updates auf diesen Computer übertragen und ihn neu starten, treten diese Fehler erneut auf und es kann Tage dauern, bis alle Konflikte angezeigt werden.
Was kann ich tun, um das Problem zu beheben?
Antwort1
Mögliche Testlösung: ActiveWorkbook.Save mit der folgenden If-Anweisung umgeben und ein weiteres Sub zum Anhalten verwenden.
Sub PUBLISH()
'Call TIME
Application.DisplayAlerts = False
If GetAttr("Z:\CHGME\_Production Scheduling\ADMIN\7 Day WIP.mht") And vbReadOnly Then
Application.Run "Sheet1.WAITtoPUBLISH"
Else
ActiveWorkbook.Save
End If
End Sub
`Private Sub WAITtoPUBLISH()
Application.OnTime Now() + TimeValue("00:00:30"), "PUBLISH"
End Sub
Es hält jetzt seit 2 Tagen. Ich kann es mit dem richtigen Timing immer noch brechen, daher ist die Option „Warten bis zum Schließen“ möglicherweise die langfristige Lösung.