Die `SetAttr`-Anweisung in VBA (Visual Basic for Applications) wird verwendet, um die Attribute einer Datei oder eines Verzeichnisses zu ändern. Mit dieser Anweisung können Sie eine Datei als schreibgeschützt, versteckt, Systemdatei oder normal festlegen. Hier ist eine grundlegende Anleitung zur Verwendung von `SetAttr`:
Syntax
SetAttr pathname, attributes
- pathname: Ein String-Ausdruck, der den Pfad zur Datei oder zum Verzeichnis angibt, deren/dessen Attribute Sie ändern möchten.
- attributes: Ein Integer-Ausdruck, der die neuen Attribute angibt.
Attribute Konstante
Die Attribute können eine Kombination der folgenden VBA-Kontanten sein:
- `vbNormal` (0): Normal (keine Attribute gesetzt).
- `vbReadOnly` (1): Schreibgeschützt.
- `vbHidden` (2): Versteckt.
- `vbSystem` (4): Systemdatei.
- `vbArchive` (32): Archiv – wird verwendet, um darauf hinzuweisen, dass die Datei gesichert wurde oder gesichert werden soll.
Sie können diese Konstanten addieren, um mehrere Attribute gleichzeitig zu setzen.
Beispiel
Hier ist ein einfaches Beispiel, wie man die Anweisung `SetAttr` verwendet, um eine Datei als schreibgeschützt und versteckt zu markieren:
Sub SetFileAttributes()
Dim filePath As String
filePath = "C:Beispielpfaddatei.txt"
' Setze die Dateiattribute auf schreibgeschützt und versteckt
SetAttr filePath, vbReadOnly + vbHidden
End Sub
In diesem Beispiel wird der Datei “datei.txt” im angegebenen Pfad der Status “schreibgeschützt” und “versteckt” zugewiesen.
Hinweis
- Stellen Sie sicher, dass der angegebene Pfad korrekt ist und dass der Benutzer über die entsprechenden Berechtigungen zum Ändern der Datei- oder Verzeichnisattribute verfügt.
- Wenn Sie versuchen, eine Datei oder ein Verzeichnis mit einem Pfad zu ändern, der nicht vorhanden ist, wird ein Laufzeitfehler auftreten.
Mit dieser Anleitung sollten Sie in der Lage sein, die `SetAttr`-Anweisung in VBA effektiv zu verwenden.
Unlock Your Potential
Excel
Access
Power BI
