Discussion :

[Cédric B.]

Hello tout le monde,

Dans une procédure en VBA, je traite une chaîne de caractère, caractère par caractère et j'utilise la fonction AscW(). Dans cette chaîne de caractère, j'ai des caractère spéciaux qui ont un code unicode entre 50'000 et 65'000. Selon la documentation de Microsoft:

https://msdn.microsoft.com/fr-fr/lib...(v=vs.90).aspx

la fonction AscW() devrait retourner un Integer entre 0 et 65'535. Mais en réalité le fonction me retourne un nombre négatif comme -5052.Or la fonction Ascw() retourne une donnée de Integer qui devrait accepté ce genre de chiffre selon la documentation.

https://msdn.microsoft.com/fr-fr/lib...(v=vs.90).aspx

Est-ce une erreur de la document Microsoft ou s'agit-il d'autre chose?

Par avance, merci pour votre aide.

Cédric

[marot_r]

Bonjour.

Comment procèdes-tu pour ta lecture caractère par caractère ?

Je soupçonne que c'est parce que les unicodes sont codés sur 2 octets et que tu ne récupères qu'un seul octet lors de ta lecture.

A+

[Cédric B.]

Bonjour Marot_r,

Je procède la manière suivante pour récupérer ma valeur:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Dim car As String
Dom numasc As Integer
numasc = AscW(Car)

Par avance, pour ton aide

Cédric

[Cédric B.]

Bonjour tout le monde,

en lisant dans la documentation de Microsoft:
https://support.microsoft.com/fr-fr/kb/145745
et en regardant les types de données
https://support.microsoft.com/fr-fr/kb/189323

et si je veux récupérer le vrai code unicode du nombre négatif, il faudrait faire ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Dim resascw As Long
resascw = AscW(res) + 65536

Est-ce que ceci est la seule solution?

Avoir davantage d'info sur la différence entre valeur signée et non signée?

Par avance, merci pour ces aide

Cédric