Bonjour
Dans un formulaire, je bloque l'écriture en fonction de la personne par le
code VBA - > "Me.AllowEdits"
Seulement voila, je posséde une zone de liste qui se trouve elle aussi,
bloqué...
Comment peut on faire pour que tous les champs (environs 100) soient bloqués
sauf ma zone de liste ?
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
Raymond [mvp]
Bonjour.
il y a certainement d'autres contrôles à ne pas bloquer tels que des boutons. il serait préférable de bloquer contrôle par contrôle selon le type de contrôle. exemple: Dim Ctl As Control ' On Error resume next For Each Ctl In Me.Controls If Ctl.ControlType = acTextBox Then Ctl.Locked = True Ctl.BackColor = RGB(212, 208, 200) ' couleur windows Ctl.ForeColor = RGB(128, 128, 128) 'couleur gris Else Ctl.Locked = False Ctl.BackColor = RGB(255, 255, 255) Ctl.ForeColor = RGB(0, 0, 0) End If Next Ctl
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"sab" a écrit dans le message de news:
Bonjour Dans un formulaire, je bloque l'écriture en fonction de la personne par le code VBA - > "Me.AllowEdits" Seulement voila, je posséde une zone de liste qui se trouve elle aussi, bloqué...
Comment peut on faire pour que tous les champs (environs 100) soient bloqués sauf ma zone de liste ?
MERCI beaucoup pour vos réponse
Bonjour.
il y a certainement d'autres contrôles à ne pas bloquer tels que des
boutons. il serait préférable de bloquer contrôle par contrôle selon le type
de contrôle.
exemple:
Dim Ctl As Control
' On Error resume next
For Each Ctl In Me.Controls
If Ctl.ControlType = acTextBox Then
Ctl.Locked = True
Ctl.BackColor = RGB(212, 208, 200) ' couleur windows
Ctl.ForeColor = RGB(128, 128, 128) 'couleur gris
Else
Ctl.Locked = False
Ctl.BackColor = RGB(255, 255, 255)
Ctl.ForeColor = RGB(0, 0, 0)
End If
Next Ctl
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"sab" <sab@discussions.microsoft.com> a écrit dans le message de news:
5772DC81-F79E-4494-AAFE-5A2C71C8FC5C@microsoft.com...
Bonjour
Dans un formulaire, je bloque l'écriture en fonction de la personne par le
code VBA - > "Me.AllowEdits"
Seulement voila, je posséde une zone de liste qui se trouve elle aussi,
bloqué...
Comment peut on faire pour que tous les champs (environs 100) soient
bloqués
sauf ma zone de liste ?
il y a certainement d'autres contrôles à ne pas bloquer tels que des boutons. il serait préférable de bloquer contrôle par contrôle selon le type de contrôle. exemple: Dim Ctl As Control ' On Error resume next For Each Ctl In Me.Controls If Ctl.ControlType = acTextBox Then Ctl.Locked = True Ctl.BackColor = RGB(212, 208, 200) ' couleur windows Ctl.ForeColor = RGB(128, 128, 128) 'couleur gris Else Ctl.Locked = False Ctl.BackColor = RGB(255, 255, 255) Ctl.ForeColor = RGB(0, 0, 0) End If Next Ctl
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"sab" a écrit dans le message de news:
Bonjour Dans un formulaire, je bloque l'écriture en fonction de la personne par le code VBA - > "Me.AllowEdits" Seulement voila, je posséde une zone de liste qui se trouve elle aussi, bloqué...
Comment peut on faire pour que tous les champs (environs 100) soient bloqués sauf ma zone de liste ?
MERCI beaucoup pour vos réponse
Eric
Bonjour,
Juste pour info, la 2eme solution proposée en réponse à ton post "Vérouiller un Détail" ne convenait pas ? -- 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 Dans un formulaire, je bloque l'écriture en fonction de la personne par le code VBA - > "Me.AllowEdits" Seulement voila, je posséde une zone de liste qui se trouve elle aussi, bloqué...
Comment peut on faire pour que tous les champs (environs 100) soient bloqués sauf ma zone de liste ?
MERCI beaucoup pour vos réponse
Bonjour,
Juste pour info, la 2eme solution proposée en réponse à ton post
"Vérouiller un Détail" ne convenait pas ?
--
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
Dans un formulaire, je bloque l'écriture en fonction de la personne par le
code VBA - > "Me.AllowEdits"
Seulement voila, je posséde une zone de liste qui se trouve elle aussi,
bloqué...
Comment peut on faire pour que tous les champs (environs 100) soient bloqués
sauf ma zone de liste ?
Juste pour info, la 2eme solution proposée en réponse à ton post "Vérouiller un Détail" ne convenait pas ? -- 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 Dans un formulaire, je bloque l'écriture en fonction de la personne par le code VBA - > "Me.AllowEdits" Seulement voila, je posséde une zone de liste qui se trouve elle aussi, bloqué...
Comment peut on faire pour que tous les champs (environs 100) soient bloqués sauf ma zone de liste ?