Mettre en gras des case à cocher

Bonjour
J'ai essayé avec des cases à cocher contrôle de formulaire et contrôle ActiveX.
Le texte à mettre en gras se trouve juste après sur la même ligne.
Ex :
médecin : (tabulation) □ secteur 1 (tabulation) □ secteur 2

Bonjour,

Pour commencer, je pense qu'il vaudrait mieux mettre des cases d'option, car a priori il faut faire un choix. Je suppose que si c'est secteur 1, ce ne peut pas être secteur 2. Il faut donc que dès qu'on coche une option, les autres se décochent.

Dans ce cas, il faut utiliser les contrôles ActiveX, les seuls à proposer les cases d'option.
De plus, ce sera beaucoup plus simple car la propriété de la police est attribuée à la case, le texte faisant partie du contrôle.

Tu insères tes cases d'option, tu mets le bon texte et, tout en restant en mode Création, tu double cliques sur l'une des deux de façon à ouvrir le VBE pour ThisDocument. Tu effaces ce qui est déjà proposé et tu mets ceci :

Private Sub OptionButton1_Change()
If OptionButton1.Value = True Then
OptionButton1.Font.Bold = True
OptionButton2.Font.Bold = False
Else
OptionButton2.Font.Bold = True
OptionButton1.Font.Bold = False
End If
End Sub

C'est un exemple pour deux cases d'option qui s'annulent.

m@rina