Knop vergrendelen

[Jack Nouws]

Hallo

Hoe kun je een knop uit de werkset Formulierbesturingselementen op vergrendelen zetten of verbergen?

Met vr gr
Jack

 

[trucker10]

verbegen kan je met een macro de naam van het besturingselement en daar Visible = false

 

[krolik]

Zet onder properties : Enabled = False

 

[Jack Nouws]

verbegen kan je met een macro de naam van het besturingselement en daar Visible = false

Dank je Trucker 10

Met deze code is het mij gelukt om een knop van Formulierbesturingselementen te verbergen.

Sub tts()
Sheets("Blad1").Shapes("Knop 4").Visible = False
End Sub

En met deze code dacht ik om een knop van Formulierbesturingselementen te vergrendelen, maar dat werkt dus blijkbaar niet. Weet jij misschien wel de juiste code om deze knop te vergrendelen?

Sub ttt()
Sheets("Blad1").Shapes("Knop 4").Enabled = True
End Sub

Met vr gr
Jack

 

[krolik]

Sheets("Blad1").Shapes("Knop 4").Enabled = True moet zijn : ...Enabled = False

 

[Jack Nouws]

Sheets("Blad1").Shapes("Knop 4").Enabled = True moet zijn : ...Enabled = False

Als ik met deze code een knop wil vergrendelen krijg ik een foutmelding, nl: Deze eigenschap of methode wordt niet ondersteund door dit object. Dus dan zal de vormgeving van de code niet goed zijn.

Sub ttt()
Sheets("Blad1").Shapes("Knop 4").Enabled = False
End Sub

Met vr gr
Jack

 

[trucker10]

Als ik met deze code een knop wil vergrendelen krijg ik een foutmelding, nl: Deze eigenschap of methode wordt niet ondersteund door dit object. Dus dan zal de vormgeving van de code niet goed zijn.

Sub ttt()
Sheets("Blad1").Shapes("Knop 4").Enabled = False
End Sub

Met vr gr
Jack

Jack ik denk dat je naar Oleobject ( , ) of zo moet ,ik werk steeds met activex knoppen om deze problemen te voorkomen

 

[krolik]

Wat is dit voor een knop? Gemaakt met : Insert >Shape? Of met ingebouwde VB?

 

[krolik]

Het zal n.l. alleen werken met een 'VB-knop'.

 

[krolik]

Sub tts()
CommandButton1.Enabled = False
End Sub
Sub ttt()
CommandButton1.Enabled = True
End Sub

Dit werkt, heb ik uitgeprobeerd. (Zie 1e antwoord van Trucker10)

 

[Jack Nouws]

Ok ik zal mijn knoppen wel veranderen naar activex knoppen.
Ik dacht dat het met de knoppen van Formulierbesturingselementen ook zou werken maar dat is niet zo.

Bedankt allen voor het reageren. :thumb:

Met vr gr
Jack

 

[snb]

Je had dit topic natuurlijk al bekeken ?

 

[trucker10]

Je had dit topic natuurlijk al bekeken ?

Deze staat al ruime tijd bij mijn favorieten als geheugen steun(tje) :thumb:

 

[Jack Nouws]

Je had dit topic natuurlijk al bekeken ?

Heb deze onder mijn Favorieten staan, Dank je.

Met vr gr
Jack