Excel - Insertar Formula en Celda por VB

 
Vista:

Insertar Formula en Celda por VB

Publicado por speak121 (2 intervenciones) el 01/10/2006 23:42:52
Hola,

Estoy intentando asignar como valor de un rango de celdas una formula, pero al ejecutar el código en la celda de la hoja de excel se muestra ###### en vez del valor. Si clickeo en la celda me muestra la formula bien introducida, pero no la ejecuta a menos que yo le dé celda por celda al Ok de la barra de introducción de función.

El código que estoy utilizando es el siguiente:

Dim CurCell As Object 'Curcell será la celda activa
i = 1 ' variable para contador
casilla = 10 ' fila desde donde se comienza a aplicar la funcion
Dim Letra(1 To 9) As String ' Son las futuras columnas de la tabla donde se aplica
Letra(1) = "A"
Letra(2) = "B"
Letra(3) = "C"
Letra(4) = "D"
Letra(5) = "E"
Letra(6) = "F"
Letra(7) = "G"
Letra(8) = "H"
Letra(9) = "I"

For Each CurCell In Range(Letra(9) & "10:" & Letra(9) & FilaFinal)
CurCell.Formula = "=SUMA(B" & casilla & ":H" & casilla & ")"
casilla = casilla + 1
Next

Espero haberme explicado lo más claro posible, muchas gracias!!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Abraham Valencia
Val: 313
Ha mantenido su posición en Excel (en relación al último mes)
Gráfica de Excel

RE:Insertar Formula en Celda por VB

Publicado por Abraham Valencia (2415 intervenciones) el 02/10/2006 16:56:46
No he revisado tu codigo, pero lo que si te puedo decir, es que las formulas, asi tu version de excel, sea en Castellano, debes intorducrlas en Ingles:

Suma -- Sum
Si --- If
Etc etc

Ya el excel, automaticamente las coloca en castellano.

Abraham
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Insertar Formula en Celda por VB

Publicado por speak121 (2 intervenciones) el 03/10/2006 01:44:19
Perfecto, muchísimas gracias, ya me estaba volviendo loko.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar