Macro avec la fonction SI (2)
Bonjour,
J'ai ajouté une cellule dans mon tableau, et la macro n'est plus opérationnel. j'ai essayé de changer le numéro de cellule de la macro mais en vain.( feuil 1)
le code qui a été affecté au départ et que j'ai essayé d'ajuster mais ca marche tjrs pas est:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column =7 Or Target.Column =9 Then
If Cells(Target.Row, 7) = "" And Cells(Target.Row, 9) = "" Then
Cells(Target.Row, 10) = ""
ElseIf Cells(Target.Row, 9) = "" Then
Cells(Target.Row, 10) = "Absence réception"
ElseIf Not IsDate(Cells(Target.Row,7)) Or Not IsDate(Cells(Target.Row, 9)) Then
Cells(Target.Row,10) = "Date incorrecte"
ElseIf Cells(Target.Row,9) = Cells(Target.Row, 7) Then
Cells(Target.Row,10) = "Réceptionné à temps"
ElseIf DateDiff("d", Cells(Target.Row,9), Cells(Target.Row, 7)) < 0 Then
Cells(Target.Row, 10) = "Réception retardée"
Else
Cells(Target.Row, 10) = ""
End If
End If
End Sub
Dans la Feuil 2 , il y'a un 2ème tableau où je veux insérer une macro de fonction SI comme suite:
Si la colonne G= la colonne J ==> message colonne M= conforme: respect du prix et de la quantité
Sinon non conforme
Dans la Feuil 3, il y 'a un 3ème tableau où j'aimerai insérer une macro de fonction SI comme suite:
Si colonne D = colonne F ==> message colonne I = conforme
sinon non conforme
MERCI POUR VOTRE AIDE
Bonsoir,
Si on le fait avec les formules seulement, il faudra dupliquer la formule à chaque ce qui crée une manque de souplesse chez l'utilisateur . Par contre si elle vient instantanément , beaucoup de problème n'auront pas lieu.
Bien à vous