Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Funcion personal

07/04/2004 - 00:34 por Amadeo GOVONI | Informe spam
Ayuda Hacer una pregunta
Querido grupo

en una celda tengo el numero 6.2323 estos son grados y a traves de una
función que yo creé
me devuelve un resultado 61356.28 que aplicando un formato de celda
personalizado (00"º" 00"'" 00"''" llego a 6º 13' 56.28''

Mi pregunta es como hacer dentro de la funcion aplicarle este formato de
número y que pueda sumarlos, es decir que queden como numeros

El cuerpo de la funcion es

public function GrMinSeg (byval Grados as double) as double

GrMinSeg INT(GRADO)*10000+INT((GRADO-INT(GRADO))*60)*100+((GRADO-INT(B8))*60-INT((GRA
DO-ENTERO(GRADO))*60))*60

End function

Saludos al grupo

Amadeo
email Siga el debateRespuesta 3 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Manuel Romero
07/04/2004 - 01:06 | Informe spam
Yo realmente haria la funcion al reves, que reciba el numero y me lo
convierta a grados para hacer operaciones

"Amadeo GOVONI" escribió en el mensaje
news:
Querido grupo

en una celda tengo el numero 6.2323 estos son grados y a traves de una
función que yo creé
me devuelve un resultado 61356.28 que aplicando un formato de celda
personalizado (00"º" 00"'" 00"''" llego a 6º 13' 56.28''

Mi pregunta es como hacer dentro de la funcion aplicarle este formato de
número y que pueda sumarlos, es decir que queden como numeros

El cuerpo de la funcion es

public function GrMinSeg (byval Grados as double) as double

GrMinSeg >


INT(GRADO)*10000+INT((GRADO-INT(GRADO))*60)*100+((GRADO-INT(B8))*60-INT((GRA
DO-ENTERO(GRADO))*60))*60

End function

Saludos al grupo

Amadeo


Preguntas similares

 

Busqueda sugerida :