Selectionner des checkbox les uns apres les autres dans une boucle
2 réponses
Bonjour,
J ai besoin de faire une serie d operations sur tous les
checkbox de mon formulaire (35 au total) et j aimerais
savoir s il etait possible de faire ca dans un e boucle
plutot que de me les taper tous a la main !
Merci d avance
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.
Tu peux faire, pour les versions 2000 & +: Dim Ctl As Control For Each Ctl In Me.Controls If Ctl.ControlType = acCheckBox Then MsgBox "ici la procédure pour le controle " & Ctl.Name End If Next Ctl
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de news:908901c4788f$58d1fdf0$
Bonjour, J ai besoin de faire une serie d operations sur tous les checkbox de mon formulaire (35 au total) et j aimerais savoir s il etait possible de faire ca dans un e boucle plutot que de me les taper tous a la main ! Merci d avance
Bonjour.
Tu peux faire, pour les versions 2000 & +:
Dim Ctl As Control
For Each Ctl In Me.Controls
If Ctl.ControlType = acCheckBox Then
MsgBox "ici la procédure pour le controle " & Ctl.Name
End If
Next Ctl
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
<anonymous@discussions.microsoft.com> a écrit dans le message de
news:908901c4788f$58d1fdf0$a501280a@phx.gbl...
Bonjour,
J ai besoin de faire une serie d operations sur tous les
checkbox de mon formulaire (35 au total) et j aimerais
savoir s il etait possible de faire ca dans un e boucle
plutot que de me les taper tous a la main !
Merci d avance
Tu peux faire, pour les versions 2000 & +: Dim Ctl As Control For Each Ctl In Me.Controls If Ctl.ControlType = acCheckBox Then MsgBox "ici la procédure pour le controle " & Ctl.Name End If Next Ctl
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de news:908901c4788f$58d1fdf0$
Bonjour, J ai besoin de faire une serie d operations sur tous les checkbox de mon formulaire (35 au total) et j aimerais savoir s il etait possible de faire ca dans un e boucle plutot que de me les taper tous a la main ! Merci d avance
C est parfait.
Merci beaucoup
-----Message d'origine----- Bonjour.
Tu peux faire, pour les versions 2000 & +: Dim Ctl As Control For Each Ctl In Me.Controls If Ctl.ControlType = acCheckBox Then MsgBox "ici la procédure pour le controle " & Ctl.Name
End If Next Ctl
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de
news:908901c4788f$58d1fdf0$
Bonjour, J ai besoin de faire une serie d operations sur tous les checkbox de mon formulaire (35 au total) et j aimerais savoir s il etait possible de faire ca dans un e boucle plutot que de me les taper tous a la main ! Merci d avance
.
C est parfait.
Merci beaucoup
-----Message d'origine-----
Bonjour.
Tu peux faire, pour les versions 2000 & +:
Dim Ctl As Control
For Each Ctl In Me.Controls
If Ctl.ControlType = acCheckBox Then
MsgBox "ici la procédure pour le controle " &
Ctl.Name
End If
Next Ctl
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
<anonymous@discussions.microsoft.com> a écrit dans le
message de
news:908901c4788f$58d1fdf0$a501280a@phx.gbl...
Bonjour,
J ai besoin de faire une serie d operations sur tous les
checkbox de mon formulaire (35 au total) et j aimerais
savoir s il etait possible de faire ca dans un e boucle
plutot que de me les taper tous a la main !
Merci d avance
Tu peux faire, pour les versions 2000 & +: Dim Ctl As Control For Each Ctl In Me.Controls If Ctl.ControlType = acCheckBox Then MsgBox "ici la procédure pour le controle " & Ctl.Name
End If Next Ctl
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de
news:908901c4788f$58d1fdf0$
Bonjour, J ai besoin de faire une serie d operations sur tous les checkbox de mon formulaire (35 au total) et j aimerais savoir s il etait possible de faire ca dans un e boucle plutot que de me les taper tous a la main ! Merci d avance