ich bin bei einem Problem an meine Grenzen gestoßen und nachdem ich auch nach mehreren Versuchen mit Lösungsansätzen aus dem Forum nicht mehr weiterweiss poste ich diesen Beitrag und hoffe auf eure Hilfe!
Ich habe einen Urlaubsantrag erstellt der mittels einer Userform funktioniert und in unserem Intranet abgespeichert ist. Der User ruft den Antrag auf, er trägt seine Werte ein und schließt anschließend den Antrag in dem er auf der Userform einen Button klickt mit dem folgenden Code:
Sub Beenden()
Unload Url_Buchen
Application.DisplayFullScreen = False
Application.DisplayFormulaBar = True
Application.DisplayAlerts = False
Application.ScreenUpdating = True
If Application.Workbooks.Count = 1 Then Application.Application.Quit
Application.DisplayAlerts = False
ActiveWorkbook.Close
End Sub
Wenn ich es lokal teste, geht alles gut. Wenn kein anderes Workbook geöffnet ist schließt Excel ansonsten wird nur der Antrag geschlossen und das ohne speichern.
Sobald ich es im Intranet teste erscheinen immer die folgenden Fehlermeldungen:
"Could not open res://c:\winnt\system32\shdoclc.dll/dnserror.htm"
Als mögliche Fehlerursachen erhalte ich in einer weiteren Fehlermeldung, dass der Pfad evtl. nicht vorhanden ist, das workbook gerade verwendet wird oder nur read only verfügbar ist.
Habe das Schließen im Intranet mit Step Into getestet. Wenn ich das Schließen Schritt für Schritt durchführe klappt es wunderbar aber sobald ich es automatisch durchlaufen lasse erscheint die Fehlermeldung und eine neue Datei mit dem Namen *****(1).xls wird erzeugt. Was kann ich dagegen tun??
Könnt ihr bitte einen Tip geben, wie ich Excel mittels Makro dazu bringen das Aktive Workbook zu schließen ohne zu speichern und ohne das dieser Fehler im Intranet auftaucht.
Vielen Dank !! LG Andi:-)