OVH Cloud OVH Cloud

Formulaire

6 réponses
Avatar
Claire
Bonjour à Tous,

A partir d'une table, j'ai créé un formulaire dont 10 champs de type Oui/NON.
pour ne pas cocher tous les champs un par un, existe-t-il un moyen pour
cocher tous les champs en une seule fois si nécessaire ?
ex : créer un champ de type Oui/Non "toujours possible". En activant ce
champ est-il possible que les 10 autres champs soient activés automatquement ?

Merci d'avance pour votre aide

Claire

6 réponses

Avatar
3stone
Salut,

"Claire"
| A partir d'une table, j'ai créé un formulaire dont 10 champs de type Oui/NON.
| pour ne pas cocher tous les champs un par un, existe-t-il un moyen pour
| cocher tous les champs en une seule fois si nécessaire ?
| ex : créer un champ de type Oui/Non "toujours possible". En activant ce
| champ est-il possible que les 10 autres champs soient activés automatquement ?


On sent comme une... conception particulière ;-)


Si les cases doivent plutôt être cochées au lieu de décochées,
modifie la valeur par défaut dans la table !


--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/
Avatar
Claire
Hello,
une conception très particulière....
L'idée est intéressante mais... le plus souvent je ne coche que 3 ou 4
cases. Et parfois je dois tout cocher... Donc dans ce cas à l'aide pour
éviter les oublis.

Merci d'avance


Salut,

"Claire"
| A partir d'une table, j'ai créé un formulaire dont 10 champs de type Oui/NON.
| pour ne pas cocher tous les champs un par un, existe-t-il un moyen pour
| cocher tous les champs en une seule fois si nécessaire ?
| ex : créer un champ de type Oui/Non "toujours possible". En activant ce
| champ est-il possible que les 10 autres champs soient activés automatquement ?


On sent comme une... conception particulière ;-)


Si les cases doivent plutôt être cochées au lieu de décochées,
modifie la valeur par défaut dans la table !


--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/




Avatar
3stone
Salut,

"Claire"
| une conception très particulière....
| L'idée est intéressante mais... le plus souvent je ne coche que 3 ou 4
| cases. Et parfois je dois tout cocher... Donc dans ce cas à l'aide pour
| éviter les oublis.


Mets cela sur clic de ton bouton :

Dim Ctrl As Control
For Each Ctrl In Me.Section(0).Controls
If TypeOf Ctrl Is CheckBox Then
Ctrl = True
End If
Next


--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/
Avatar
Claire
Merci beaucoup "3stone"

Cela marche super bien mais j'ai encore quelques questions :
1) je n'arrive pas à désactiver le premier bouton qui enclenche tous les
autres si nécessaire

2) Dans le même style d'utilisation : est-il possible d'activer que 2 ou 3
champs (type Oui/Non) bien particuliers sur un ensemble de champs ?

Merci d'avance
Claire



Salut,

"Claire"
| une conception très particulière....
| L'idée est intéressante mais... le plus souvent je ne coche que 3 ou 4
| cases. Et parfois je dois tout cocher... Donc dans ce cas à l'aide pour
| éviter les oublis.


Mets cela sur clic de ton bouton :

Dim Ctrl As Control
For Each Ctrl In Me.Section(0).Controls
If TypeOf Ctrl Is CheckBox Then
Ctrl = True
End If
Next


--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/




Avatar
3stone
Salut,

"Claire"
| Cela marche super bien mais j'ai encore quelques questions :
| 1) je n'arrive pas à désactiver le premier bouton qui enclenche tous les
| autres si nécessaire


Remplace cette première case à cocher par un petit bouton...
tu y gagnera en clarté et tu pourra y placer l'inscription "tous"



| 2) Dans le même style d'utilisation : est-il possible d'activer que 2 ou 3
| champs (type Oui/Non) bien particuliers sur un ensemble de champs ?

Le même code avec une petite adaptation...

En admettant que tu veuille cocher les case 1, 2 et 5, tu mets dans la propriété
"Remarque" (Tag) de chacune de ces cases un mot... disons 'partiel'

Tu ajoute un petit bouton que tu nomme "Spécial" et y ajoute le code :

Dim Ctrl As Control
For Each Ctrl In Me.Section(0).Controls
If TypeOf Ctrl Is CheckBox Then
If Ctrl.Tag = "partiel" Then
Ctrl = True
Else
Ctrl = False
End If
End If
Next


--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/
Avatar
Claire
A l'attention de Pierre,

Génial cela marche du tonnerre !!!
Il n'y a pas à dire, j'ai encore de nombreux efforts à réaliser en VBA; mais
quelle liberté si on le maîtrise.
Merci encore et bon week-end


Salut,

"Claire"
| Cela marche super bien mais j'ai encore quelques questions :
| 1) je n'arrive pas à désactiver le premier bouton qui enclenche tous les
| autres si nécessaire


Remplace cette première case à cocher par un petit bouton...
tu y gagnera en clarté et tu pourra y placer l'inscription "tous"



| 2) Dans le même style d'utilisation : est-il possible d'activer que 2 ou 3
| champs (type Oui/Non) bien particuliers sur un ensemble de champs ?

Le même code avec une petite adaptation...

En admettant que tu veuille cocher les case 1, 2 et 5, tu mets dans la propriété
"Remarque" (Tag) de chacune de ces cases un mot... disons 'partiel'

Tu ajoute un petit bouton que tu nomme "Spécial" et y ajoute le code :

Dim Ctrl As Control
For Each Ctrl In Me.Section(0).Controls
If TypeOf Ctrl Is CheckBox Then
If Ctrl.Tag = "partiel" Then
Ctrl = True
Else
Ctrl = False
End If
End If
Next


--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/