pop-up d’alerte vba Résolu/Fermé

Question

Bonjour, 
Actuellement j'essaye de faire comme mon titre l'indic une pop-up d'arlete , je ne sais pas si c'est le bon termes mais c'est ce qui convient le mieux d’après moi.
Nous avons actuellement un fichier appelé " demande 'activité " que nous utilisons pour le déstockage , dernièrement nous l'avons lié à un nouveau logiciel de gestion de stock , jusqu'ici tout se passe bien .
Mais voila je cherche a pouvoir faire apparaître une pop-up d'alerte lorsque l'on souhaite faire un déstockage supérieur( quantité demandée) a ce que nous avons en stock(quantité en stock) .
Voici le code que j'ai tenté d'utiliser :
Option Explicit
Private Sub Workbook_Open()
     If Not ActiveWorkbook.Name Like "*.xltm" Then
        If ActiveWorkbook.Worksheets("liste").Range("J3").Value = "" Then
            ActiveWorkbook.Worksheets("liste").Range("J3").Value = Now
    Dim Valeur As Integer
     Valeur = Range("D33:D42").Value
        If Valeur > Range("I33:I42") Then
         MsgBox (" stock insuffisant")
        End If
        End If
    End If
End Sub
Je vous joint une capture pour un meilleurs visu ,
En vous remerciant pour le temps que vous m'accorderai .
ps : la colonne du milieu "description" est une liste déroulante .
Cordialement .
Configuration: Windows 7 / Chrome 55.0.2883.87

Utilisateur anonyme · Answer

Bonjour kadiski,
Je te propose ce fichier Excel 2007 (sans macro).
Il n'y a pas de pop-up d'alerte, mais je crois que tu aimeras mieux.
Colonne J : Quantité « À livrer » ; formule en J33 (tirée jusque J42) :
=SI(D33>0;MIN(D33;I33);"")
Donc si Quantité demandée > Quantité « En stock » : minimum des 2.
Colonne L : Quantité « Manquante (à livrer) » ; formule en L33
(tirée jusque L42) : =SI(D33>I33;D33-I33;"")
« (à livrer) » = à livrer plus tard, quand le stock sera réapprovisionné.
Voilà ce qui remplace ton alerte pop-up : s'il y a un nombre dans cette
colonne, c'est que le stock est insuffisant par rapport à la demande.
Si ton problème est réglé, merci d'aller en haut de page
pour cliquer sur « Marquer comme résolu ».
Cordialement.  :)

Patrice33740 · Answer

Bonjour
Pour obtenir un message d'avertissement sans VBA, tu peux tout simplement utiliser un contrôle de saisie à l'aide de la validation de données Excel.

kadiski · Answer

Bonjour albkan et Patricia , je vous remercie du temps que vous m'avez accordé pour m'aider , et vos suggestions m'ont beaucoup aidé .
En vous remerciant et Joyeuse Fêtes .

Pop-up d’alerte vba

3 réponses

Discussions similaires