Format cellule

Résolu
victorgirault Messages postés 14 Date d'inscription   Statut Membre Dernière intervention   -  
victorgirault Messages postés 14 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je souhaiterais que ma macro prennent en compte le format de la colonne A sur la feuille 1.
C'est à dire que les cellules A2: 00001681; A3: 00002108.... se copie de la même manière, même format, avec les 0 devant.....

Voici le bout de code a modifier d'après moi:
.Cells(lideb, 2).Resize(nbliT, 2) = T
.Range(.Cells(lideb, 2), .Cells(lideb + nbliT - 1, 2)).NumberFormat = "00000000"

ce code fonctionne très bien, quand ce qui est du format, mais s'affiche dans la cellule sous un format nombre.
Par exemple:
Nous avons A2: 00001681... je lance la macro.... cela s'affiche en B2: en "00001681" mais reste affiché dans la cellule 1681 alors que je souhaite garder les 0000 avant....

Voici le document joint avec la macro attenante.
https://www.cjoint.com/c/EGdhhoDwE6y

Je reste à votre disposition pour toutes vos questions.

Merci
A voir également:

2 réponses

Réponse 1 / 2
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
bonjour
si tu veux du format texte
format(Range(.......) ,"00000000")
0
Réponse 2 / 2
victorgirault Messages postés 14 Date d'inscription   Statut Membre Dernière intervention  
 
Merci michel_m.
Pourrais tu m'écrire le code exact avec la macro que j'ai jointe stp car mes compétences en la matière sont limitées....
0
victorgirault Messages postés 14 Date d'inscription   Statut Membre Dernière intervention  
 
'.Range(.Cells(lideb, 5), .Cells(lideb + nbliT - 1, 5)).NumberFormat = "00000000"
0
victorgirault Messages postés 14 Date d'inscription   Statut Membre Dernière intervention  
 
C'était la réponse.
Merci à toi michel_m ^^
0