verrouiller tous les champs d'un formulaire sauf UN

verrouiller tous les champs d'un formulaire sauf UN - VB/VBA/VBS - Programmation

Marsh Posté le 07-02-2008 à 15:18:19    

Bonjour,  
 
Je voudrais verrouiller tous les champs de mon formulaire de consultation sauf UN, une liste déroulante.  
 
Pour verrouiller tous les champs, j'entre ce code :  
 

Code :
  1. For Each Ctl In Me.Controls
  2. If Ctl.ControlType = acTextBox Then
  3. Ctl.Locked = True
  4. Ctl.Enabled = False
  5. ElseIf Ctl.ControlType = acComboBox Then
  6. Ctl.Locked = True
  7. Ctl.Enabled = False
  8. End If
  9. Next Ctl


Et je voudrais donc pouvoir autoriser l'accès et la saisie d'un champ.  
Je pensais donc mettre ce code :  
 

Code :
  1. For Each Ctl In Me.Controls
  2. If Ctl.ControlType = acTextBox Then
  3. Ctl.Locked = True
  4. Ctl.Enabled = False
  5. ElseIf Ctl.ControlType = acComboBox Then
  6. Ctl.Locked = True
  7. Ctl.Enabled = False
  8. End If
  9. Next Ctl
  10. Me.ld_recherche.Enabled = true
  11. Me.ld_recherche.Locked = false


Mais ca ne marche pas.  
 
Comment pourrais-je faire ?  
 
Merci  
4rocky4


Message édité par 4rocky4 le 07-02-2008 à 16:38:18

---------------
- Un con qui marche ira plus loin qu'un intellectuel assis -
Reply

Marsh Posté le 07-02-2008 à 15:18:19   

Reply

Marsh Posté le 07-02-2008 à 20:44:25    

« Mais ca ne marche pas » n'est pas une explication.

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed