Excel enlever la virgule quand le nomre est entier
Résolu
Zozo
-
Zozo -
Zozo -
Bonjour,
Je n'arrive pas à faire un format personnalisé d'une cellule excel.
Je voudrais tout simplement ajouter "V" à la fin d'un nombre car il s'agit de volts !
J'ai essayé plusieurs format dont (par exemple) celui ci : #,# "V"
Le problème c'est qu'il ajoute une virgule après les nombres entiers.
Moi je voudrai que que chose de simple
J'ai (par exemple)
5,5 et 7
Je voudrais : 5,5 V et 7 V
Avec #,# "V" j'obtiens: 5,5 V et 7, V (foutu virgule)
Comment faire pour l'enlever ?
Je n'arrive pas à faire un format personnalisé d'une cellule excel.
Je voudrais tout simplement ajouter "V" à la fin d'un nombre car il s'agit de volts !
J'ai essayé plusieurs format dont (par exemple) celui ci : #,# "V"
Le problème c'est qu'il ajoute une virgule après les nombres entiers.
Moi je voudrai que que chose de simple
J'ai (par exemple)
5,5 et 7
Je voudrais : 5,5 V et 7 V
Avec #,# "V" j'obtiens: 5,5 V et 7, V (foutu virgule)
Comment faire pour l'enlever ?
A voir également:
- Excel enlever la virgule quand le nomre est entier
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Comment calculer la moyenne sur excel - Guide
- Enlever pub youtube - Accueil - Streaming
- Aller à la ligne excel - Guide
4 réponses
Bonjour
Impossible avec un personnalisé qui mettra dans tous les cas une virgule avec un chiffre après : 5,5 V ou 7,0 V
Il faut passer par une macro
Ouvrir l'éditeur VBA - Double clic sur le nom de la feuille concernée dans l'arborescence - Copier et coller la macro ci-dessous dans la page et fermer l'éditeur
Si tu veux limiter la mise en forme qu'à une plage de cellules il faut rajouter une ligne avant le IF en y indiquant la plage, apr exemple ici B2:B10 et ajouter un End if
Cdlmnt
Via
Impossible avec un personnalisé qui mettra dans tous les cas une virgule avec un chiffre après : 5,5 V ou 7,0 V
Il faut passer par une macro
Ouvrir l'éditeur VBA - Double clic sur le nom de la feuille concernée dans l'arborescence - Copier et coller la macro ci-dessous dans la page et fermer l'éditeur
Private Sub Worksheet_Change(ByVal Target As Range) If Len(Target.Value) = Len(Application.WorksheetFunction.Substitute(Target.Value, ",", "")) Then Target.NumberFormat = "0"" V""" Else Target.NumberFormat = "0.0"" V""" End Sub
Si tu veux limiter la mise en forme qu'à une plage de cellules il faut rajouter une ligne avant le IF en y indiquant la plage, apr exemple ici B2:B10 et ajouter un End if
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("B2:B10")) Is Nothing Then If Len(Target.Value) = Len(Application.WorksheetFunction.Substitute(Target.Value, ",", "")) Then Target.NumberFormat = "0"" V""" Else Target.NumberFormat = "0.0"" V""" End If End Sub
Cdlmnt
Via
Je ne sais pas si je vais me prendre la tête avec la solution que tu me propose ou me contenter de cette présentation approximative. (Mais merci dans tous les cas.)
Par ailleurs je ne sais pas comment ouvrir l’éditeur VBA. Cela se trouve où exactement ?
Merci encore ;)