Beep(sonido) en Función

No me hagas mucho caso, pero creo que no lo podrás
conseguir si no es con una macro...entonces si que te
reconocería el BEEP

Saludos, quisiera si me podeis ayudar a solucionar lo

siguiente

Tengo una funcion "SI" en una celda y quiero que si la

condicion es

verdadera, me suene un pitido ó un sonido wav breve.
La funcion es =SI(L8<L12;BEEP;FALSO)
Logicamente falla al no reconocer el BEEP, ¿que hay que

poner en su lugar

para que suene?.
He mirado en la ayuda y en algun manual y no encuentro

referencias a este

tema.

tengo Office XP, hace años en otras hojas(symphony) usaba

eso sin problemas.

Gracias por la ayuda ó la molestia


Saludos y suerte

http://www.terra.es/personal/irueliri


.

Gracias, pues me tendré que aprender eso de las macros y hacerla funcionar
dentro de la función ¿no?


Saludos y suerte

http://www.terra.es/personal/irueliri


"Dani" escribió en el mensaje
news:015c01c34c7a$293cfe10$
No me hagas mucho caso, pero creo que no lo podrás
conseguir si no es con una macro...entonces si que te
reconocería el BEEP

Saludos, quisiera si me podeis ayudar a solucionar lo

siguiente

Tengo una funcion "SI" en una celda y quiero que si la

condicion es

verdadera, me suene un pitido ó un sonido wav breve.
La funcion es =SI(L8<L12;BEEP;FALSO)
Logicamente falla al no reconocer el BEEP, ¿que hay que

poner en su lugar

para que suene?.
He mirado en la ayuda y en algun manual y no encuentro

referencias a este

tema.

tengo Office XP, hace años en otras hojas(symphony) usaba

eso sin problemas.

Gracias por la ayuda ó la molestia


Saludos y suerte

http://www.terra.es/personal/irueliri


.

Inserta el siguiente código en el evento change de la hoja en cuestión:
Pulsa Alt+F11 y pincha en el nombre de la hoja en el cuadro de la izquierda
(Ventana de proyecto), a continuación pega este código en la parte de la
derecha)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("L8") < Range("L12") Then
Beep
MsgBox "Valor celda L8 debe ser mayor que el valor de la celda L12",
vbCritical
End If
End Sub

Si tienes dificultades, vuelve a preguntar.
Saludos
Juan Carlos Pérez
Asturias-España


"Irueli" escribió en el mensaje
news:CjBRa.312701$

Gracias, pues me tendré que aprender eso de las macros y hacerla funcionar
dentro de la función ¿no?


Saludos y suerte

http://www.terra.es/personal/irueliri


"Dani" escribió en el mensaje
news:015c01c34c7a$293cfe10$
No me hagas mucho caso, pero creo que no lo podrás
conseguir si no es con una macro...entonces si que te
reconocería el BEEP
>Saludos, quisiera si me podeis ayudar a solucionar lo
siguiente
>Tengo una funcion "SI" en una celda y quiero que si la
condicion es
>verdadera, me suene un pitido ó un sonido wav breve.
>La funcion es =SI(L8<L12;BEEP;FALSO)
>Logicamente falla al no reconocer el BEEP, ¿que hay que
poner en su lugar
>para que suene?.
>He mirado en la ayuda y en algun manual y no encuentro
referencias a este
>tema.
>
>tengo Office XP, hace años en otras hojas(symphony) usaba
eso sin problemas.
>
>Gracias por la ayuda ó la molestia
>
>
>Saludos y suerte
>
>http://www.terra.es/personal/irueliri
>
>
>.
>

Muchas gracias, ya lo he hecho, pero claro, me faltan cosas,
¿como activo para que se ejecute?
Es que no me hace nada y ya veo, que me falta algo más.¿?

¿se le puede dar nombre y meterla para que se ejecute dentro de la función
SI(L8<L12; nombre;falso)?

y para ir aprendiendo (es que me tengo que reciclar y con 50 tacos, no es
facil) ¿donde podria encontrar algo de ésto, supongo que por lo poco que he
leido, de macros, funciones, eventos, VBA?
He encontrado algun manual por internet, pero básicos, no llegan a estas
cosas.


Saludos y suerte

http://www.terra.es/personal/irueliri


"Cotarelo63" escribió en el mensaje
news:

Inserta el siguiente código en el evento change de la hoja en cuestión:
Pulsa Alt+F11 y pincha en el nombre de la hoja en el cuadro de la

izquierda

(Ventana de proyecto), a continuación pega este código en la parte de la
derecha)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("L8") < Range("L12") Then
Beep
MsgBox "Valor celda L8 debe ser mayor que el valor de la celda

L12",

vbCritical
End If
End Sub

Si tienes dificultades, vuelve a preguntar.
Saludos
Juan Carlos Pérez
Asturias-España


"Irueli" escribió en el mensaje
news:CjBRa.312701$
> Gracias, pues me tendré que aprender eso de las macros y hacerla

funcionar

> dentro de la función ¿no?
>
>
> Saludos y suerte
>
> http://www.terra.es/personal/irueliri
>
>
> "Dani" escribió en el mensaje
> news:015c01c34c7a$293cfe10$
> No me hagas mucho caso, pero creo que no lo podrás
> conseguir si no es con una macro...entonces si que te
> reconocería el BEEP
> >Saludos, quisiera si me podeis ayudar a solucionar lo
> siguiente
> >Tengo una funcion "SI" en una celda y quiero que si la
> condicion es
> >verdadera, me suene un pitido ó un sonido wav breve.
> >La funcion es =SI(L8<L12;BEEP;FALSO)
> >Logicamente falla al no reconocer el BEEP, ¿que hay que
> poner en su lugar
> >para que suene?.
> >He mirado en la ayuda y en algun manual y no encuentro
> referencias a este
> >tema.
> >
> >tengo Office XP, hace años en otras hojas(symphony) usaba
> eso sin problemas.
> >
> >Gracias por la ayuda ó la molestia
> >
> >
> >Saludos y suerte
> >
> >http://www.terra.es/personal/irueliri
> >
> >
> >.
> >
>
>

Function SiBeep(a, b, c, d)
If (a < b) Then
v = c
Beep
Else
v = d
End If
SiBeep = v
End Function

en excel, en vez de usar si, utiliza por ejemplo
=SiBeep(L8,L12;"";Falso)

Siempre que la formula sea verdadera, haría un beep


"Irueli" escribió en el mensaje
news:RbzRa.309095$
Saludos, quisiera si me podeis ayudar a solucionar lo siguiente
Tengo una funcion "SI" en una celda y quiero que si la condicion es
verdadera, me suene un pitido ó un sonido wav breve.
La funcion es =SI(L8<L12;BEEP;FALSO)
Logicamente falla al no reconocer el BEEP, ¿que hay que poner en su lugar
para que suene?.
He mirado en la ayuda y en algun manual y no encuentro referencias a este
tema.

tengo Office XP, hace años en otras hojas(symphony) usaba eso sin problemas.

Gracias por la ayuda ó la molestia


Saludos y suerte

http://www.terra.es/personal/irueliri