XL 2010 Insérer un caractère spécial dans un Label

[Magic_Doctor]

Bonsoir,

Je bataille pour tenter d'insérer un caractère spécial dans un Label.
Dans une cellule, pas de problème, en revanche dans un Label le réultat n'est pas celui escompté.

Si j'écris dans une cellule nommée "Titre_UXvsUY" :

[Titre_UXvsUY] = "1 UY " & ChrW(&H225F)

Cela me renvoie bien : 1 UY ≟

Maintenant, j'écris pour un Label (ActiveX dans la feuille et non pas dans un UF) nommé "LabelUXUY1" :

ActiveSheet.LabelUXUY1.Caption = "1 UY " & ChrW(&H225F)

Ça me renvoie : 1 UY ?

Parfois on a envie de donner un coup de pied dans la machine...

 

[Katido]

Bonsoir,

Je pense que c'est comme ça, faut s'y faire...
À moins d'une astuce dont je suis également preneur.

En revanche, ça marche pour les contrôles Excel dits "de formulaire"

 

[Magic_Doctor]

Bonsoir Katido,

C'est bien ce que je pensais. Encore un bug d'Excel.

 

[sylvanu]

Bonsoir Magic_Doctor, Katido,
Moi, j'ai plus rigolo.
Si sur ActiveX Label sur feuille j'exécute :

Sub init()
    ActiveSheet.Label1.Caption = "1 UY " & "   " & ChrW(8771) & "   " & ChrW(8799)
End Sub

Il affiche 1 UY ? ?, MAIS si je clique dessus l'affichage est correct :

😅😂🤣 Evidemment je n'ai pas d'explications. ( Je suis sous XL2007 VBA 6.3 )
Si vous voulez essayez, voir PJ.

 

[TooFatBoy]

Bonjour,

si je clique dessus l'affichage est correct

J'allais aussi le signaler.
Mais je vois que trop lent, encore j'ai été... 😢

 

[sylvanu]

Ou vicieux, avec deux labels cote cote :

Sub init()
    ActiveSheet.Label1.Caption = "1 UY"     ' police label1 ARIAL
    ActiveSheet.Label2.Caption = Chr(187)   ' police label2 SYMBOL
End Sub

 

[Magic_Doctor]

Bonsoir sylvanu,

Merci pour votre collaboration.
J'ai vu la PJ. En effet, c'est bizarre, même très bizarre. Et le mot n'est pas fort !
Décidément, les ActiveX d'Excel ont dû être élaborés par un mec sous LSD payé au lance-pierre...
Bon, en attendant, à part obtenir un résultat, disons, folklorique, c'est pas possible.