Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

msgbox personaliser

ILOVEUBB

XLDnaute Occasionnel
slut!! les expert


j'ai une question !

peut-on crée une msgbox qui s'ouvre en fonction d'une date précise qui se trouve dans une cellule et qui met un bipe sonor !!

avec la précision que plusieurs date peut se trouver dans une cellule .

merci
 

Staple1600

XLDnaute Barbatruc
Re : msgbox personaliser

Bonsoir à tous, Victor21

Oui on peut surtout quand la télé est éteinte et qu'on dort pas encore..
alors on s'occupe comme on peut
Code:
Sub a()
Dim x As Range
Set x = Cells(1, 23).Offset(45, 6)
Y = DateSerial(1984, 7, 8)
Z = Y + 23
x = Y & Space(1) & Z
If CDate(Split(x)(0)) = Y Then
MsgBox "Message personnalisé", vbCritical
End If
End Sub

PS: Penses à brancher tes enceintes pour entendre le bip
 

Discussions similaires

Réponses
30
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…