Microsoft Excel

Herbers Excel/VBA-Archiv

Soundabspielen stoppen

Betrifft: Soundabspielen stoppen von: Jens
Geschrieben am: 19.09.2004 01:14:58

Hallo zusammen,

habe über einen Togglebutton eine Sounddatei gestartet.
Nun mein Problem:
Beim starten des Buttons läuft die Sounddatei auch ab, aber nun will ich beim deaktivieren des Togglebuttons erreichen, dass der Sound stoppt.

über Call rufe ich das Startmakro auf, aber wie muss das Stopmakro aussehen (Befehl)???

Vielen Dank für Eure Hilfe

MfG

Jens

  


Betrifft: AW: Soundabspielen stoppen von: Nepumuk
Geschrieben am: 19.09.2004 02:21:04

Hallo Jens,
und mit welcher Methode wir im "Startmakro" der Sound abgespielt?
Gruß
Nepumuk


  


Betrifft: AW: Soundabspielen stoppen von: Jens
Geschrieben am: 19.09.2004 11:34:03

Der Sound wird im Startmodul folgendermaßen gestartet:
alles was ich jetzt brauche, ist der Befehl den Sound im zweiten Makro zu stoppen.

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

Sub WAValsStart()
    Call sndPlaySound32("c:\Dokumente und Einstellungen\Whitener\Eigene Dateien\A", 1)
End Sub



  


Betrifft: AW: Soundabspielen stoppen von: Nepumuk
Geschrieben am: 19.09.2004 11:38:41

Hallo Jens,
so geht's:


Public Sub test2()
    sndPlaySound "NULL", 1
End Sub


Gruß
Nepumuk


  


Betrifft: AW: Soundabspielen stoppen von: Jens
Geschrieben am: 19.09.2004 12:27:06

Hallo

Vielen Dank, Nepumuk

MfG

Jens