Automatisation pour caractères spéciaux.

[alexandre33260]

Bonjour, je cherche à identifier les caractères spéciaux.
A l'aide de la combinaison ALT+nombre, on obtient un caractère, mon préféré est alt+0201 qui donne É...
Bref, sur le fichier joint, dans la cellule A2, j'ai mis A1+7, je tire la cellule est ça augment automatiquement.
Dans la cellule B1, je suis obligé de composer alt+1 etc.
Est-il possible d'avoir un code pour dire qu'en B1, le code est alt+1 puis en B2 alt+8, enfin incrémenter de 7 en l'occurence etc.
Merci pour votre aide.

 

[Dranreb]

Bonsoir.
Essayez en B1 :

=UNICAR(A1)

 

[eriiic]

Bonjour à tous,

Unicar() ?
Pas ça sur mon 2010 :-s A partir de 2016 seulement

Tu as des tables toutes prêtes sur le net. Par exemple :https://unicode-table.com/fr/#basic-latin
Attention, code mis en hexa, 0201 c'est 00C9
eric

 

[Dranreb]

Peut s'écrire en VBA

Function UNICAR(ByVal Code as Long) As String
   UNICAR = ChrW$(Code)
   End Function

 

[alexandre33260]

Merci pour vos réponse unicar ne fonctionne pas, j'ai essayé sur Office 2016 et ça ne reproduit pas le bon caractère, c'est dommage car c'était la solution la plus simple et celle qui m'aurait été la plus agréable.
Pour la table déjà existante, merci pour ce lien, j'avais déjà trouvé ce genre de page mais pas aussi complète.
Je voudrai pourtant réaliser moi même petit code...
Je n'ai pas encore essayé la solution VB...

 

[Dranreb]

Ça ne marche que pour les codes Alt à 4 chiffres.
Pour ceux à moins, comme Alt+144, Vous pouvez quand même trouver le code à 4 chiffres correspondant à l'aide de la fonction inverse UNICODE. Si vous ne l'avez pas :

Function UNICODE(ByVal Car as String) As Long
   UNICODE = AscW(Car)
   End Function

 

[alexandre33260]

Oui, j'ai remarqué pour les codes à 4 chiffres.
Car alt+3 sous word par exemple, donne un coeur, mais pas avec UNICAR...

Je vais essayer d’intégrer le code VB, mais je ne sais bien trop comment, je fais des tests...

Effectivement, j'ai également besoin d'avoir tous les codes, de 1à 999 et aussi les 0001 à 9999

 

[Dranreb]

Sur office 2016 je pense que vous avez les fonctions UNICAR et UNICODE. Vous n'avez pas besoin de les écrire en VBA.

 

[alexandre33260]

UNICODE pour 3 donne 51 alors qu'il devrait donner le coeur...

 

[Dranreb]

Mettez un format "0000" à la cellule qui utilise la fonction UNICODE parce que c'est pour Alt+0051