Format de cellue => arrondi automatique sans le vouloir...

  • Initiateur de la discussion Initiateur de la discussion TDolphin
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

T

TDolphin

Guest
Bonjour,
dans un fichier, j'ai des chiffres correspondant a des numéro d'articles à saisir.
Exemple : 999 88 777 666 555 444
Ils sont toujours de cette forme.
J'ai essayer avec les formats suivants :
000" "00" "000" "000" "000" "000 mais cela m'affiche : 999 88 777 666 555 400
###" "##" "###" "###" "###" "### mais cela m'affiche 999 88 777 666 555 400
En clair, a chaque fois ça arrondi à la centaine pour le dernier groupe.
Auriez vous la solution à mon problème ?
Merci.
 
Re : Format de cellue => arrondi automatique sans le vouloir...

Bonjour.

Utiliser le format texte avant la saisie, ou forcer celui-ci en mettant une apostrophe en début de saisie.

Bonjour, hoerwind 🙂
 
Dernière édition:
Re : Format de cellue => arrondi automatique sans le vouloir...

Bonjour, et merci pour cette réponse rapide.
J'ai essayer en saisissant '99988777666555444 et ça m'affiche 99988777666555444 sans mes espace séparateur. (format de cellule 000" "00" "000" "000" "000" "000)
Dois je changer la chaine de format?
 
Re : Format de cellue => arrondi automatique sans le vouloir...

Re,

Les formats nombre s'applique aux nombres pas à du texte.
Pour avoir 123 456, soit formater au préalable la cellule en texte et saisir 123 456, soit conserver le format par défaut, et forcer la reconnaisance en texte en saisissant '123 456
 
Re : Format de cellue => arrondi automatique sans le vouloir...

Bonjour TDolphin, Patrick, hoerwind,

Ce qui a été dit est clair : pour afficher les 17 chiffres il faut le format Texte.

On ne peut donc pas utiliser le format nombre 000" "000" "000 etc

Donc se résoudre à taper les espaces...

A+
 
Re : Format de cellue => arrondi automatique sans le vouloir...

Re,

Pour éviter de taper les espaces, mettre cette macro dans le code de la feuille (clic droit sur l'onglet et Visualiser le code) :

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Set Target = Intersect(Target, [A:A], Me.UsedRange) 'cellules en colonne A
If Target Is Nothing Then Exit Sub
Dim txt As String, txt1 As String
Application.EnableEvents = False 'désactive l'action des évènements
For Each Target In Target
  txt = Replace(Target, " ", "") 'suppression des espaces
  txt = Replace(txt, ",", "") 'suppression des virgules
  txt = Replace(txt, ".", "") 'suppression des points
  If IsNumeric(txt) And Len(txt) = 17 Then
    txt1 = Format(txt, "000"" ""00"" ""000"" ""000"" ""000"" ""000")
    txt = Left(txt1, 19) & Right(txt, 3) 'corrige les 3 derniers caractères
    Target = txt
  End If
Next
Application.EnableEvents = True
End Sub
Les données sont entrées en colonne A qui, comme déjà dit, doit être au format Texte.

Nota : j'ai fait une boucle pour le cas où l'on entre simultanément plusieurs valeurs (par copier/collage spécial par exemple).

A+
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.
Retour