Macro - format texte avec nombres limités

[samimi94]

Bonsoir à tous,

Je cherche désesperement le code qui permet de mettre dans une colonne précise le format texte avec des nombres limités.

Je m'explique, j'exporte un fichier texte dans Excel dont une colonne ne contient que des nombres.
Dans la macro je mets un bout de code pour le formater en texte ("@")mais dans ce cas là le résultat me donne par exemple 11E+15 (car trop de chiffres) quand par contre dans la macro je mets format "0000000000" dans ce cas cà me remplace mon dernier chiffre par un 0.

Que faire pour avoir du texte avec mon nombre limité sans modification ?

Par avance, merci et bonne soirée.

 

[samimi94]

Re : Macro - format texte avec nombres limités

Re bonsoir,

A force de recherches j'ai trouvé un bout de code qui correspond à une partie de ce que je désire mais je ne parviens pas à l'adapter :

Dim M As Integer

For M = 1 To Sheets.Count
   With Worksheets(M).Columns(2)
        .NumberFormat = "0000000000"
        .AutoFit
    End With
Next

Sachant que le contenu de ma colonne doit avoir 10 chiffres (ni plus ni moins) mais que la taille de cette colonne doit respecter une longueur de 20, j'ai ajouté :

Columns("B:B").ColumnWidth = 20

Je n'arrive pas à faire ce que je souhaite avec ces 2 bout de code.
Soit j'obtiens mais 10 chiffres suivit de 10 zéros soit j'obtiens un résultat faussé.

Si une personne parmis vous pouvez me dire ce que je ne fais pas bien, SVP.

Merci et très bonnes soirée.