Visual Basic para Aplicaciones - Pasar funcion EXCEL a codigo VBA

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil

Pasar funcion EXCEL a codigo VBA

Publicado por Ramon (9 intervenciones) el 29/07/2017 11:42:52
Buenas dias a tod@s;

Quiero convertir el cálculo hecho en la columna "K" a código VBA excel y me da error.
Espero que para el Maestro Antoni Masana esto será un aperitivo.
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

Pasar funcion EXCEL a codigo VBA

Publicado por Antoni Masana (498 intervenciones) el 30/07/2017 10:03:42
La macro tal que así:

1
2
3
4
5
6
7
8
9
10
11
12
13
Option Explicit
 
Sub porcentajes()
    Dim ultimaFila As Long, conta As Long
 
    Sheets("Hoja1").Select
    ultimaFila = Range("J" & Rows.Count).End(xlUp).Row
 
    For conta = 7 To ultimaFila
        Range("K" & conta).FormulaR1C1 = "=R" & conta & "C10/ SUM(R7C10:R1000000C10)"
        Range("K" & conta).NumberFormat = "0.00%"
    Next
End Sub

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
sin imagen de perfil

Pasar funcion EXCEL a codigo VBA

Publicado por Ramon (9 intervenciones) el 30/07/2017 14:26:03
Buenos dias, Maestro. No esperaba menos de vd. Muchas gracias, como siempre.
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