Bouton d'option

[MAQUIN]

je crée un masque de saisie pour une liste de contacts avec un cadre et boutons d'options pour les civilités.
je ne comprends pas pourquoi ma commande ne fonctionne pas !
Quelqu'un pourrait il m'aider ?

Dim no_ligne As Integer, civilites As String

For Each bouton_civilites In Frame_Civilites.Controls
If bouton_civilites.Value Then
civilites = bouton_civilites.Caption
End If
Next

merci d'avance

 

[phlaurent55]

Bonjour Maquin,

essaie en remplaçant:
If bouton_civilites.Value Then

par:
If bouton_civilites.Value=True Then

à+
Philippe

 

[MAQUIN]

Super, merci mille fois pour cette aide et @++