Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 14:59:21
Zellformel in VBA
23.04.2024 14:47:39
Formel SVERWEIS
23.04.2024 14:27:08
Excel - Zellen verketten anhand anderer Spalte
23.04.2024 14:23:45
Gehe zu Tabellenblatt
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1212to1216
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1212to1216
1212to1216
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Schreibgeschützte Datei löschen

Schreibgeschützte Datei löschen
Andre´
Hallo alle zusammen,
mit nachfolgenden Makro kann man die gerade geöffnete Datei löschen:
Sub Loeschen()
Application.DisplayAlerts = False
ThisWorkbook.ChangeFileAccess xlReadOnly
Kill ThisWorkbook.FullName
Application.DisplayAlerts = True
ThisWorkbook.Close False
End Sub
Wie kann ich schreibgeschützte Dateien löschen.
Vielen Dank im Voraus!
MFG Andre

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Schreibgeschützte Datei löschen
03.05.2011 12:44:48
Hajo_Zi
Hallo Andre,
eine schreibgeschützte Datei vermute ich mal hat ein andere auf. Da kannst Du nicht löschen dazu mußt Du schon Exlusiv die Datei haben.

AW: Schreibgeschützte Datei löschen
03.05.2011 14:01:52
Andre´
Hallo Hajo,
ich habe zu Testzwecken eine Exceldatei gespeichert und beim Attribut Schreibgeschützt angehakt.
Dann habe ich die Datei geöffnet und in der Kopfzeile von Excel stand auch:
Userbild
und habe dann manuell im Explorer die Datei gelöscht, was auch funktionierte.
Also muss es doch auch mit einem Makro möglich sein!
MFG Andre
Anzeige
AW: Schreibgeschützte Datei löschen
03.05.2011 14:23:27
Hajo_Zi
Hallo Andres,
Du hatttest nicht geschrieben wodurch der schreibschutzt entsteht, da bin ich davon ausgegangen das jemand anderes Sie auf hat. Das was Du jetzt beschreibst ist was anderes.
Ich habe keine Lösung.
Gruß Hajo
AW: Schreibgeschützte Datei löschen
03.05.2011 15:04:17
Nepumuk
Hallo,
na dann heb das Attribut wieder aus:
Sub Loeschen()
    With ThisWorkbook
        SetAttr .FullName, vbNormal
        Kill .FullName
        .Close False
    End With
End Sub

Gruß
Nepumuk
Anzeige
Vielen Dank, funktioniert prima:-)) o.T.
03.05.2011 17:33:30
Andre´

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige