Bonjour Zef
Donc un exemple simple, sur ta "Sheet1" en Range("F1") tu as un test qui retourne VRAI ou FAUX (exemple =B1=B2)
Donc si B1 est différent de B2 ton test est FALSE et of course TRUE si B1 est identique à B2...
Si tu n'as qu'un seul OptionButton tu mets ce code dans le Private Module de ton UserForm :
Private Sub UserForm_Initialize()
Dim Test As Boolean
Test = Sheets(1).Range("F1")
OptionButton1 = Test
End Sub
Si tu as Deux OptionButtons et que l'un ou l'autre doit être coché en fonction de la valeur en "F1", alors ce sera plutôt vers une solution comme celle-ci que tu devras t'orienter :
Private Sub UserForm_Initialize()
Dim Test As Boolean
Test = Sheets(1).Range("F1")
If Test = True Then
OptionButton1 = True
Else: OptionButton2 = True
End If
End Sub
Je pense que tu devrais avoir tous les éléments en main.
Bon Travail
@+Thierry