Fenetre d'alerte

Résolu
Bonjour,

je voudrais qu'une fenêtre d'alerte s'affiche par rapport un texte spécifique. Dans mon fichier, j'ai une liste déroulante avec restriction de données et je voudrais que si on demande une veste, une fenêtre s'affiche en disant que le délais et très long. et cela pour plusieurs article. Merci de votre aide.

1 réponse

  1. bonjour,

    code à coller sur la feuille en question dans l’éditeur de VBA (alt + F11)
     Private Sub Worksheet_Change(ByVal Target As Range)
        If Not Application.Intersect(Target, Range("A:A")) Is Nothing Then ' colonne à ajuster à ton cas
            If UCase(Target) = "VESTE" Then MsgBox "Attention délais très long sur cet article"
        End If
    End Sub


    0
    1. bonjour,

      j'ai essayer de coller ce code mais ca ne fonctionne pas, ca me dit : erreur de compilation, end sub attendus.
      0
    2. Bonjour,
      copie ici l'intégralité de ton code stp
      0
    3. bonjour,

      finalement, j'ai utiliser la fonction 'si' qui va aussi bien :

      =SI((B543=liste!$A$76)*ET('fourniture et EPI'!D543=liste!$C$5);liste!$E$5;"")&SI((B543=liste!$A$76)*ET('fourniture et EPI'!D543=liste!$C$6);liste!$E$5;"")&SI((B543=liste!$A$76)*ET('fourniture et EPI'!D543=liste!$C$7);liste!$E$5;"")&SI(B543=liste!$A$40;liste!$E$5;"")

      par contre j'aimerais que cette fonction s'annule si je mets un commentaire dans une autre cellule, est-ce possible. par exemple : "sauf si U543=solde"
      0
    4. =SI(U543="Solde";"";SI((B543=liste!$A$76)*ET('fourniture et EPI'!D543=liste!$C$5);liste!$E$5;"")&SI((B543=liste!$A$76)*ET('fourniture et EPI'!D543=liste!$C$6);liste!$E$5;"")&SI((B543=liste!$A$76)*ET('fourniture et EPI'!D543=liste!$C$7);liste!$E$5;"")&SI(B543=liste!$A$40;liste!$E$5;""))
      0
    5. super, je me cassais la tête a le mettre à la fin, mais en effet c'est logique, merci.
      0