Discussion :

[simo1112]

bonjour,

lors de l'exécution d'une macro --VBA-- je note que, TRÈS FRÉ-
QUEMMENT, l'icone SON dans la barre de tâches de Vista devient Mute.

Comme cela m'empêche d'entendre les BIP que je place dans le code,
j'aimerais trouver pourquoi pour y remédier!

Quelqu'un peut-il me venir en aide?

merci

[L'Albatros]

Bonjour,

Peux-tu montrer ton code de génération de "bips" ?

[simo1112]

J'oubliais:

voici mon code pertinent:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
' Stop
  Beep
  Beep
  Beep
  Beep
  Beep
  Beep
  Beep
newHour = Hour(Now())
newMinute = Minute(Now())
newSecond = Second(Now()) + 5
waitTime = TimeSerial(newHour, newMinute, newSecond)
Application.Wait waitTime
 
  Beep
' Stop

merci encore

[L'Albatros]

Je ne vois toujours pas, désolé.

Mais peut-être qu'en changeant la nature du "bip"...

Essaie ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As
Long) As Long
 
Sub Activation_beeper()
Dim Frq As Long
Beep 733, 100
DoEvents
Beep 733, 200
For Frq = 0 To 5000 Step 100
'emet un son de fréquence Frq pour 50 millisecondes
Beep Frq, 50
DoEvents ' l'instruction Doevents permet de separer les sons lorsque les
fréquences sont trop proche
Next Frq
Beep 733, 100
DoEvents
Beep 733, 200
End Sub

[nchal]

salut,

Je ne pense que que ce soit un problème d'Excel mais un problème avec ta machine. Je ne vois pas autre chose.