Visual Basic para Aplicaciones - error en la suma

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

error en la suma

Publicado por Albert (204 intervenciones) el 25/10/2020 00:25:10
Buenas tardes foreros, estoy haciendo una aplicación que tiene un formulario y de este paso los datos a una hoja donde debería de salir la suma pero no se por que no me suma nada, he revisado que todo son números,( vaya que no haya un texto) por mas he que buscado no encuentro el error, os adjunto el archivo por si podéis mirarlo.
Una vez que lo abras clicas el botón "amortización acumulada por mes" en la hoja "inversiones" y luego el botón "imprimir" y se abre la hoja "imprimir" donde no se hace la suma.
Gracias

PD. No se que ocurre, no me deja subir el archivo.rar
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 gilman
Val: 138
Bronce
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

error en la suma

Publicado por gilman (47 intervenciones) el 25/10/2020 08:27:10
Sin ver el código no se puede hacer nada
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: 177
Bronce
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

error en la suma

Publicado por Albert (204 intervenciones) el 25/10/2020 10:04:35
ni-rar-ni-zip

Buenos días, no hay manera de que me suba el archivo ni en RAR ni en ZIP, igual es que es muy pesado?
Este es el código que he puesto para la suma

1
2
3
Dim Fila As Long
Fila = Hoja2.Range("A" & Rows.Count).End(xlUp).Row + 2
Hoja2.Range("c" & Fila).Formula = "=SUM(c3:c" & Fila - 2 & ")"

Gracias
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
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

error en la suma

Publicado por Antoni Masana (498 intervenciones) el 26/10/2020 09:02:53
La referencia en la formula esta mal.

Debes poner la referencia tipo F1C1 (R1C1 en ingles). ¿Qué significa esto? Significa Fila1 (Row en ingles) y Columna 1 (Column en ingles) y equivalente a $A$1 referencia absoluta.

Em tu macro debes poner:

1
Hoja2.Range("c" & Fila).Formula = "=SUM(R3C3:R" & Fila - 2 & "C3)"

Para entender un poco mas esta sintaxis prueba a grabar macro y escribir las formula a mano con la referencia $C$3 y C3 para ver las diferentes sintaxis

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: 177
Bronce
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

error en la suma

Publicado por Albert (204 intervenciones) el 26/10/2020 09:18:47
Gracias por tu ayuda, lo he probado y sigue sin sumar, realmente no entiendo que pasa .
No puedo cargar el archivo me dice que solo puedo cargar .Rar o :zip "El formato de archivo soportado es zip, gzip, rar, bzip2 y 7z" lo he probado con los dos y nada, he borrado un montón de cosas del archivo para bajar los KB y ni así, seguiré probando
Repito gracias de corazón
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: 177
Bronce
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

error en la suma

Publicado por Albert (204 intervenciones) el 26/10/2020 12:55:27
buenos días ,por fin lo he conseguido, mirando otras aplicaciones antiguas me he dado cuenta de donde estaba el error, una tontería pero no funciona os lo cuento por si a alguien le pásese lo mismo

El que no funciona
1
Hoja2.Cells(3, 3).Value = Value(UserForm1.TextBox1)
el que si funciona
1
Hoja2.Cells(3, 3).Value = Val(UserForm1.TextBox1)

Disculpad las molestias
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
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

error en la suma

Publicado por Antoni Masana (498 intervenciones) el 27/10/2020 08:17:19
No entiendo que tiene que ver el poner una formula en una celda

1
Hoja2.Range("c" & Fila).Formula = "=SUM(R3C3:R" & Fila - 2 & "C3)"

y el asignar el valor de un objeto a una celda:

1
Hoja2.Cells(3, 3).Value = Val(UserForm1.TextBox1)

Saludos.
\\//_
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar