Je voudrais savoir si il est possible de bloquer ( ou de vérouiller) le
"détail" d'un formulaire par du vba.
En effet, suivant une condition, je souhaiterai que cette partie soit
bloquer en écriture...
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Eric
Bonjour,
Je ne vois pas très bien ce que tu veux faire.
1er cas : Interdire les modifs sur le formulaire suivant ta condition en mettant à False la propriété AllowEdits du formulaire (Evénement Sur Activation du formulaire).
If LaCondition Then Me.AllowEditsúlse Else Me.AllowEdits=true End If
2ème cas: La section Détail d'un formulaire n'ayant pas la propriété Locked ni Enabled, une solution serait de verrouiller les controles de cette section en parcourant la collection des controles.
If TaCondition then ' Mettre le focus sur un controle qui ne sera pas ' désactivé/verrouillé sinon erreur Dim c As Control For Each c In Me.Section(acDetail).Controls If TypeOf c Is TextBox Then ' voir les autres types c.Locked = True c.Enabled = False End If Next c End If
Prévoir d'enlever le verrouillage dans les autres cas.
-- A+ Eric Un petit tour ici : http://users.skynet.be/mpfa/ Accès aux archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
bonjour,
Je voudrais savoir si il est possible de bloquer ( ou de vérouiller) le "détail" d'un formulaire par du vba. En effet, suivant une condition, je souhaiterai que cette partie soit bloquer en écriture...
Merci d'avance
Bonjour,
Je ne vois pas très bien ce que tu veux faire.
1er cas : Interdire les modifs sur le formulaire suivant ta condition en
mettant à False la propriété AllowEdits du formulaire (Evénement Sur
Activation du formulaire).
If LaCondition Then
Me.AllowEditsúlse
Else
Me.AllowEdits=true
End If
2ème cas: La section Détail d'un formulaire n'ayant pas la propriété
Locked ni Enabled, une solution serait de verrouiller les controles de
cette section en parcourant la collection des controles.
If TaCondition then
' Mettre le focus sur un controle qui ne sera pas
' désactivé/verrouillé sinon erreur
Dim c As Control
For Each c In Me.Section(acDetail).Controls
If TypeOf c Is TextBox Then ' voir les autres types
c.Locked = True
c.Enabled = False
End If
Next c
End If
Prévoir d'enlever le verrouillage dans les autres cas.
--
A+
Eric
Un petit tour ici : http://users.skynet.be/mpfa/
Accès aux archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
bonjour,
Je voudrais savoir si il est possible de bloquer ( ou de vérouiller) le
"détail" d'un formulaire par du vba.
En effet, suivant une condition, je souhaiterai que cette partie soit
bloquer en écriture...
1er cas : Interdire les modifs sur le formulaire suivant ta condition en mettant à False la propriété AllowEdits du formulaire (Evénement Sur Activation du formulaire).
If LaCondition Then Me.AllowEditsúlse Else Me.AllowEdits=true End If
2ème cas: La section Détail d'un formulaire n'ayant pas la propriété Locked ni Enabled, une solution serait de verrouiller les controles de cette section en parcourant la collection des controles.
If TaCondition then ' Mettre le focus sur un controle qui ne sera pas ' désactivé/verrouillé sinon erreur Dim c As Control For Each c In Me.Section(acDetail).Controls If TypeOf c Is TextBox Then ' voir les autres types c.Locked = True c.Enabled = False End If Next c End If
Prévoir d'enlever le verrouillage dans les autres cas.
-- A+ Eric Un petit tour ici : http://users.skynet.be/mpfa/ Accès aux archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
bonjour,
Je voudrais savoir si il est possible de bloquer ( ou de vérouiller) le "détail" d'un formulaire par du vba. En effet, suivant une condition, je souhaiterai que cette partie soit bloquer en écriture...
