Format nombres

[aubelix]

[RÉSOLU] Format nombres

Bonjour à tous les amis du Forum. 🙂

Je reviens vers vous une fois plus.
J'aurai aimé en saisissant un nombre:
ex 1 obtenir 0,01
9 obtenir 0.09 ect...

Dans l'attente de vous lire.
Par avance, Merci.
Cordialement.

 

[phlaurent55]

Re : Format nombres

Bonjour à tous,

Pierrot étant absent en ce moment, voici le code:

Private Sub Worksheet_Change(ByVal Target As Range)
Static b As Boolean
If b Or (Target.Column <> 8 And Target.Column <> 10) Or Target.Count > 1 Then Exit Sub
If IsNumeric(Target) Then b = True: Target = Target / 100: b = False
End Sub

à+
Philippe

 

[aubelix]

Re : Format nombres

Bonjour Matinal à phlaurent55 et tout les Amis du Forum.

Merci pour ta réponse phlaurent55.
Sous Excel 2003 ça fonctionne très bien.

Bonne journée à Tous.
Cordialement.

 

[aubelix]

Re : Format nombres

Bonjour à tous les Ais du Forum. 🙂

Je reviens vers vous pour le problème suivant:
La macro fonctionne très bien. Mais...
Si je fais échap ou efface la saisie un zéro"0" s'inscrit dans la cellule
en lieu et place de la saisie. Je ne peux l'effacer, ni le supprimer.

Avez-vous la solution ?
Par avance, Merci.
Cordialement.

 

[phlaurent55]

Re : Format nombres

Re,

avec ce code, tout effacement de cellule ne provoquera pas l'apparition d'un zéro

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value = 0 Then Exit Sub
Static b As Boolean
If b Or (Target.Column <> 8 And Target.Column <> 10) Or Target.Count > 1 Then Exit Sub
If IsNumeric(Target) Then b = True: Target = Target / 100: b = False
End Sub

à+
Philippe

 

[aubelix]

Bonjour phlaurent55 🙂

Ca fonctionne très bien.
Mille Mercis.
Cordialement.

 

[mickey3d]

Re : Format nombres

Je viens d'avoir le même souci aujourd'hui, j'ai excel 2003, et pour rajouter des zéros dérrière un nombre, on fait menu "Format=>cellules=>Onglet Nombres=>personnalisée,
Voici ce qu'il faut faire, par exemple pour rajouter un 0 : #"0"

Bonsoir🙂

Salut,
essayer Format===>Cellule===>personnalisee===>"0,0"0
si ca te convient