Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1116to1120
1116to1120
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wav Datei während der Wiedergabe beenden

Forumthread: Wav Datei während der Wiedergabe beenden

Wav Datei während der Wiedergabe beenden
Peter
Hallo,
wie kann während der Wiedergabe einer WAV- Datei, diese vorzeitig
per VBA beendet werden?
( Ich habe es nur dadurch hinbekommen, dass Excel geschlossen wurde. )
https://www.herber.de/bbs/user/65993.xls
Danke im voraus
Peter
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Wav Datei während der Wiedergabe beenden
18.11.2009 08:04:34
Tino
Hallo,
versuche mal und übergib an sndPlaySound32 einen NullString.
Private Sub CmdEndSong_Click()
sndPlaySound32 vbNullString, 1
End Sub
Gruß Tino
AW: Wav Datei während der Wiedergabe beenden
18.11.2009 08:10:14
Nepumuk
Hallo,
so:
Option Explicit

Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" ( _
    ByVal lpszSoundName As String, _
    ByVal uFlags As Long) As Long

Private Const SND_ASYNC As Long = &H1

Public Sub StopMusic()
    Call sndPlaySound("NULL", SND_ASYNC)
End Sub

Gruß
Nepumuk
Anzeige
AW: Vielen Dank
18.11.2009 10:36:11
Peter
Ich bedanke mich ganz herzlich.
Jetzt konnte ich die Sub nach meinen Vorstellungen umbauen
und es funktioniert wie ich es mir vorgestellt habe.
Peter
;

Forumthreads zu verwandten Themen

Makro beenden bei Option "Schliessen"
Jürgen

Hallo Excel-Profis
ich habe folgenden Code in ein Makro eingebaut:
'Drucken mit Vorschau
Application.ActivePrinter = "\\dataserv\HP LaserJet 5L AV auf Ne05:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Preview:=True, Collate:= _
True
Hier wird der Standard-Drucker an...
11.08.2008 12:39:00
Thread-ID: 1000811
9 Beiträge
Klick zählen - dann beenden
Frank

Hallo Zusammen!!!
Vielleicht kann mir bei der absurden Idee doch jemand weiter helfen. In einem Arbeitsblatt wird durch Klick in eine Zelle eine UF geöffnet. In dieser UF befindet sich das Kalender - Steuerelement. Mittels folgenden Code,
Private Sub Calendar1_Click() ActiveCell.Value...
24.11.2008 13:17:00
Thread-ID: 1027288
5 Beiträge
Anzeige
Funktionen beenden
Joachim

Hi,
brauche doch noch mal hilfe:
Ich habe auf meiner userform einen Button, der führt verschiedene Funktionen aus, die in einem Modul sind:
Private Sub CommandButton5_Click() Call Kopieren Call Prüfen Call Formatieren Call Daten_sperren End Sub
So, und nun zum Problem, wenn z...
26.11.2008 11:20:00
Thread-ID: 1027972
4 Beiträge
bei Fehlermeldung automatisch auf beenden
Lucia

Hallo zusammen,
ich hab einen schönen code, der macht, dass Aufgaben über Outlook an die Mitarbeiter (nach Kürzel in wer) verteilt werden. Das klappt wunderbar, Outlook öffnet sich, ich kann noch mal drüber schauen und dann versenden. Zum Schluss kommt im Excel dann die Fehlermeldung:
...
27.11.2008 13:59:08
Thread-ID: 1028363
10 Beiträge
Symbolleiste ausblenden bei beenden
Joachim

Hi
ich blende beim starten meines Excel-Sheets eine Symbolleiste ein
Private Sub Workbook_Open() Symbolleiste_ein End Sub
Wie kann ich die Symbolleiste (Symbolleiste_aus) wieder ausblenden. bzw. in welches Ereignis muss das rein, damit die Symbolleiste ausgeblendet wird, egal, ob...
09.12.2008 13:12:00
Thread-ID: 1031375
3 Beiträge
Vollbildmodus beenden beim Datei schließen
Thomas

Hallo,
ich weiß, zu dem Thema gibt es unzählige Beiträge. Ich sitze jetzt schon ne Stunde und find keine Lösung.
Das Problem:
Ich starte eine Datei im Vollbildmodus, blende die Menüleisten aus und will beim Beenden den Vollbisldmodus wieder verlassen. Über einen Button funktioniert...
15.01.2009 23:30:00
Thread-ID: 1040351
7 Beiträge
Nach MsgBox Code beenden
Heinz

Hallo Leute
Ich komme mit folgenden Code nicht weiter.
Der Code sollte nach jeder MsgBox gestoppt werden, bis alle Bedinungen erfüllt wurden.
Ich habe 3 MsgBox.
Könnte mir dazu bitte jemand weiterhelfen.
Danke Heinz
Private Sub CommandButton6_Click() Application.Screen...
18.01.2009 15:20:40
Thread-ID: 1041137
7 Beiträge
Anzeige
Nach Datei-Beenden startet Makro nicht
Edie

Hallo zusammen,
wenn ich die Datei über das Menü: Datei-Beenden und anschließenden Speichern beende,
bei erneuten öffne der Datei und start des Makros (UserForm) bekommen ich eine Fehlermeldung: „Microsoft Office Excel hat ein Problem festgestellt…“
Beim Debuggen kommt folgende Meld...
29.01.2009 08:50:00
Thread-ID: 1044793
3 Beiträge
Instanzen sehen und beenden (code z.T vorhanden)
chris

Hallo VBA experten,
ich suche mal wieder Hilfe.
Hoffe ihr könnt mir helfen.
ich habe hier einen Code mit diesem sehe ich die Anzahl aller
Excelinstanzen die gestartet wurden auch wenn Sie unsichtbar sind.
Ich wollte den Code so modifizieren das ich die einzelnen Instanzen be...
18.02.2009 11:31:00
Thread-ID: 1051743
9 Beiträge
Makro beenden / aus Loop springen
nicobit

Hallo Forum :)
hab ne frage,
Ich habe ein Makro welches bei falschem Input(normal aus Tabelle) mit einer InputBox nachfragt, diese ist mit einer Loop ausgestattet, sodass sie immer wider fragt wenn die Eingabe nicht stimmt.
Das Problem ist dass ich innerhalb dieses Loops eine falsch...
24.02.2009 12:21:13
Thread-ID: 1053452
5 Beiträge
Wieso muss ich Excel zweimal beenden?
wulfguard

Guten Abend,
ich habe folgendes Problem, nach dem ich meinen Code ein wenig optimiert!?!(zumindest ist der Laufzeitfehler raus ;) )
habe ich folgenden Effekt, wenn ich Excel beenden will, wird nur mein Workbook beendet und nach dem das geschlossen ist muss ich Excel nochmal beenden.
05.03.2009 23:15:41
Thread-ID: 1057086
5 Beiträge
"speichern und beenden"
Ralf

Hallo zusammen,
ich habe folgendes Problem.
Ich habe eine Datei mit vielen Makros und Verknüpfungen auf andere Dateien. Wenn ich diese Datei speichere und beende öffnet sich die Datei wieder. Es ist egal ob ich das separat mache, also erst speichern und dann beenden oder über das "x" di...
10.03.2009 16:35:59
Thread-ID: 1058786
7 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige