Discussion :

[stimp4ck]

Bonjour,

Je souhaiterais savoir si une fonction existe en VBA pour extraire le code hexadécimal d'une chaine de caractere contenu dans une cellule Excel ?

C'est dans le but de faire une fonction qui me traduit du format "Packé" ou COMP-3 venant de fichier MVS (grand system IBM)

J'ai bien vu la fonction Hex mais celle ci ne fait pas ce que je veux...

Par exemple, il me faudrait une fonction du genre :

hexa("ABC") renvoit une chaine "414243"

merci

[stimp4ck]

C'est bon j'ai trouvé (je sais j'ai l'air bête mais bon, des fois c'est la révélation ^^)

Il suffit de faire l'hexa de l'ascii du caractere voulu, apres il suffit de prendre les caractères les uns après les autres .

voila @++

[Tdeny]

Bonjour,
et où tu la trouves la fonction ascii, en vb ? asc(...) renvoie le caractère.

ci-dessous une formule qui fait la conversion, basée sur les n° de colonnes pour la sélection des lettres avec un texte en $a$1.

Code :

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

=CONCATENER(CTXT(ARRONDI.INF(CODE(STXT($A$1;COLONNE();1))/16;0);0);CTXT(CODE(STXT($A$1;COLONNE();1))-ARRONDI.INF(CODE(STXT($A$1;COLONNE();1))/16;0)*16;0))