OVH Cloud OVH Cloud

comment puis-je modifier la petite case dans une case à cocher?

2 réponses
Avatar
johndeer
voila, je galere à essayer d'agrandir la taille de la petite case que l'on
coche ou decoche s'il vous plait aidez moi!!!

2 réponses

Avatar
anonymousA
bonjour,

A ma connaissance, il est possible d'agrandir la totalité du controle en lui
même mais jamais la petite case à cocher et quand bien même on agrandirait la
totalité du controle , ca n'agrandirait pas la case à cocher.
Pour voir plus gros, il faut zoomer.

A+


voila, je galere à essayer d'agrandir la taille de la petite case que l'on
coche ou decoche s'il vous plait aidez moi!!!


Avatar
Hervé
Bonsoir,
Il te faut bidouiller.
Tu pose sur ta feuille un contrôle Label issus de la barre d'outils "Boîte à
outils Contrôles", tu double clique dessus, là tu est dans le VBE. En bas à
gauche tu as les propriétés de ton label, tu clique sur "Font" tu choisis un
police comme Marlett ou Webdings, tu défini la taille (20 ?) ensuite tu
défini la propriété BorderStyle à 1 (fmBorderStyleSingle), tu supprime la
valeur ("Label1") dans la propriété "Caption" et tu mets le code ci-dessous
dans le module de la feuille où se trouve le Label puis tu clique sur le
bouton mode création (équerre règle et crayon), revenu sur ta feuille tu
clique sur ton label pour voir le résultat :

Private Sub Label1_Click()
With Label1
If .Caption = "a" Then
.Caption = ""
Else
.Caption = "a"
End If
End With
End Sub

Hervé.

"johndeer" a écrit dans le message
news:
voila, je galere à essayer d'agrandir la taille de la petite case que l'on
coche ou decoche s'il vous plait aidez moi!!!