Cómo saber el formato de una celda de excel? SOLUCIONADO

[Armando]

Amigos del foro:

Necesito leer una hoja de Excel y hacer operaciones matemáticas entre
dos celdas, pero en ocasiones alguna de las celdas no tiene formato
numérico y el programa truena.

Como validar que ambas celdas tengan formato de numero?

Saludos

[cmsoft]

Hola Armando
Podrias consultar el tipo de datos que viene con la funcion VALTYPE

Code: Select all  Expand view  RUN

      vColumna1:=oHoja:Cells( 2, 1 ):Value
      vColumna2:=oHoja:Cells( 2, 2 ):Value
      IF VALTYPE(vcolumna1) <> "N" .or. VALTYPE(vColumna2) <> "N"
         MsgInfo("Valores no numericos")
         RETURN 0
      ENDIF
      RETURN vColumna1 * vColumna2
 

[Armando]

César:

Muchas gracias, voy a intentar por ahí. Estaba intentando
con la función Cell de excel, pero no pude.

Saludos

[Armando]

César:

Listo, con tu recomendación salí del problema.

Saludos

[cmsoft]

Me alegro mucho Armando!
Abrazo