14.10.2022, 13:15
Ich möchte durch das Umbenennen (und wieder zurückbenennen) eines Verzeichnises prüfen, ob dieses geschlossen ist, da ich es anschließend verschieben möchte. Bei geschlossenem Verzeichnis funktioniert dies auch einwandfrei. Nun zu dem eigentlichen Problem.
Wenn das zu Verzeichnis geöffnet ist, füht dies immer zur Fehlermeldung "Laufzeitfehler 75", egal welche der beiden Feherbehandlungsmöglichkeiten ich wähle (vgl Skript). Ist es irgendwie möglich diesen Fehler sicher abzufangen?
Err = 0
'On Error GoTo ErrorHandler
On Error Resume Next
Name verz & "\01 Verzeichnis" As verz & "\011 Verzeichnis"
If Err <> 0 Then
MsgBox "Bitte Verzeichnis " & vbNewLine & verz & vbNewLine & "schließen und Makro neu starten."
Exit Sub
End If
Name verz & "\011 Verzeichnis" As verz & "\01 Verzeichnis"
Für einen Tip währe ich sehr dankbar.
Viel Güße, Georg
Wenn das zu Verzeichnis geöffnet ist, füht dies immer zur Fehlermeldung "Laufzeitfehler 75", egal welche der beiden Feherbehandlungsmöglichkeiten ich wähle (vgl Skript). Ist es irgendwie möglich diesen Fehler sicher abzufangen?
Err = 0
'On Error GoTo ErrorHandler
On Error Resume Next
Name verz & "\01 Verzeichnis" As verz & "\011 Verzeichnis"
If Err <> 0 Then
MsgBox "Bitte Verzeichnis " & vbNewLine & verz & vbNewLine & "schließen und Makro neu starten."
Exit Sub
End If
Name verz & "\011 Verzeichnis" As verz & "\01 Verzeichnis"
Für einen Tip währe ich sehr dankbar.
Viel Güße, Georg
