Insérer Omega dans procédure VBA [Résolu/Fermé]

Signaler
Messages postés
13
Date d'inscription
lundi 17 novembre 2014
Statut
Membre
Dernière intervention
27 février 2015
-
Messages postés
13
Date d'inscription
lundi 17 novembre 2014
Statut
Membre
Dernière intervention
27 février 2015
-
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.

3 réponses

Messages postés
6831
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
10 juillet 2020
532
Bonjour,

essaie ceci:

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

Messages postés
27898
Date d'inscription
mercredi 28 novembre 2007
Statut
Modérateur, Contributeur sécurité
Dernière intervention
27 mai 2020
7 524
Salut,

Essaye ceci :

Worksheets(2).Cells(5+i, 11).Value = "m" & ChrW(937)
Messages postés
23761
Date d'inscription
dimanche 26 août 2001
Statut
Modérateur
Dernière intervention
13 janvier 2020
2 855
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"
Messages postés
13
Date d'inscription
lundi 17 novembre 2014
Statut
Membre
Dernière intervention
27 février 2015

Merci pour vos réponses, solution trouvé :)