Bonjour,

J'ai un formulaire dans lequel je laisse la possibilité à l'utilisateur de récupérer une et une seule option parmi plus d'une dizaine.
Chaque option si elle est choisie, va effectuer l'action que je veux dans la page choisie par l'utilisateur.

Du coup, j'ai un code comme suit:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
If PM001.Value = True Then
    val = Sheets("PM001").Index
ElseIf PM002.Value = True Then
    val = Sheets("PM002").Index
ElseIf PM003.Value = True Then
    val = Sheets("PM003").Index
ElseIf PM004.Value = True Then
    val = Sheets("PM004").Index
ElseIf PM006.Value = True Then
    val = Sheets("PM006").Index
ElseIf PM007.Value = True Then
    val = Sheets("PM007").Index
ElseIf PM008.Value = True Then
    val = Sheets("PM008").Index
ElseIf PM009.Value = True Then
    val = Sheets("PM009").Index
ElseIf PM012.Value = True Then
    val = Sheets("PM012").Index
ElseIf PM013.Value = True Then
    val = Sheets("PM013").Index
ElseIf PM014.Value = True Then
    val = Sheets("PM014").Index
ElseIf PM015.Value = True Then
    val = Sheets("PM015").Index
ElseIf PM016.Value = True Then
    val = Sheets("PM016").Index
ElseIf PM017.Value = True Then
    val = Sheets("PM017").Index
End If
Je voudrais savoir si par une boucle, ou autre, il peut sortir seul la valeur "true" et en fonction, de quelle valeur est true, faire varier le val en conséquence?

Merci d'avance