Buen dia a todos

Quizas sea una tontera, pero no logro dar con lo que hago mal....

en el siguiente formato Format((Hoja2.Cells(estaen, col).Value + funcionarios(i, j)) / 60, "#,##0.0")

me imprime un valor numerico, pero se visualiza en la celda como texto......que hago mal...????

el valor de funcionarios() es numerico 

 

gracias de antemano

 

Hace 33 minutos , jotaeme dijo:

me imprime un valor numerico, pero se visualiza en la celda como texto......que hago mal...????

Si te refieres a que en la hoja se ve como numero, entonces elimina FORMAT

Y en otra linea asi:

Hoja2.Cells(estaen, col).NumberFormat = "#,##0.0"

 

Saludos 

@Gerson Pineda en la hoja se ve como texto y necesito que sea numerico

 

 

Hace 45 minutos , jotaeme dijo:

@Gerson Pineda en la hoja se ve como texto y necesito que sea numerico

 

 

Entonces puede ser que no sea exactamente un valor numérico al que deseas dar formato de numero

Revisa bien esa parte

Tienes un error de concepto, la función Format() no tiene nada que ver con el formato de las celdas de Excel, Excel reconoce como numérico su formato, pero no el de VBA, que lo interpreta como texto, de hecho, Excel guarda el dato como número, el formato es su visualización. Para comprobarlo solo tienes que ver una celda formateada desde Excel y luego ver lo que aparece en la barra de fórmulas, para solucionarlo, pasa el valor numérico a la celda y dale formato en Excel o usa la solución de Gerson.

ejemplo:

Range("A1")=Hoja2.Cells(estaen, col).Value + funcionarios(i, j)) / 60

y luego, o formateas directamente en Excel, o:

Range("A1").NumberFormat = "#,##0.0"

 

@Antoni mil gracias, problema resuelto y agradezco tu clarísima explicación

 

 

 

¿Y porqué no usar directamente la función CDbl?

Range("A1")=CDbl(Hoja2.Cells(estaen, col).Value + funcionarios(i, j)) / 60)