Datum

Titel

08.05.2024 23:37:20

Datenverbindung automatisiert aktualisieren

08.05.2024 21:22:24

In vorhandener Formel Jahreszahl mit einbeziehen

08.05.2024 21:15:37

Koordinaten im XY-Diagramm per Cursor ändern.

08.05.2024 19:10:09

doppelte Zeile gem. mehrerer Bedingungen löschen?

Du findest keine passende Antwort auf Deine Frage?

Stelle Deine Frage in unserem Live-Forum

Archiv - Navigation

904to908

Aktuelles Verzeichnis

Verzeichnis Index

Übersicht Verzeichnisse

Vorheriger Thread

Rückwärts Blättern

Nächster Thread

Vorwärts blättern

HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Vorwärts blättern

Inhaltsverzeichnis

Wav Datei bei Wertwechsel in einem Zellenbereich a

Forumthread: Wav Datei bei Wertwechsel in einem Zellenbereich a
8 Beiträge zu diesem Forumthread
Anzeige
304 Threads zu ähnlichen Themen
Top 100 Forumthreads

14.09.2007 13:25:00

Weber

Wav Datei bei Wertwechsel in einem Zellenbereich aufrufen.
Hallo Profis, könnt ihr mir bitte mal helfen ? Ich möchte das ein wav-file abgespielt wird, wenn im Zellenbereich: H5:J31 der Wert 100 eingetragen wird. Ich hoffe das das kein allzu großes Problem für euch sein wird.
Vielen Dank im voraus.
mfg. Eddy

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Wav Datei bei Wertwechsel in einem Zellenbereich a

14.09.2007 13:31:00

Hajo_Zi
AW: Hilft mir eigentlich nicht weiter

14.09.2007 13:49:00

Weber
AW: Hilft mir eigentlich nicht weiter

14.09.2007 13:56:17

Hajo_Zi
Immer noch keine Lösung in Sicht

14.09.2007 14:42:00

Weber
AW: Immer noch keine Lösung in Sicht

14.09.2007 14:47:19

Hajo_Zi
AW: Wav Datei bei Wertwechsel in einem Zellenbereich a

14.09.2007 15:00:00

Hubert
AW: Wav Datei bei Wertwechsel in einem Zellenberei

14.09.2007 15:36:20

Weber
AW: Wav Datei bei Wertwechsel in einem Zellenberei

14.09.2007 18:17:00

Hubert

AW: Wav Datei bei Wertwechsel in einem Zellenbereich a

14.09.2007 13:31:00

Hajo_Zi

Hallo Eddy,
schaue mal auf diese Seite http://hajo-excel.de/vba_sound.htm da findest Du bestimmt einen Ansatz.

AW: Hilft mir eigentlich nicht weiter

14.09.2007 13:49:00

Weber

Hilft mir eigentlich nicht weiter, vielleicht setzt du etwas zu große Erwartungen in meine VBA-Kenntisse. Kann leider nichts damit anfangen. Sorry !!!

AW: Hilft mir eigentlich nicht weiter

14.09.2007 13:56:17

Hajo_Zi

Hallo Edgar,
ich sehe in dem Beitrag von Eddy, keine VBA Anforderungen, oder habe ich da was überlesen?
Gruß Hajo

Immer noch keine Lösung in Sicht

14.09.2007 14:42:00

Weber

Ich habe doch angekreuzt: VBA bescheiden, das heißt doch soviel wie Beschis...
Bitte nur antworten wenn wirklich ne Lösung in Sicht ist !
Vielen Dank !!!

AW: Immer noch keine Lösung in Sicht

14.09.2007 14:47:19

Hajo_Zi

Hallo Edgar,
das ist doch nun kine Lösung für Eddy sein Problem. Möchtest Du mit solchen Beiträen Dine Beitragzahl erhöhen.
Gruß Hajo

AW: Wav Datei bei Wertwechsel in einem Zellenbereich a

14.09.2007 15:00:00

Hubert

Hi,
ode ins Modul der gewünschten Tabelle:
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 = &H1
Private Const SND_LOOP = &H8
Dim Pfad As String


Private Sub Worksheet_Change(ByVal Target As Range)
Pfad = ThisWorkbook.Path & "\DeinSound.wav"
If Target.Count = 1 Then
If Not Intersect(Target, [H5:J31]) Is Nothing Then
If Target = 100 Then
sndPlaySound Pfad, SND_ASYNC Or SND_LOOP
End If
End If
End If
End Sub

mfg Hubert

AW: Wav Datei bei Wertwechsel in einem Zellenberei

14.09.2007 15:36:20

Weber

Hallo Hubert, vielen Dank, aber ich bekomme das nicht hin. Vielleicht ist es einfacher, den Sound meinem Mini-Makro beizufügen.


Sub Wert_100()
ActiveCell.FormulaR1C1 = "100"
End Sub

Damit trage ich den Wert 100 in die Tabelle ein und beim eintragen soll nun dieses : c:\windows\media\tada.wav abgespielt werden. Hast du dafür ne Lösung ?
Wäre dir sehr dankbar.
mfg. Eddy

AW: Wav Datei bei Wertwechsel in einem Zellenberei

14.09.2007 18:17:00

Hubert

Hi,


Option Explicit
Private Declare Function sndPlaysound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal  _
lpszSoundName As String, ByVal uFlags As Long) As Long
Const DATEI As String = "c:\windows\media\tada.wav"
Sub Wert_100()
Dim i As Byte
If Not Intersect(ActiveCell, [H5:J31]) Is Nothing Then
ActiveCell = 100
i = sndPlaysound(DATEI, 1)
End If
End Sub

mfg Hubert