Vérouiller/Déverouiller les champs d'un formulaire, est-ce possible ?

[Kami91]

Bonjour,

Voilà bas tout est dans l'intitulé enfaite...


Est-ce possible de créer un bouton qui Verouille ou déverouille tous les champs du formulaires.....?

Même si ya des onglets dans le formulaire.?

Merci de votre aide, bonne soirée !

 

[chris]

Re : Vérouiller/Déverouiller les champs d'un formulaire, est-ce possible ?

Bonjour

Il est plus simple de changer les propriétés du formulaire fin qu'il soit en lecture seule.

Après tout dépend de la structure de l'appli : on peut créer plusieurs formulaires et en utiliser un pour la saisie, un autre pour la consultation ou bien utiliser le même et en changer les propriétés par VBA lors de l'ouverture.

 

[Kami91]

Re : Vérouiller/Déverouiller les champs d'un formulaire, est-ce possible ?

Hello,

Ha pas bête de faire plusieurs formulaires... saisie et visualiseur.

Donc il n'y a pas par défaut une petite astuce pour verouiller/deverouilles.... =S

dommage ca aurait été sympas !

Je vais copier mes formulaires donc !

Merci chris pour ton aide !

 

[Kami91]

Re : Vérouiller/Déverouiller les champs d'un formulaire, est-ce possible ?

Est-ce dure de créer cette petite atuce sur vba pour créer un bouton verouiller/deverouiller?
Et tu dis en mode lecture seule : c'est a dire que tu vérouille toutes les cellules enfaite ?

 

[chris]

Re : Vérouiller/Déverouiller les champs d'un formulaire, est-ce possible ?

Bonjour

On ne change pas les propriétés des champs mais celles du formulaire : en mettant suppression à non, mise à jour à non et ajout à non (ce n'est pas les termes exacts car je cite de mémoire, ayant ici une version US) il permet uniquement la consultation.

Il n'y a pas d'enregistreur VBA donc il faut avoir un manuel de référence du code ou voir l'aide en ligne VBA : ce sont les propriétés Allowdeletion, allowadditions, allowedits qu'il faut faire passer à false pour limiter à consulation et true pour toute liberté.

Dans l'aide on trouve

        With frm
             .[B]AllowAdditions[/B] = False
             .AllowDeletions = False
             .AllowEdits = False
         End With

à adapter

 

[Kami91]

Re : Vérouiller/Déverouiller les champs d'un formulaire, est-ce possible ?

Re, merci Chris.

J'ai tenter de faire un bouton et de mettre ce bout de code...

With frm
.AllowAdditions = False
.AllowDeletions = False
.AllowEdits = False
End With

juste une question... avant chaque ".Allow" fo mettre le nom du formulaire ?

Exemple : MONFORMULAIRE.AllowAdditions = False

Car j'ai créer un bouton et ajouter ce bout de code...

il faut mettre With frm ou frm=mon formulaire ?

Merci pour tout .