Excel- comment emettre un son
Résolu
mod77
Messages postés
1320
Date d'inscription
Statut
Membre
Dernière intervention
-
mod77 Messages postés 1320 Date d'inscription Statut Membre Dernière intervention -
mod77 Messages postés 1320 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je voudrais émettre deux sons différents (de type "bip") avec excel, quelqu'un peut-il me montrer comment faire SVP?
Merci
Je voudrais émettre deux sons différents (de type "bip") avec excel, quelqu'un peut-il me montrer comment faire SVP?
Merci
1 réponse
-
bonjour,
Private Declare Function Beep Lib "Kernel32" (ByVal Fq As Long, ByVal Tm As Long) As Long Sub son1() Beep 500, 400 End Sub Sub son2() Beep 600, 800 End Sub Sub son3() Beep 700, 800 End Sub Sub son4() Beep 1500, 1200 End Sub Sub son5() Beep 50, 1000 End Sub
-
-
Et pour le fun, si tu veux parler en anglais avec excel (ca jette plus que des bip bip)
Sub lutherking() Dim Sp As Object On Error Resume Next Set Sp = CreateObject("Sapi.SpVoice") If Sp Is Nothing Then Exit Sub Sp.Speak " I have a dream today. I have a dream that one day every valley shall be exalted " End Sub
pour faire le café, j'ai pas trouvé :-$ -
-
-
-