Signaler

[VBA] encodage fichier perdu pdt copier coller [Résolu/Fermé]

Posez votre question yacleouf 438Messages postés mercredi 11 mars 2009Date d'inscription 8 juin 2015 Dernière intervention - Dernière réponse le 11 janv. 2013 à 15:53 par yacleouf
Bonjour,

je suis actuellement entrain de développer une petite macro sous excel, afin de copier coller des données d'une feuille excel vers un fichier txt,
pour l'instant mon code marche très bien il copie tout ce que j'ai besoin et me le colle dans mon txt.
Les données que j'ai à copier peuvent être écrient dans différentes langues, donc différents encodage (Russe, mandarin etc ...)
à l'heure actuelle mon script ne m'affiche que des "????" à la place des données, merci d'avance celui ou celle qui m'aideras ! ^^

ps: si je copie colle bêtement ma colonne excel (russe par exemple) dans mon fichier txt, sa marche ....
voilà ce que j'utilise comme instruction d'appel au fichier txt

Open "c:\trad.txt" For Output As #1
For nb = 1 To 328

adresselbl = ThisWorkbook.Sheets(3).Range("A" & nb).Value

Print #1, " " & adresselbl
Next
Close #1



Utile
+0
plus moins
petit up svp =)
Personne ne saurait comment ne pas perdre l'encodage ?
j'ai essayer pleins de chose tel que l'ajout de références au cyrillique ...
Utile
+0
plus moins
Sujet clos,
j'ai changé ma façon d'enregistrer mes données et sa passe...

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !