bloquer l'ensemble des cases dans un frame
Bonjour à tous,
Je m'en remets à vous car après pas mal de recherche je bloque.
Je souhaiterais désactiver à la saisie l'ensemble des contrôles contenu dans un formulaire.
Alors biensur j'ai essayé un code du type :
Code:
1
2
3
| For Each ctl In Destructions.Controls
ctl.Locked = True
Next ctl |
J'ai également essayé la variente avec ctl.enable = true
mais le problème sont mes combobox qui ne se verrouillent pas.
J'ai donc tenté de forcer excel a les bloquer avec le code suivant :
Code:
1
2
3
4
5
6
7
8
9
10
11
| For Each ctl In Destructions.Controls
If TypeOf ctl Is TextBox Then
ctl.Locked = True
End If
If ctl Is ComboBox Then
ctl.Locked = True
End If
If ctl Is OptionButton Then
ctl.Locked = True
End If
Next ctl |
mais le programme plante sur "combobox" ou "optionbutton" avec comme message "variable non défini".
Pourquoi ?
Une solution simple étant donnée que tous mes contrôles sont dans un frame serait de bloquer l'ensemble du frame.
Mais :
Code:
frame1.enable = false
ne fonctionne pas non plus.
Avez-vous une idée comment me sortir de la ?
Merci par avance.
Cordialement,
y_vidal
