XL 2013 [B]Declanchement du son si la valeur cherchée existe[/B]

[ramzi_007]

Bonjour,

Je suis nouveau ici, et j'aurais besoin de votre aide pour mon projet

Je souhaite créer un fichier excel qui déclenche un son lorsque certains valeurs sont tapées,

par exemple créer plusieurs feuilles excel, sur chaque feuille on a une catégorie d'articles ( catégorie 1, catégorie 2 ... )
sur la feuille principale, on tape des numéros d'articles, le fichier doit automatiquement déclencher un son qui indique dans quelle catégorie cet article se trouve.

j'ai effectué plusieurs recherches, j'ai trouver ces codes la, mais malheureusement je sais pas comment les personnaliser.

opy the code below to a VBA module in your workbook.

'Windows API function declaration
Private Declare Function PlaySound Lib "winmm.dll" _
Alias "PlaySoundA" (ByVal lpszName As String, _
ByVal hModule As Long, ByVal dwFlags As Long) As Long

Function Alarm(Cell, Condition)
Dim WAVFile As String
Const SND_ASYNC = &H1
Const SND_FILENAME = &H20000
On Error GoTo ErrHandler
If Evaluate(Cell.Value & Condition) Then
WAVFile = ThisWorkbook.Path & "\sound.wav" 'Edit this statement
Call PlaySound(WAVFile, 0&, SND_ASYNC Or SND_FILENAME)
Alarm = True
Exit Function
End If
ErrHandler:
Alarm = False
End Function

NOTE: The Alarm function expects a WAV file (named sound.wav) in the same path as the workbook. You will need to change this statement to match the name (and path) of your actual sound file. If the sound file is not found, the default system sound will be used.

 

[Lone-wolf]

Re : Declanchement du son si la valeur cherchée existe

Bonsoir ramzi et bienvenue sur XLD

Si tu as 1000 articles tu imagine un peu l'horchestre avec mille son .wav ?!
As-tu regarder qu'est-ce qu'il fallait mettre pour Cell et Condition?

A+

 

[ramzi_007]

Re : Declanchement du son si la valeur cherchée existe

Bonsoir WOLF

c'est un son par categorie, j'aurais maximum 7 catégories donc 7 sons

can u help ?

 

[Lone-wolf]

Re : Declanchement du son si la valeur cherchée existe

Re ramzi,

À quoi correspondent Cell et Condition? Tu as regardé?


A+

 

[ramzi_007]

Re : Declanchement du son si la valeur cherchée existe

Re bonjour

je recopie toute la page

The Alarm function

Copy the code below to a VBA module in your workbook.

'Windows API function declaration
Private Declare Function PlaySound Lib "winmm.dll" _
Alias "PlaySoundA" (ByVal lpszName As String, _
ByVal hModule As Long, ByVal dwFlags As Long) As Long

Function Alarm(Cell, Condition)
Dim WAVFile As String
Const SND_ASYNC = &H1
Const SND_FILENAME = &H20000
On Error GoTo ErrHandler
If Evaluate(Cell.Value & Condition) Then
WAVFile = ThisWorkbook.Path & "\sound.wav" 'Edit this statement
Call PlaySound(WAVFile, 0&, SND_ASYNC Or SND_FILENAME)
Alarm = True
Exit Function
End If
ErrHandler:
Alarm = False
End Function

NOTE: The Alarm function expects a WAV file (named sound.wav) in the same path as the workbook. You will need to change this statement to match the name (and path) of your actual sound file. If the sound file is not found, the default system sound will be used.
Using the Alarm function in a formula

The Alarm function monitors a cell for a specified condition. If the condition is met, the sound file is played and the function returns TRUE. If the condition is not met, the sound file is not played and the function returns FALSE. The Alarm function takes two arguments:

Cell: A reference to a single cell (the cell that you are monitoring). Normally, this will be a cell that contains a formula (but that is not required).
Condition: A text string that describes the condition

Following are examples of formulas that use this function:

=Alarm(A1,">=1000")

The sound will play when the value in cell A1 is greater than or equal to 1,000.

=Alarm(C12,"<0")

The sound will play when the value in cell C12 is negative.
Tips

The function is evaluated whenever any cell that depends on the reference cell is changed. The sound can get annoying!
Normally, you will want to use this function in only one cell. If you use it in more than one cell, you will not be able to tell which instance of the function triggered the sound.

 

[Lone-wolf]

Re : Declanchement du son si la valeur cherchée existe

Re ramzi,

comme je te l'ai dit, regarde La PJ. Mais il faut que tu poste le classeur, sinon dur dur.


A+

 

[ramzi_007]

Re : Declanchement du son si la valeur cherchée existe

oh Merci énormément,

Je t'envoie la template de suite,


PS : tu auras mon vote dans les prochaines élections

 

[ramzi_007]

Re : Declanchement du son si la valeur cherchée existe

Re chere WOLF,

Voila en PJ le fichier demandé avec des explications

 

[Lone-wolf]

Re : Declanchement du son si la valeur cherchée existe

Bonjour ramzi,

voici le dossier pour test, j'éspère qu'il conviendra.


A+

 

[ramzi_007]

Re : Declanchement du son si la valeur cherchée existe

WOOOW

Merci merci merci

tout est nickel je dois chercher juste comment déclencher le son une fois le bouton entrer est appuyé, parce-que la douchette scanne le code et passe automatiquement a la cellule en dessous.

Mister Lone-wolf, t'es vraiment magnifique, je commencerai a apprendre le VBA pour aider les autres personnes en besoin, comme tu as fais pour moi.

 

[ramzi_007]

Re : Declanchement du son si la valeur cherchée existe

Big Boss,

Je suis coincé encore une fois , j'arrive pas a introduire la commande " ONKEY " dans le code qu tu as créé,
je sais même pas s'il s'agit de la bonne commande,
j'ai besoin que le résultat s'affiche une fois la touche entrer est cliqué", car comme j'ai déjà expliqué, la douchette lit le code et clique automatiquement sur entrer.

 

[Lone-wolf]

Re : Declanchement du son si la valeur cherchée existe

Bonsoir ramzi,

de quel résultat parle-tu? Sinon regarde le fichier je viens de faires une modification.


A+

 

[ramzi_007]

Re : Declanchement du son si la valeur cherchée existe

Bonsoir Lone,

Ca marche pas le fichier, il m'affiche pas les villes.

Pour expliquer encore mieux, après avoir collé ou scanné le tracking ( par exemple cellule A2), on doit cliquer sur entrer pour que le nom de la ville s'affiche sur B2 et le curseur passé directement a A3.

 

[Lone-wolf]

Re : Declanchement du son si la valeur cherchée existe

Re,

dans le dernier fichier, rentre le code manuellement esuite ENTER.


A+

 

[Lone-wolf]

Re : Declanchement du son si la valeur cherchée existe

Bonjour ramzi

cette fois c'est bon (enfin je crois), à tester.



A+