Insérer Omega dans procédure VBA

Résolu/Fermé
simdup Messages postés 13 Date d'inscription lundi 17 novembre 2014 Statut Membre Dernière intervention 27 février 2015 - Modifié par simdup le 26/02/2015 à 11:06
simdup Messages postés 13 Date d'inscription lundi 17 novembre 2014 Statut Membre Dernière intervention 27 février 2015 - 27 févr. 2015 à 14:42
Bonjour,

Je cherche à insérer le sigle Omega dans ma procédure, celle ci fonctionne avec A ,

Worksheets(2).Cells(5 + i, 11).Text = "mA"

Mais pas

Worksheets(2).Cells(5 + i, 11).Text = "m?"

Si quelqu'un sais comment insérer le symbole Omega dans ma procédure je l'en remercie d'avance.

A voir également:

3 réponses

cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
26 févr. 2015 à 11:08
Bonjour,

essaie ceci:

Worksheets(2).Cells(5 + i, 11).Value = "m?" 

0
crapoulou Messages postés 28158 Date d'inscription mercredi 28 novembre 2007 Statut Modérateur, Contributeur sécurité Dernière intervention 16 avril 2024 7 990
Modifié par crapoulou le 26/02/2015 à 11:25
Salut,

Essaye ceci :

Worksheets(2).Cells(5+i, 11).Value = "m" & ChrW(937)
0
blux Messages postés 26001 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 24 avril 2024 3 289
Modifié par blux le 26/02/2015 à 13:00
Salut,

il s'insèrera avec la police idoine en prenant son code 'unicode'...

Pour moi, il faut donc sélectionner une police (type Calibri, qui offre l'omega dans la liste des symboles) et ensuite faire un peu de chrW pour entrer son code avec sa valeur unicode (ici 2126 en hexa).

Ce qui pourrait donner chez toi :

Unite = "m" & ChrW(&H2126)
Worksheets(2).Cells(5 + i, 11).Value = Unite


A+ blux
 "Les cons, ça ose tout.
C'est même à ça qu'on les reconnait"
0
simdup Messages postés 13 Date d'inscription lundi 17 novembre 2014 Statut Membre Dernière intervention 27 février 2015
27 févr. 2015 à 14:42
Merci pour vos réponses, solution trouvé :)
0