Sumar columnas

Buenos días,
tengo una base de datos donde en la columna e tengo un valor y en la f otro valor, necesito por medio de una macro (botón) que me sume e + f hasta encontrar filas vacías
e1 + f1 = g1
e2 + f2 = g2
Así sucesivamente hasta encontrar celdas vacías.
Gracias
Carolina

1 respuesta

Respuesta
1
Private Sub CommandButton1_Click()
    Dim i As Integer
    i = 1
    While (Range("E" + CStr(i)).Value <> "")
        Range("G" + CStr(i)).Value = Range("E" + CStr(i)).Value + Range("F" + CStr(i)).Value
        i = i + 1
    Wend
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas