Visual Basic para Aplicaciones - Sonidos Editables Beep VBA Música Básica

Life is soft - evento anual de software empresarial
 
Vista:

Sonidos Editables Beep VBA Música Básica

Publicado por Kuizy (1 intervención) el 12/02/2019 17:16:52
Hola

No se VBA y estoy tratando de generar "música" modificando los parámetros a partir de un formulario en la hoja Excel. Ya que no tengo el parámetro "intensidad" esa es mi primera pregunta ¿como agregar ese parámetro a "frecuencia" y duración"

ADEMÁS, Imagino que para gran cantidad de sonidos habrá la posibilidad de hacer más eficiente la macro con algún tipo de string....
Hasta ahora estaba probando con:


Private Declare PtrSafe Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long
______________________________________________________________________________________________

Sub beep3()
'Beep frecuencia duracion
Beep (Range("A3")), (Range("B6"))
End Sub


*Pero me da fallas de sintaxis o compilación. El encabezado es para 64 bits
Agradezco su ayuda
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Norberto
Val: 115
Bronce
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Sonidos Editables Beep VBA Música Básica

Publicado por Norberto (34 intervenciones) el 19/02/2019 15:12:07
Hola:

Puede que tu Beep entre en conflicto con la instrucción Beep propia de VBA y que no adminte parámetros.

Prueba a cambiar la declaración tal que así:

1
2
Private Declare PtrSafe Function myBeep Lib "kernel32" Alias" Beep" _
    (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long

y las usas con

1
myBeep Range("A3"), Range("B6") 'no pongas paréntesis de más.

Un saludo,

Norberto.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar