È facile riprodurre file audio in formato WAV. Hai solo bisogno di conoscere il nome del file del suono che vuoi riprodurre,
e decidi se vuoi che la macro aspetti mentre il suono viene riprodotto o meno. Ecco un esempio:
Public Declare Function sndPlaySound Lib "winmm.dll" _ Alias "sndPlaySoundA" (ByVal lpszSoundName As String, _ ByVal uFlags As Long) As Long Sub PlayWavFile(WavFileName As String, Wait As Boolean) If Dir(WavFileName) = "" Quindi esci Sub ' nessun file da riprodurre If Wait Then ' riproduce l'audio prima di eseguire altro codice sndPlaySound WavFileName, 0 Else ' riproduce l'audio mentre il codice è in esecuzione sndPlaySound WavFileName, 1 End If End Sub TestPlayWavFile() PlayWavFile "c:\foldername\soundfilename. wav", False MsgBox "Questo è visibile durante la riproduzione del suono… " PlayWavFile "c:\foldername\soundfilename.wav", True MsgBox "Questo è visibile al termine della riproduzione del suono… " End Sub