Aprire il progetto di Excel .
2
Fare clic su " Macro " sulla barra degli strumenti e poi su " View Macro ".
3
Selezionare una macro si sta lavorando e cliccare su " Modifica" per aprirlo in VBA .
4
Copia e incolla il seguente codice , sostituendo " PATH " con la posizione del file audio che si desidera riprodurre dal documento :
Public Declare Function sndPlaySound Lib " winmm.dll " _Alias " sndPlaySoundA " ( lpszSoundName ByVal come stringa, uFlags _ByVal come lungamente) come
lunga
Sub PlayWavFile ( WavFileName As String , Wait As Boolean ) Se Dir ( WavFileName ) = "" Then Exit Sub ' alcun file da visualizzarloIf Aspetta Then' riprodurre l'audio prima di eseguire qualsiasi altro codesndPlaySound WavFileName , suono gioco 0Else ' mentre il codice è runningsndPlaySound WavFileName , 1End IfEnd Sub
Sub TestPlayWavFile ( ) PlayWavFile " PATH " , FalseMsgBox "Questo è visibile , mentre la riproduzione è in corso ... " " PATH " PlayWavFile , TrueMsgBox "Questo è visibile dopo il suono è finito a giocare ... "End Sub
5
Premere" Ctrl " + " S " per salvare il file .
software © www.354353.com