Problema con el valor de una Variable

28/06/2004 - 14:18 por Henry Sanchez | Informe spam
Hola Grupo,
La configuracion de mi equipo hace que el punto decimal
(.)se reemplace por una coma (,)y el separador de
argumentos entonces es punto y coma (;).
Esto que no deberia tener trascendencia crea un conflicto
en uno de mis modulos de codigo.
Me explico:
En la celda A1 tengo el valor 1.17 (1,17) se ve en la
pantalla.

Sub MiProcedimiento
Dim MiVariable As Variant

MiVariable=Range("A1").Value
Range.("C5").FormulaR1C1 = "=ROUND(" & MiVariable & "*RC
[-1],0)"
End Sub

Esta ultima asignacion a la celda C5 me produce un error,
que al tratar de depurarlo deduzco que la cadena asignada
a la formula es:
"=ROUND(1,17*RC[-1],0)" cuando lo logico seria
"=ROUND(1.17*RC[-1],0)"

Se le ocurre a alguien como podria salvar este asunto?

Saludos,

Henry
 

Leer las respuestas

#1 Anonimo
28/06/2004 - 17:43 | Informe spam
Tienes que entrar en el Panel de control de windows y, en
configuración regional, poner España (suponiendo que este
sea tu país).





Hola Grupo,
La configuracion de mi equipo hace que el punto decimal
(.)se reemplace por una coma (,)y el separador de
argumentos entonces es punto y coma (;).
Esto que no deberia tener trascendencia crea un conflicto
en uno de mis modulos de codigo.
Me explico:
En la celda A1 tengo el valor 1.17 (1,17) se ve en la
pantalla.

Sub MiProcedimiento
Dim MiVariable As Variant

MiVariable=Range("A1").Value
Range.("C5").FormulaR1C1 = "=ROUND(" & MiVariable & "*RC
[-1],0)"
End Sub

Esta ultima asignacion a la celda C5 me produce un error,
que al tratar de depurarlo deduzco que la cadena asignada
a la formula es:
"=ROUND(1,17*RC[-1],0)" cuando lo logico seria
"=ROUND(1.17*RC[-1],0)"

Se le ocurre a alguien como podria salvar este asunto?

Saludos,

Henry


.

Preguntas similares