Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Otvorte projekt programu Excel .
2
Kliknite na " makrá " na paneli nástrojov a potom na " Zobraziť makrá . "
3
Vyberte makro , na ktorom pracujete , a kliknite na tlačidlo " Upraviť " , otvorte ho vo VBA .
4
skopírujte a vložte nasledujúci kód , ktorý nahradil " cesta " s umiestnením zvukového súboru , ktorý chcete prehrať z dokumentu :
Public Declare Function sndPlaySound Lib " winmm.dll " _Alias " sndPlaySoundA " ( byVal lpszSoundName As String , _ByVal uFlags As Long ) As Long
Sub PlayWavFile ( WavFileName As String , počkajte As Boolean ) Ak Dir ( WavFileName ) = " " Potom Exit Sub ' žiadny súbor na playIf Počkajte Then ' hrať zvuk pred spustením viac codesndPlaySound WavFileName , prehrávanie zvuku 0Else ' , zatiaľ čo kód je runningsndPlaySound WavFileName , 1End IfEnd Sub
Sub TestPlayWavFile ( ) PlayWavFile " PATH " , FalseMsgBox " To je vidieť pri prehrávaní zvuku ... " PlayWavFile " PATH " , TrueMsgBox " To je viditeľná po dokončení prehrávania zvuku ... " End Sub
5
Stlačte tlačidlo " Ctrl " + " S " uložiť súbor .
Copyright © počítačové znalosti Všetky práva vyhradené