[Excel VBA] Formater une cellule en texte [Résolu]

Bonjour,

Pour conserver la propriété texte de la cellule, utiliser :

Cells(ligne, colonne).NumberFormat = "@" ' Format Texte

exemple :

Sub CaptureDonnee()

    Dim Valeur As Variant, Donnee As String
    
    Cells(Ligne, colonne) = "@"   'Texte
    
    ' Si vous n'effectuer pas le contrôle
    Donnee = Cells(Ligne, colonne).Value
    
    ' Si vous effectuer le contrôle
    Valeur = Cells(Ligne, colonne).Value
    Donnee = CStr(Valeur)
    
End Sub
'

Lupin

Essaie avec cells(ligne,colonne).NumberFormat = "0000000000" ou le nombre de chiffres que tu veux conserver.

De cette façon, la cellule affichera toujours le nombre de chiffres que tu a spécifié. Dans mon exemple, 121 s'afficherait 0000000121. De plus, c'est toujours un nombre.

Si tu veux des chiffres après la virgule, écrit par exemple NumberFormat = "0000.000"

vb

Euh je viens de réaliser que j'ai répondu un peu vite.
En fait ta solution fonctionne, puisque je connais la longueur de mon nombre, vu qu'il est stocké en tant que string (enfin bon les type en vba, c'et franchement pas très sérieux...). Mais bon çà m'oblige à faire du cas par cas et c'est franchement pas très beau au niveau code... le top serait de ne réécrire le mon nombre tel quel sans modification aucune... :s

Comment sont entré tes nombres? Manuellement? Par un userform? Par une macro?

Merci pour la réponse, mais le problème c'est que çà affichera des "0" en trop
C'est à dire, je veux exactement le même nombre de "0" que j'ai passé en entrée. Mais évidemment ce nombre est variable. (ben ouais pourquoi faire simple quand on peut faire compliquer)

Donc les nombre suivant doivent apparaitre tel quel :

00000032165
006454
5422
04456

Impeccable çà marche Lupin!
Grand Merci!
Fallait la connaitre celle-là...

re :

en fait, l'astuce est de toujours bien connaître le type de la donnée et le type du contenant.

Bonne continuité.

Lupin

voici mon probleme (je debutes )
apres avoir confctionne un tableau , l'avoir mis enforme automatique (facultatif) l'avoir passé au tri croissant et,
utilisé RECHERCHE (x;y:z) jusque la tout va bien J'aimerai pouvoir actualiser la valeur selectionnee par la fonction
RECHERCHE , sans etre obligé de revenir au tableau
J'ai trouvé un debut de solution totalement insatisfaisant puisque il me plonge dans le piege des references
circulaires ; De plus la valeur de mise a jour s'applique quelque soit la valeur extraite par la fonction(c'est logique)
existe -t -il un procede qui non seulement "memorise" la nouvelle valeur du resultat RECHERCHE(..........)
et, de plus effacerai le contenu de la cellule de" mise à jour AUTOMATIQUEMENTa chaque changement de demande


j'ai essaye un tas de fonctions ,des macros ,format conditionnel
peut-on executer une macro sans obligatoirement passer par une commande (bouton.....)
merci de me permettre d'atterrir

slt!
suis très heureux de porter solution a votre problème sans complication.
procedure:
-selectionner la colone en question
-format
-cellule
-Personaliser
-selectionner 0
-Tapez "0" devant le 0
-ok
le problème est resolu
j'attend votre remerciement dans brabantakin@gmail.com
CHARLES NSALA
ADMINISTRATEUR RESEAU