ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   New Users to Excel (https://www.excelbanter.com/new-users-excel/)
-   -   Want to make conditional sounds based on cell values in Excel (https://www.excelbanter.com/new-users-excel/67094-want-make-conditional-sounds-based-cell-values-excel.html)

[email protected]

Want to make conditional sounds based on cell values in Excel
 
Conditional formatting.

Is it possible to insert logic formulae to make specific sounds based on
computed cell values in an Excel worksheet?

----------------
This post is a suggestion for Microsoft, and Microsoft responds to the
suggestions with the most votes. To vote for this suggestion, click the "I
Agree" button in the message pane. If you do not see the button, follow this
link to open the suggestion in the Microsoft Web-based Newsreader and then
click "I Agree" in the message pane.

http://www.microsoft.com/office/comm...excel.newusers

Bernie Deitrick

Want to make conditional sounds based on cell values in Excel
 
Howard,

You can play sounds using VBA code within the calculation event:

Add this to a module:

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

Sub PlayMySound()
'Change the filepath and name
Call sndPlaySound32("c:\folder\Filename.WAV", 0)
End Sub

Add this worksheet event

Private Sub Worksheet_Calculate()
If Range("A1").Value < Range("A2").Value Then
Application.EnableEvents = False
PlayMySound
Range("A2").Value = Range("A1").Value
Application.EnableEvents = True
End If
End Sub


HTH,
Bernie
MS Excel MVP


" m wrote in message
...
Conditional formatting.

Is it possible to insert logic formulae to make specific sounds based on
computed cell values in an Excel worksheet?

----------------
This post is a suggestion for Microsoft, and Microsoft responds to the
suggestions with the most votes. To vote for this suggestion, click the "I
Agree" button in the message pane. If you do not see the button, follow this
link to open the suggestion in the Microsoft Web-based Newsreader and then
click "I Agree" in the message pane.

http://www.microsoft.com/office/comm...excel.newusers





All times are GMT +1. The time now is 01:36 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com