effets sonores

bonsoir
avec " beep" a insere dans ta macro
bonne prog
EetF

Voici un idée

Son à l'ouverture d'un Uf

Dans un module:

Declare Function sndPlaySound32 Lib "winmm.dll" Alias _
"sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

Sub Play()
Call sndPlaySound32("C:\Windows\Media\Tada.wav", 0)
End Sub

Dans UserForm

Private Sub UserForm_Activate()
Call Play
End Sub

A++

Temjeh