Pop-up d’alerte vba

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 .