Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access Gérer l'état d'une checkbox

Gérer l'état d'une checkbox

3 réponses
Avatar
Eric RENAUD
Bonjour,
J'ai une CheckBox dans un formulaire
Lorsque je clique, je rends ma liste déroulante inaccessible avec le code
ci-dessous

Private Sub chkTousClients_Click()
Me.lstClients.Enabled = False
End Sub

Lorsque je décoche, je souhaite rendre ma liste déroulante accessible.
Quel est l'évenement qui gère ce cas ?
D'avance merci
Signaler un problème avec ce contenu

3 réponses

Supprimer
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
Avatar
Pierre CFI [mvp]
bonjour
tu fais une bascule
Private Sub chkTousClients_Click()
if Me.lstClients.Enabled then
Me.lstClients.Enabled = False
else
Me.lstClients.Enabled =True
end if
End Sub


--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Eric RENAUD" a écrit dans le message de news:
Bonjour,
J'ai une CheckBox dans un formulaire
Lorsque je clique, je rends ma liste déroulante inaccessible avec le code
ci-dessous

Private Sub chkTousClients_Click()
Me.lstClients.Enabled = False
End Sub

Lorsque je décoche, je souhaite rendre ma liste déroulante accessible.
Quel est l'évenement qui gère ce cas ?
D'avance merci




Avatar
Paol
-----Message d'origine-----
bonjour
tu fais une bascule
Private Sub chkTousClients_Click()
if Me.lstClients.Enabled then
Me.lstClients.Enabled = False
else
Me.lstClients.Enabled =True
end if
End Sub



Un peu plus simple et sans IF

Private Sub chkTousClients_Click()
Me.lstClients.Enabled = Not Me.lstClients.Enabled
End Sub



--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Eric RENAUD" a écrit dans le
message de news:

Bonjour,
J'ai une CheckBox dans un formulaire
Lorsque je clique, je rends ma liste déroulante
inaccessible avec le code


ci-dessous

Private Sub chkTousClients_Click()
Me.lstClients.Enabled = False
End Sub

Lorsque je décoche, je souhaite rendre ma liste
déroulante accessible.


Quel est l'évenement qui gère ce cas ?
D'avance merci





.




Avatar
Pierre CFI [mvp]
et oui :o))

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Paol" a écrit dans le message de news: 10f7b01c3f54b$041652b0$

-----Message d'origine-----
bonjour
tu fais une bascule
Private Sub chkTousClients_Click()
if Me.lstClients.Enabled then
Me.lstClients.Enabled = False
else
Me.lstClients.Enabled =True
end if
End Sub



Un peu plus simple et sans IF

Private Sub chkTousClients_Click()
Me.lstClients.Enabled = Not Me.lstClients.Enabled
End Sub



--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Eric RENAUD" a écrit dans le
message de news:

Bonjour,
J'ai une CheckBox dans un formulaire
Lorsque je clique, je rends ma liste déroulante
inaccessible avec le code


ci-dessous

Private Sub chkTousClients_Click()
Me.lstClients.Enabled = False
End Sub

Lorsque je décoche, je souhaite rendre ma liste
déroulante accessible.


Quel est l'évenement qui gère ce cas ?
D'avance merci





.