Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2019 Macro à 3 conditions

Atiom

XLDnaute Occasionnel
Bonjour,

Je souhaite obtenir une macro à 3 conditions sur la même ligne.

Je mets une petit fichier pour une meilleure compréhension

Merci d’avance pour votre aide
 

Pièces jointes

  • Doseur.xlsx
    13.2 KB · Affichages: 10

vgendron

XLDnaute Barbatruc
Bonjour..
comprend pas bien l'intérêt..

VB:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A5:C5")) Is Nothing Then
    Application.EnableEvents = False
    Range("A5:C5") = Target
    Application.EnableEvents = True
End If
End Sub
 

mapomme

XLDnaute Barbatruc
Supporter XLD
Re,

Un peu plus subtile : la moyenne des trois (vérifie aussi l'égalité des trois) :
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
   On Error GoTo err001
   Application.EnableEvents = False
   If Not Intersect(Target, Range("a5:c5")) Is Nothing Then Range("a5:c5") = Application.Average(Range("a5:c5"))
err001:
   Application.EnableEvents = True
End Sub
 

Atiom

XLDnaute Occasionnel
Bonjour,

Effectivement très mauvaise explication. Désolé!

Il s’agit d’une division en fonction des valeurs des cellules A5,B5 et C5

Selon la concentration de A5 ( Solution-mère ) et le réglage de C5 ( doseur) le résultat de B5 ( Solution finale ) change.

Exemple
Si A5 est à 50% et C5 reste à 100% nous devons obtenir en B5 ( Solution finale ) un résultat de 50%.

Dans ce cas B5 est égal à C5 devisé par A5

Mais si nous souhaitons obtenir une ( Solution finale ) à 10% en B5 les valeurs de A5 ou C5 doivent changer. Les deux en même temps ou alors un seul.
 

vgendron

XLDnaute Barbatruc
l'explication est toujous aussi légère...
B=C/A ==> OK

si tu changes A: on garde B pour calculer C, ou on garde C pour calculer B ?
si tu changes B: on garde A pour cacluler C ou on garde C pour calcule A ?
...
...
 

vgendron

XLDnaute Barbatruc
euh oui. une règle de trois, ou division. si vous voulez, ...
n'empeche que si tu ne modifies qu'UNE seule des inconnues;. il t'en restes2
si tu mets A=5
je peux te sortir une quantité de solutions... 10/2 15/3 20/4 25/5.....donc.. si tu ne fixes pas B ou C.. bah. on ne saura pas faire;.
 
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…