Message d'alerte en fonction d'un résultat

[romubzh35]

Bonjour
je ne connais rien de la programmation et j'aimerais apprendre mais pour le moment pourriez vous m'aider pour la modification suivante :
En fonction du résultat d'une cellule, je souhaite afficher un message d'alerte
Fichier en pièce jointe
merci d'avance

 

[gilbert_RGI]

Re : Message d'alerte en fonction d'un résultat

Bonjour,

un truc de ce genre ?

 

[romubzh35]

Re : Message d'alerte en fonction d'un résultat

bonjour
oui on est pas loin
il faudrait juste que cette boite s'ouvre à chaque fois que je fais une nouvelle saisie egalement qui rentre dans le critere
mais merci bcp déjà pour votre aide

 

[Papou-net]

Re : Message d'alerte en fonction d'un résultat

Bonjour sissimumu, gilbert_RGI,

Je l'ai fait alors je le joins.

Cordialement.

 

[gilbert_RGI]

Re : Message d'alerte en fonction d'un résultat

bonjour
oui on est pas loin
il faudrait juste que cette boite s'ouvre à chaque fois que je fais une nouvelle saisie egalement qui rentre dans le critere
mais merci bcp déjà pour votre aide

voir le fichier 3 dans le message précédent

 

[Papou-net]

Re : Message d'alerte en fonction d'un résultat

RE:

Petites précisions dans ma solution:

- Le message ne s'affiche que lors du changement d'une cellule en colonne K, à partir de la ligne 8.
Je suppose que ces cellules ont une formule pour calculer l'écart, ce qui n'est pas le cas dans le fichier joint. Il faut donc modifier manuellement les cellules pour vérifier l'affichage.

- MsgBox reprend les en-têtes des colonnes concernées (Q7, R7, S7). Ainsi, si on modifie les titres pas besoin de corriger le code.

Cordialement.

 

[romubzh35]

Re : Message d'alerte en fonction d'un résultat

j'ai oublié de dire que le chiffre ecart est une formule alors que dans le dossier que j'ai joint ce n'est pas une formule
il faudrait qu'a chaque saisie la fenetre s'affiche si l'ecart est <> de 0

 

[gilbert_RGI]

Re : Message d'alerte en fonction d'un résultat

j'ai oublié de dire que le chiffre ecart est une formule alors que dans le dossier que j'ai joint ce n'est pas une formule
il faudrait qu'a chaque saisie la fenetre s'affiche si l'ecart est <> de 0

mon exemple fonctionne aussi avec une formule

 

[gilbert_RGI]

Re : Message d'alerte en fonction d'un résultat

tu peux essayer aussi avec une Validation des données pas besoin de macro

 

[romubzh35]

Re : Message d'alerte en fonction d'un résultat

lorsque j'insere des nouvelles lignes pas de message en vue

 

[Papou-net]

Re : Message d'alerte en fonction d'un résultat

Essaie de modifier ton code comme ceci:

Private Sub Worksheet_Change(ByVal Target As Range)
'Cette procédure est déclenchée dès qu'une cellule quelconque change de valeur
'Si la cellule modifiée n'est pas dans la plage K8:K... ou si elle égale à 0 on sort de la macro
If Intersect(Range("J8:J" & Rows.Count), Target) Is Nothing Then Exit Sub
If Target.Offset(0, 1) <> 0 Then
  MsgBox "Merci de renseigner les cases " & Range("Q7") & ", " & Range("R7") & _
    " et " & Range("S7") & " pour toutes les références dont l'inventaire n'est pas bon.", _
    vbOKOnly + vbExclamation
End If
End Sub

Cordialement.

 

[romubzh35]

Re : Message d'alerte en fonction d'un résultat

ah nickel merci bcp
comment puis je le mettre dans mon fichier d'origine ?

 

[Papou-net]

Re : Message d'alerte en fonction d'un résultat

RE:

Après avoir lancé l'éditeur VBE (ALT-F), double-click sur le nom de la feuille adéquate de ton fichier dans la fenêtre de gauche (Projet - VBAProject).

Dans la fenêtre principale:

liste déroulante de gauche ---> Worksheet

liste déroulante de droite ---> Change

Il ne te reste plus qu'à recopier les lignes du code, hormis la première et la dernière.

Cordialement.

 

[romubzh35]

Re : Message d'alerte en fonction d'un résultat

ah merci bcp
tout est en place
bonne journée