---

Hallo

Wie lautet in VBA der Befehl für die Attributanzeige = Normal

Danke im voraus!

Karl01

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Sub Example_SetVariable()
    ' This example sets various system variables, each of
    ' a different data type.
   
    Dim sysVarName As String
    Dim sysVarData As Variant
    Dim DataType As Integer
   

    Dim intData As Integer
    sysVarName = "ATTMODE"
    intData = 1
    sysVarData = intData    ' Integer data
    ThisDrawing.SetVariable sysVarName, sysVarData       
End Sub

------------------
- Thomas -
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Thomas

Danke für die schnelle Antwort, funktioniert super

Karl

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP