Meta tags:
description=Vous trouverez ici deux fonctions qui permettent de traiter les caractères utf-8 en VBA, dans les deux sens de conversionSalut.Après un peu d histoire sur Unicode et utf-8 dans ce billet, nous avons vu dans ce billet la théorie du codage d un caractère Unicode en utf-8. Il est temps maintenant de passer à la pratique, et d écrire deux fonctions en VBA pour coder une chaine de caractères en utf-8, mais également de convertir une chaine reçue en utf-8 en chaine lisible sur notre machine.En clair, ...;

Headings (most frequently used words):

un, convertir, une, chaine, en, utf, avec, vba, billet, de, pierre, fauconnier, identifiez, vous, créer, compte,

Text of the page (most frequently used words):
les (31), vous (28), bits (23), pour (22), and (22), uni2utf (20), unicode (18), est (18), text (17), utf (17), caractère (17), dans (16), code (16), 128 (15), que (14), une (14), vba (14), octets (14), avec (13), des (13), valeur (12), mid (12), case (12), utf2uni (11), excel (10), poids (10), sur (9), chaine (9), vers (9), xxxxxx (9), chr (9), signalerframe (8), deux (8), fonctions (8), passe (8), octet (8), bin (8), function (7), qui (7), caractères (7), lorsque (7), pas (7), asc (7), developpez (6), com (6), nous (6), billet (6), passer (6), bit (6), fort (6), donc (6), 110 (6), sélectionner (6), tout (6), 192 (6), css (5), ici (5), bien (5), ces (5), par (5), logique (5), 1984 (5), compte (5), office (5), microsoft (5), sens (4), conversion (4), codage (4), mais (4), convertir (4), cela (4), transforme (4), binaire (4), 65535 (4), rangs (4), 01111 (4), avez (4), contrôle (4), faible (4), chrw (4), 224 (4), fera (4), monsieur (4), dec (4), end (4), select (4), long (4), dim (4), string (4), mot (4), data (4), web (4), email (3), val (3), votre (3), permettent (3), coder (3), réaliser (3), fonction (3), permet (3), faits (3), décale (3), souhaite (3), isoler (3), réalise (3), revient (3), plus (3), puis (3), sont (3), dont (3), aura (3), ajoute (3), 2048 (3), xxxxx (3), trois (3), créez (3), isole (3), pierre (3), fauconnier (3), onlyoffice (3), access (3), systèmes (3), visual (3), java (3), net (3), cloud (3), entreprise (3), hébergement (2), contacter (2), textarea (2), click (2), hide (2), body (2), overflow (2), auto (2), signalerfond (2), remove (2), signaler (2), username (2), input (2), name (2), comment (2), commentaires (2), erreur (2), souhaitez (2), notre (2), connaissance (2), cette (2), traiter (2), également (2), décalages (2), comprendre (2), avoir (2), dessous (2), récupérer (2), delà (2), normalement (2), sauf (2), sûr (2), devoir (2), droite (2), exprimée (2), gauche (2), 000 (2), 00000 (2), ajouter (2), tous (2), autres (2), 11111 (2), retrancher (2), second (2), tableau (2), couleurs (2), codé (2), coup (2), traduire (2), supérieur (2), tel (2), quel (2), 127 (2), obtient (2), 110xxxxx (2), 10xxxxxx (2), compris (2), était (2), autre (2), faire (2), même (2), suivant (2), recomposer (2), espère (2), ont (2), mieux (2), données (2), vos (2), notepad (2), page (2), club (2), bonjour (2), cafã (2), svp (2), café (2), ascw (2), 0011 (2), len (2), 4096 (2), else (2), voudrais (2), plait (2), inscris (2), quelques (2), instants (2), oublié (2), identifiant (2), connectez (2), gratuit (2), pouvoir (2), participer (2), tutoriels (2), openoffice (2), libreoffice (2), project (2), sharepoint (2), powerpoint (2), outlook (2), word (2), informatique (2), sécurité (2), windows (2), android (2), mobiles (2), sql (2), oracle (2), science (2), big (2), sgbd (2), programmation (2), studio (2), netbeans (2), eclipse (2), edi (2), typescript (2), asp (2), azure (2), alm (2), intelligence (2), droit (2), dsi (2), solutions (2), 2000, 2025, www, informations, légales, publicité, advertising, participez, soutenir, responsable, rubrique, top, index, show, focus, fermersignaler, cursor, pointer, signaleraction, post, 318977, alert, connexion, blog, discussion, problème, commenter, décrivez, porter, mail, nom, actualité, signalez, trouverez, salut, après, peu, histoire, avons, théorie, temps, maintenant, pratique, écrire, reçue, lisible, machine, clair, allons, voir, vice, versa, manipuler, faut, lorsqu, sachez, aussi, certaines, bibliothèques, transformations, notamment, adodb, stream, existe, native, utilité, sous, coude, plutôt, notera, cependant, limitation, proposées, unicodes, limitant, utiliser, plans, vont, abord, voici, divise, fait, multiplie, certains, veut, 010, 01011001, allumer, éteindre, cité, haut, souviendrez, illustrait, cas, possibles, comprend, grâce, sépare, place, savoir, combien, composé, supprime, rassemble, composent, seule, opérations, effectuées, multiplications, divisions, récupère, limite, valeurs, sorte, permettra, jamais, nécessitant, pénalisant, vraiment, très, spécifiques, converti, simplement, résultat, pourra, prend, car, besoin, reste, premier, xxxxx000000, sera, obtenu, yyxxxxxx, pense, nécessaire, développer, suite, manoeuvre, inférieur, repris, vaut, incrémenter, 0xxxxx, sait, composer, devient, représentés, traité, sauter, vient, aurez, prévaut, tenant, entendu, utilisables, voilà, billets, plu, ils, permis, permettront, dialoguer, monde, extérieur, petit, pouvez, saisir, texte, exemple, nouvelle, assurez, elle, saisissez, basculant, ansi, obtiendrez, comme, gratuitement, articles, depuis, soutenez, puissions, continuer, proposer, publications, souscrivant, abonnement, vue, deuxième, 00xxxxxx, 10000000, derniers, 00111111, indique, décaler, retenus, 000000, quatre, 11110, 21bits, xxx, 1110, xxxx, seul, xxxxxxx, décorticage, 111, 0111, 100, 11100, 0101, 1010, 11000, 1000, 0110, rappels, arithmétique, booléenne, loop, while, next, 4032, 61440, for, module, tools, embarquer, développements, partages, octobre, 2021, inscription, gratuite, prendra, créer, identifiez, disposez, déjà, activé, aide, formulaire, encore, entièrement, devez, être, connecté, aux, discussions, êtes, nouveau, afin, 2010, livres, outils, sources, forum, crypto, nft, blockchain, quantique, virtualisation, embarqués, green, réseau, raspberry, mac, hpc, hardware, arduino, linux, ios, mongodb, server, sybase, postgresql, nosql, mysql, interbase, firebird, db2, xml, swift, rust, python, perl, pascal, objective, kotlin, assembleur, jeux, débuter, algorithmique, creator, lazarus, basic, windev, scilab, matlab, labview, jetbrains, delphi, html, webmarketing, sémantique, ruby, rails, php, nodejs, javascript, flash, flex, dart, apache, ajax, développement, dév, spring, uml, merise, agile, artificielle, ibm, computing, sap, sas, crm, erp, pgi, business, bpm, études, emploi, newsletter, chat, blogs, faq, forums, loading,

Text of the page (random words):
convertir une chaine en utf 8 avec vba un billet de pierre fauconnier identifiant mot de passe loading mot de passe oublié je m inscris gratuit forums tutoriels faq blogs chat newsletter emploi études droit club di dsi solutions d entreprise di dsi solutions d entreprise big data bpm business intelligence data science erp pgi crm sas sap sécurité droit informatique et entreprise onlyoffice cloud cloud computing oracle azure ibm cloud ia intelligence artificielle alm alm agile merise uml microsoft microsoft net microsoft office visual studio windows asp net typescript c vb net azure java java java web spring android eclipse netbeans dév web développement et hébergement web ajax apache asp css dart flash flex javascript nodejs php ruby rails typescript web sémantique webmarketing x html edi edi 4d delphi eclipse jetbrains labview netbeans matlab scilab visual studio windev visual basic 6 lazarus qt creator programmation programmation débuter algorithmique 2d 3d jeux assembleur c c c d go kotlin objective c pascal perl python rust swift qt xml autres sgbd sgbd sql 4d access big data data science db2 firebird interbase mysql nosql postgresql oracle sybase sql server mongodb office microsoft office access excel word outlook powerpoint sharepoint microsoft project openoffice libreoffice onlyoffice mobiles mobiles android ios systèmes systèmes windows linux arduino hardware hpc mac raspberry pi réseau green it sécurité systèmes embarqués virtualisation informatique quantique crypto nft blockchain office access excel word outlook powerpoint sharepoint ms project openoffice libreoffice onlyoffice forum excel f a q excel tutoriels excel sources excel outils excel livres excel office 2010 vous êtes nouveau sur developpez com créez votre compte ou connectez vous afin de pouvoir participer vous devez avoir un compte developpez com et être connecté pour pouvoir participer aux discussions vous n avez pas encore de compte developpez com créez en un en quelques instants c est entièrement gratuit si vous disposez déjà d un compte et qu il est bien activé connectez vous à l aide du formulaire ci dessous identifiez vous identifiant mot de passe mot de passe oublié créer un compte l inscription est gratuite et ne vous prendra que quelques instants je m inscris convertir une chaine en utf 8 avec vba un billet de pierre fauconnier le 5 octobre 2021 par pierre fauconnier 3 commentaires 0 partages vous trouverez ici deux fonctions qui permettent de traiter les caractères utf 8 en vba dans les deux sens de conversion salut après un peu d histoire sur unicode et utf 8 dans ce billet nous avons vu dans ce billet la théorie du codage d un caractère unicode en utf 8 il est temps maintenant de passer à la pratique et d écrire deux fonctions en vba pour coder une chaine de caractères en utf 8 mais également de convertir une chaine reçue en utf 8 en chaine lisible sur notre machine en clair nous allons voir comment passer de je voudrais un café s il vous plait ça vous fera 4 monsieur à je voudrais un cafã s il vous plait ã a vous fera 4â monsieur et vice versa pour réaliser cela on va manipuler les bits avec des et des ou et des décalages il faut bien comprendre ici que lorsqu on transforme de l unicode en utf 8 on transforme une chaine de caractère en une valeur binaire des octets lorsque l on transforme de l utf 8 en unicode on transforme une valeur binaire des octets en une chaine de caractères sachez aussi que certaines bibliothèques permettent de réaliser ces transformations notamment adodb avec stream mais il n existe pas à ma connaissance de fonction native vba pour réaliser cela d où l utilité d avoir ces fonctions sous le coude ou plutôt dans le module tools à embarquer dans tous vos développements vba on notera cependant une limitation des fonctions proposées ci dessous le vba ne permet pas de récupérer les unicodes au delà de 65535 dans les faits ce n est normalement pas limitant sauf bien sûr à devoir utiliser des plans unicode qui vont au delà du code 65535 mais d abord voici les fonctions de conversion code vba sélectionner tout 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 function uni2utf text as string as string dim v as long dim i as long for i 1 to len text v ascw mid text i 1 select case v case is 128 uni2utf uni2utf mid text i 1 case is 2048 uni2utf uni2utf chr v and 1984 64 or 192 uni2utf uni2utf chr v and 63 or 128 case else uni2utf uni2utf chr v and 61440 4096 or 224 uni2utf uni2utf chr v and 4032 64 or 128 uni2utf uni2utf chr v and 63 or 128 end select next end function function utf2uni text as string as string dim v as long dim i as long i 1 do while i len text v asc mid text i 1 select case v case is 128 utf2uni utf2uni mid text i 1 i i 1 case is 224 utf2uni utf2uni chrw v and 63 64 asc mid text i 1 1 and 63 i i 2 case else utf2uni utf2uni chrw v and 31 4096 _ asc mid text i 1 1 and 63 64 _ asc mid text i 2 1 and 63 i i 3 end select loop end function rappels sur l arithmétique binaire et booléenne lorsque l on décale les bits de n rangs vers la droite on divise en fait la valeur exprimée par 2 n lorsque l on décale les bits de n rangs vers la gauche on multiplie la valeur exprimée par 2 n 6 2 3 0110 10 0011 24 8 3 11000 1000 0011 5 2 10 0101 10 1010 7 4 28 0111 100 11100 si l on souhaite isoler certains bits d une valeur binaire on réalise un et logique de cette valeur avec les bits que l on veut isoler à 1 010 110 01 01011001 and 000 111 00 000 110 00 si l on souhaite allumer un bit le passer à 1 on réalise un ou logique avec ce bit à 1 01 0 01111 ou 00 1 00000 01 1 01111 ici cela revient à ajouter 32 si l on souhaite éteindre un bit le passer le 0 on réalise un et logique avec ce bit à 0 et tous les autres à 1 01 1 01111 et 11 0 11111 01 0 01111 ici cela revient à retrancher 32 décorticage des fonctions si vous avez lu le second billet cité plus haut vous vous souviendrez de la logique de conversion et du tableau qui illustrait les cas possibles un seul octet 0 xxxxxxx 7 bits pour le code deux octets 110 xxxxx 10 xxxxxx 11 bits pour le code trois octets 1110 xxxx 10 xxxxxx 10 xxxxxx 16 bits pour le code quatre octets 11110 xxx 10 xxxxxx 10 xxxxxx 10 xxxxxx 21bits pour le code on comprend grâce à ce tableau que pour passer de unicode vers utf 8 on sépare les bits de couleurs dans des octets puis on place les bits de contrôle les bits de poids fort qui permettent de savoir de combien d octets est composé le caractère lorsque l on passe de utf 8 vers unicode supprime les bits de contrôle et l on rassemble les bits de couleurs des octets qui composent le caractère en une seule valeur la valeur unicode du caractère codé ces opérations sont effectuées à coup de and or et de décalages multiplications et divisions unicode vers utf 8 code vba sélectionner tout v ascw mid text i 1 asc w récupère le code unicode d un caractère vba limite les valeurs à 65535 caractères de sorte que vba ne permettra pas de traduire les caractères dont l unicode est supérieur à 65535 du coup on n aura jamais de caractère nécessitant 4 octets dans les faits ce n est normalement pas pénalisant pour nous sauf à devoir traduire des caractères vraiment très spécifiques code vba sélectionner tout 1 2 case is 128 uni2utf uni2utf mid text i 1 lorsque le code du caractère est 128 il est converti tel quel on l ajoute donc simplement à la chaine de résultat code vba sélectionner tout 1 2 3 case is 2048 uni2utf uni2utf chr v and 1984 64 or 192 uni2utf uni2utf chr v and 63 or 128 lorsque le code est 127 et 2048 2 11 on pourra coder le caractère sur deux octets on prend ici 2 11 car on aura besoin de 3 bits de contrôle pour l octet de poids fort 110 xxxxx et de deux bits de contrôle pour l octet de poids faible 10 xxxxxx il reste donc 11 bits sur les 16 pour coder le caractère le premier caractère est codé avec chr v and 1984 64 or 192 v and 1984 on isole les 5 bits de poids fort sur les 11 1984 dec 11111 000000 bin 64 permet de décaler les 5 bits retenus de 6 rangs vers la droite 64 2 6 or 192 192 pour ajouter le code qui indique que l on aura 2 octets pour le caractère 192 dec 110 00000 bin avec xxxxx000000 bin on obtient donc la valeur 110xxxxx bin le second caractère sera obtenu avec chr v and 63 or 128 v and 63 isole les 6 derniers bits de la valeur 63 dec 00111111 bin or 128 ajoute 128 128 dec 10000000 bin avec yyxxxxxx bin on obtient 10xxxxxx bin je pense qu il n est pas nécessaire de développer la suite de la fonction vous avez compris la manoeuvre utf 8 vers unicode chrw valeur permet de récupérer le caractère dont on passe le code unicode code sélectionner tout 1 2 3 case is 128 utf2uni utf2uni mid text i 1 i i 1 dans le sens unicode vers utf 8 on a vu qu un caractère dont l unicode était inférieur à 128 était repris tel quel dans l autre sens de la conversion on va donc faire de même l octet vaut le caractère puis incrémenter i pour passer à l octet suivant code sélectionner tout 1 2 3 case is 224 utf2uni utf2uni chrw v and 63 64 asc mid text i 1 1 and 63 i i 2 lorsque l octet est supérieur à 127 mais 224 c est que les trois bits de poids fort sont 11 0xxxxx on sait donc qu il y deux octets pour composer le caractère 110xxxxx 10xxxxxx v and 63 64 isole les 5 bits de poids faible et les décale de 6 rangs vers la gauche asc mid text i 1 1 and 63 passe à l octet suivant pour isoler les 6 bits de poids faible 10 xxxxxx dans les faits vue le deuxième bit de poids fort est à 0 ça revient à retrancher 128 passe le bit de poids fort à 0 00xxxxxx 110 xxxxx 10 xxxxxx devient donc à recomposer la valeur des 11 bits représentés par les x bien sûr vu que l on a traité 2 octets on ajoute i à 2 pour sauter l octet de poids faible que l on vient de traiter vous l aurez compris c est la même logique qui prévaut pour recomposer l unicode tenant sur 3 octets bien entendu ces fonctions sont utilisables en excel voilà j espère que ces trois billets sur unicode et utf 8 vous ont plu et qu ils vous ont permis de mieux comprendre le codage utf 8 d une chaine de caractères unicode j espère également que les deux fonctions données vous permettront de mieux faire dialoguer vos données vba avec le monde extérieur petit plus si vous le souhaitez vous pouvez saisir du texte dans notepad pour le convertir dans un sens ou dans l autre par exemple créez une nouvelle page dans notepad et assurez vous qu elle est en codage utf 8 puis saisissez bonjour un café svp ça fera 2 monsieur en basculant le codage de la page en ansi vous obtiendrez bonjour un cafã svp ã a fera 2â monsieur comme avec la fonction uni2utf vous avez lu gratuitement 3 articles depuis plus d un an soutenez le club developpez com en souscrivant un abonnement pour que nous puissions continuer à vous proposer des publications une erreur dans cette actualité signalez nous la votre nom votre e mail décrivez l erreur que vous souhaitez porter à notre connaissance signalerframe css top 50 z index 31 signalerframe show signalerframe textarea focus fermersignaler css cursor pointer click function signalerframe hide body css overflow auto signalerfond remove signaleraction click function post email signaler id 318977 username signalerframe input name username val email signalerframe input name email val comment signalerframe textarea val function r alert r signalerframe hide body css overflow auto signalerfond remove text 3 commentaires commenter signaler un problème discussion billet blog connexion contacter le responsable de la rubrique excel nous contacter soutenir developpez com participez hébergement publicité advertising informations légales 2000 2025 www developpez com