Tada.wav si cellule O5 ="ok"

[guy72]

Bonjour,
Est-il possible d'avoir le son "Tada" de C:\Windows\Média, quand dans la cellule O5 le mot "ok" apparait ?
Merci de votre aide.

 

[roro69]

Re : Tada.wav si cellule O5 ="ok"

Bonsoir
A ESSAYER

 

[Dull]

Re : Tada.wav si cellule O5 ="ok"

Salut guy72, roro69, le Forum

regardes ce lien c'est exactement ce que tu demande remplace A1 par O5

Bonne Journée

 

[guy72]

Re : Tada.wav si cellule O5 ="ok"

Bonsoir
A ESSAYER

Bonjour,

Oui ça fonctionne, mais ça ne s'arrete jamais.

 

[guy72]

Re : Tada.wav si cellule O5 ="ok"

Bonjour Dull
C'est presque ça.
Le problème que pour avoir le son, je suis obligé de sélectionner une autre cellule puis de la recélectionner pour avoir le son.
Et pour l'éffacer, il faut la célectionner et la le son apparait encore alors qu'il ne faudrait plus.
Pas facile à nexpliquer, voici un modèle.
http://cjoint.com/?khmO2r5rpA

 

[Dull]

Re : Tada.wav si cellule O5 ="ok"

Re guy, le fil

Pas trop compris essaye de mettre la procédure dans

Private Sub Worksheet_Change(ByVal Target As Range)

histoire de voir

Bonne Journée

 

[guy72]

Re : Tada.wav si cellule O5 ="ok"

Re ça change rien?
j'ai modifiédans ma macro "Fin" pour re sélectionner la cellule ou il doit y avoir le son.
qui dans l'exemple est le cellule AX10.
Sub Fin()
Range("AX8").Select
Selection.Copy
Range("AX10").Select
Selection.PasteSpecial Paste:=xlPasteValues
Range("AX20").Select
Selection.Copy
Range("AX10").Select
Range("A1").Select
Application.CutCopyMode = False
End Sub