Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Funciones Presonalizadas

17/10/2004 - 19:43 por Erik Copado Perez | Informe spam
Ayuda Hacer una pregunta
Hola Grupo:
Tengo una duda con las funciones personalizadas y es esta:

Una Función propia de Excel como SUMA te muestra la información de los
parámetros que necesita( =suma(número1,[número2], ...).

Ahorita que estoy creando mis funciones personalizadas, también necesito
parámetros.

Pero cuando mando llamar mi función en una hoja de calculo, no me
muestra los nombres de mis parámetros.

Les anexo el código de una de mis funciones

Gracias por su atención.

Function Referencia(NumProducto, Propiedad As PropiedadesProducto) As
Variant
If Not Conexion Then
MsgBox "No hay conexion al servidor, " & vbCrLf & _
"Favor de conectarse", vbCritical, "Error en Conexion BD"
Exit Function
End If
Select Case Propiedad
Case 1
Referencia = RefIntl(NumProducto)
End Select
End Function

Erik E. Copado Pérez
Sistemas
Antera, S.A. de C.V.
Tel: (55) 8503 2567
Fax: (55) 8503 2566 Ext.256
email Siga el debateRespuesta 3 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 KL
17/10/2004 - 20:53 | Informe spam
A primera vista en el codigo q acabas de publicar faltan por declarar
PropiedadesProducto, Conexion y RefIntl. Si Conexion es una constante q has
declarado a nivel de modulo o proyecto y RefIntl es una macro o funcion
personalizada q tambien has omitido, lo mas probable es q tengas problema
con PropiedadesProducto - no puedes asignar un tipo de valor no estandar sin
mas, lo tienes q declarar primero.

Saludos,
KL

"Erik Copado Perez" wrote in message
news:
Hola Grupo:
Tengo una duda con las funciones personalizadas y es esta:

Una Función propia de Excel como SUMA te muestra la información de los
parámetros que necesita( =suma(número1,[número2], ...).

Ahorita que estoy creando mis funciones personalizadas, también
necesito
parámetros.

Pero cuando mando llamar mi función en una hoja de calculo, no me
muestra los nombres de mis parámetros.

Les anexo el código de una de mis funciones

Gracias por su atención.

Function Referencia(NumProducto, Propiedad As PropiedadesProducto) As
Variant
If Not Conexion Then
MsgBox "No hay conexion al servidor, " & vbCrLf & _
"Favor de conectarse", vbCritical, "Error en Conexion BD"
Exit Function
End If
Select Case Propiedad
Case 1
Referencia = RefIntl(NumProducto)
End Select
End Function

Erik E. Copado Pérez
Sistemas
Antera, S.A. de C.V.
Tel: (55) 8503 2567
Fax: (55) 8503 2566 Ext.256


Preguntas similares

 

Busqueda sugerida :