Visual Basic para Aplicaciones - Reemplazo de Nombre Archivo por una Variable en función SUM

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil
Val: 3
Ha aumentado su posición en 8 puestos en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Reemplazo de Nombre Archivo por una Variable en función SUM

Publicado por Christian (2 intervenciones) el 09/06/2019 16:03:09
Tengo una variable: miArchivo en la cual he guardado lo siguiente:

miArchivo = Application.GetOpenFilename("Todos los archivos, *.*")

Y lo que necesito es pasarle a la función SUM el nombre guardado en miArchivo.

Mi problema está en la siguiente instrucción:

ActiveCell.FormulaR1C1 = "=SUM([110100A01.xlsm])A01!R31C20:R33C20)"

Es decir, buscar la forma de reemplazar : [110100A01.xlsm] por el contenido de miArchivo

Agradeceré toda la ayuda que les sea posible.
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 Antoni Masana
Val: 1.134
Oro
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Reemplazo de Nombre Archivo por una Variable en función SUM

Publicado por Antoni Masana (424 intervenciones) el 10/06/2019 10:02:54
Prueba esto:

1
ActiveCell.FormulaR1C1 = "=SUM([" & MiArchivo & "]A01!R31C20:R33C20)"

De todas formas tu formula esta mal, sobre un paréntesis:

1
2
3
4
-----------------------------------------------+
                                               |
                                               v
ActiveCell.FormulaR1C1 = "=SUM([110100A01.xlsm])A01!R31C20:R33C20)"


Saludos.
\\//_
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
sin imagen de perfil
Val: 3
Ha aumentado su posición en 8 puestos en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Reemplazo de Nombre Archivo por una Variable en función SUM

Publicado por Christian (2 intervenciones) el 10/06/2019 13:30:37
Gracias Antoni. Haré los cambios y te te comento a la brevedad.
Gracias por contestar
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