Alerte sonore...quand...

  • Initiateur de la discussion Initiateur de la discussion Guido
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Guido

XLDnaute Accro
Bonjour

Dans une feuile de mon fichier,a un certains moment le mot "Alerte temps" s'affiche dans la cellule U 12,

J'aimerais avoir en meme temps une alerte beep...Sonore..

Merci pour votre aide

Guido
 
Re : Alerte sonore...quand...

Bonjour,

sans plus de détails, essaye peut être ceci, à placer dans le module de la feuille concernée :
Code:
Option Explicit
Private Sub Worksheet_Calculate()
If Range("U12") = "Alerte temps" Then Beep
End Sub

bonne journée
@+
 
Re : Alerte sonore...quand...

Re

J'ai un bugg...

Je te dis comment ,j'ai proceder..

Klic droit sur l'onglet de la page concernée.

en dessous d'une macro j'ai coler le texte.valider avel le petit carré bleu.quand je desire quitté la page ca bugg debocage..

Guido
 
Re : Alerte sonore...quand...

BOnjour Pierrot , Guido ,

Si tu as coller en dessous d'une autre macro ,

il faut enlever le Option Explicit, car cette instruction doit se situer uniquement sur la première ligne du module.

Re
camarchepas

oui,j'ai enlevé les deux mots.je vais voir...

question..

pour deux series d'alerte de U12:U20 et U23:U31

comment rediger le texte de la macro...

Merci

Guido
 
Re : Alerte sonore...quand...

Re,
bonjour camarchepas

essaye ceci :
Code:
Option Explicit
Private Sub Worksheet_Calculate()
Dim x As Range
Set x = Range("U12:U20,U23:U21").Find("Alerte temps", , xlValues, xlWhole, , , False)
If Not x Is Nothing Then Beep
End Sub
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
15
Affichages
650
Réponses
16
Affichages
419
  • Question Question
Microsoft 365 Fonction si
Réponses
7
Affichages
137
Réponses
5
Affichages
210
Réponses
12
Affichages
519
Retour