Création PopUp suivant conditionRésolu

Question

Bonjour,

Je souhaite créer sous Excel un PopUp ("Bonjour !") ou Msgbox suivant la condition sur une cellule (ex : C2<0).

J'ai un début de script qui ne fonctionne pas, bien sûr  :
Private Sub Workbook_Open()
   If C2 < 0 Then
       MsgBox "Bonjour !"
   End If
End Sub

Comment puis-je faire  Est-ce qu'il y aurait une âme charitable pouvant venir à mon aide 

Est-ce possible de faire ce test toutes les 15 minutes, et surtout comment 

Merci beaucoup.

cs_casy · Accepted Answer

Essaye avec ceci peut-etre :

Private Sub Workbook_Open()
   If ActiveSheet.Range("C2").value < 0 Then
       MsgBox "Bonjour !"
   End If
End Sub

Sans garantie j'ai pas fait le test

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #

ElectroChris · Answer

Ca marche ! 
J'avais pas pensé à mettre : ActiveSheet.Range("C2").value, d'ailleurs je connaissait pas.

Par contre, comment faire pour ke ce test se fasse toutes les 5 minutes par exemple ? Je pense qu'il faut introduire une variable t qui s'incrémente toutes les x secondes ou minutes et qui est remise à 0 à l'arrêt de Excel.

Mes connaissances sous Excel étant limitée si qqun pouvait m'aider, ce serait bien.

Merci en tout cas pour la réponse rapide !

cs_casy · Answer

Il te faut utiliser un timer. Mais je crois bien que sous Excel, le controle timer n'existe pas.

Regarde le premier commentaire de Mortalino sur cette source, il te donne l'astuce pour créer un timer sous excel :
http://www.vbfrance.com/codes/TIMER-POUR-VBA_39308.aspx

Pour débuter, le code de Mortalino est plus interessant que la source elle-même

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #

Création PopUp suivant condition

3 réponses

Votre réponse

Discussions similaires