Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Copier/coller dans macro répétitive ?

3 réponses
Avatar
fifigim
Bonjour,

J'ai une macro très simple :

Private Sub CheckBox1_Click()
If CheckBox1 = True Then
CheckBox2 = False
End If
End Sub
Private Sub CheckBox2_Click()
If CheckBox2 = True Then
CheckBox1 = False
End If
End Sub

Private Sub CheckBox3_Click()
If CheckBox3 = True Then
CheckBox4 = False
End If
End Sub
Private Sub CheckBox4_Click()
If CheckBox4 = True Then
CheckBox3 = False
End If
End Sub

Les cases fonctionnent par 2, la 1 avec la 2, la 3 avec la 4, etc...
Le soucis est que je dois faire environs 200 paires, et en faisant un
copier/coller "simple", je dois à chaque fois changer les chiffres, et c'est
très très long !
Donc si quelqu'un a une solution ?

Le but de mon tableau et remplir "OK" ou "NOK" pour différents critères.

Cordialement

3 réponses

Avatar
JB
Bonjour,

J'ai l'impression que tu essaie de faire des cases d'options avec des
cases à cocher.

http://boisgontierj.free.fr/fichiers/Formulaire/Form_questionnaire.xls

JB
On 26 fév, 09:25, fifigim wrote:
Bonjour,

J'ai une macro très simple :

Private Sub CheckBox1_Click()
If CheckBox1 = True Then
CheckBox2 = False
End If
End Sub
Private Sub CheckBox2_Click()
If CheckBox2 = True Then
CheckBox1 = False
End If
End Sub

Private Sub CheckBox3_Click()
If CheckBox3 = True Then
CheckBox4 = False
End If
End Sub
Private Sub CheckBox4_Click()
If CheckBox4 = True Then
CheckBox3 = False
End If
End Sub

Les cases fonctionnent par 2, la 1 avec la 2, la 3 avec la 4, etc...
Le soucis est que je dois faire environs 200 paires, et en faisant un
copier/coller "simple", je dois à chaque fois changer les chiffres, et c'est
très très long !
Donc si quelqu'un a une solution ?

Le but de mon tableau et remplir "OK" ou "NOK" pour différents critèr es.

Cordialement


Avatar
fifigim
C'est peut être moins compliquer que ce dernier...
Voici mon fichier :

http://cjoint.com/?cAlyBkA8Vb




Bonjour,

J'ai l'impression que tu essaie de faire des cases d'options avec des
cases à cocher.

http://boisgontierj.free.fr/fichiers/Formulaire/Form_questionnaire.xls

JB
On 26 fév, 09:25, fifigim wrote:
Bonjour,

J'ai une macro très simple :

Private Sub CheckBox1_Click()
If CheckBox1 = True Then
CheckBox2 = False
End If
End Sub
Private Sub CheckBox2_Click()
If CheckBox2 = True Then
CheckBox1 = False
End If
End Sub

Private Sub CheckBox3_Click()
If CheckBox3 = True Then
CheckBox4 = False
End If
End Sub
Private Sub CheckBox4_Click()
If CheckBox4 = True Then
CheckBox3 = False
End If
End Sub

Les cases fonctionnent par 2, la 1 avec la 2, la 3 avec la 4, etc...
Le soucis est que je dois faire environs 200 paires, et en faisant un
copier/coller "simple", je dois à chaque fois changer les chiffres, et c'est
très très long !
Donc si quelqu'un a une solution ?

Le but de mon tableau et remplir "OK" ou "NOK" pour différents critères.

Cordialement







Avatar
JB
Dans l'onglet CaseOptions2, il y a des cases d'otions qui
fonctionnent sans VBA.

http://boisgontierj.free.fr/fichiers/jb-BOcontroles.xls

JB

On 26 fév, 11:27, fifigim wrote:
C'est peut être moins compliquer que ce dernier...
Voici mon fichier :

http://cjoint.com/?cAlyBkA8Vb




Bonjour,

J'ai l'impression que tu essaie de faire des cases d'options avec des
cases à cocher.

http://boisgontierj.free.fr/fichiers/Formulaire/Form_questionnaire.xls

JB
On 26 fév, 09:25, fifigim wrote:
Bonjour,

J'ai une macro très simple :

Private Sub CheckBox1_Click()
If CheckBox1 = True Then
CheckBox2 = False
End If
End Sub
Private Sub CheckBox2_Click()
If CheckBox2 = True Then
CheckBox1 = False
End If
End Sub

Private Sub CheckBox3_Click()
If CheckBox3 = True Then
CheckBox4 = False
End If
End Sub
Private Sub CheckBox4_Click()
If CheckBox4 = True Then
CheckBox3 = False
End If
End Sub

Les cases fonctionnent par 2, la 1 avec la 2, la 3 avec la 4, etc...
Le soucis est que je dois faire environs 200 paires, et en faisant un
copier/coller "simple", je dois à chaque fois changer les chiffres, et c'est
très très long !
Donc si quelqu'un a une solution ?

Le but de mon tableau et remplir "OK" ou "NOK" pour différents crit ères.

Cordialement- Masquer le texte des messages précédents -



- Afficher le texte des messages précédents -