Microsoft 365 Décimale selon valeur d'une autre cellule

ShrekL · 10 Juin 2020

Bonjour,

J'aimerais créer un code dans une feuille excel où le nombre de décimal affiché dans la colonne A est en fonction des valeur entrées dans la colonne B. Par exemple, la valeur en A1 n'aurait aucune décimale si la valeur dans B1 se trouve entre 0,01$ et 9,99$, 1 décimale si B1 se trouve entre 10,00$ et 99,99$ et 2 décimales si B1 > ou = 100,00$.

J'aimerais que cela se fasse automatiquement et sans avoir recourt à l'ajout d'une autre colonne.

Est-ce que cela se fait automatiquement par un code dans la feuille?

Merci de votre aide

sylvanu · 10 Juin 2020

Bonsoir Dranreb,
Exact et Ô combien plus simple. Je n'y ai pas pensé.

sylvanu · 10 Juin 2020

Bonsoir Shrekl,
Un essai en PJ avec cette petite macro événementielle qui est active sur la colonne D :

VB:

Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
    If Target.Column = 4 Then   ' 4 pour colonne D, à ajuster
        If Abs(Target.Value) < 10 Then Target.NumberFormat = "0"
        If Abs(Target.Value) > 10 And Abs(Target.Value) < 100 Then Target.NumberFormat = "0.0"
        If Abs(Target.Value) > 100 Then Target.NumberFormat = "0.00"
    End If
End Sub

Mais votre demande est "bizarre", généralement plus les nombres sont petits plus la partie décimale est importante. Cependant, j'ai codé comme demandé.
Petit détail : XL arrondit l'affichage comme pour mise en format.

Dranreb · 10 Juin 2020

Bonsoir.
Ça peut se faire avec des MFC

sylvanu · 10 Juin 2020

Bonsoir Dranreb,
Exact et Ô combien plus simple. Je n'y ai pas pensé.

ShrekL · 11 Juin 2020

Mon dieu... J'ai TELLEMENT cherché à le faire avec les MFC et je ne trouvais pas. Je ne sais pas pourquoi mais en vous lisant ce matin ça m'Est venu tout naturellement!!! Merci sincèrement à vous!!!

Microsoft 365 Décimale selon valeur d'une autre cellule

ShrekL

XLDnaute Junior

sylvanu

sylvanu

XLDnaute Barbatruc

Pièces jointes

Dranreb

XLDnaute Barbatruc

sylvanu

XLDnaute Barbatruc

ShrekL

XLDnaute Junior

Discussions similaires