Excel - Cálculo de una celda

Problema
Solución
Nota

Problema

Necesito un programa que calcule la suma cada vez que coloco un número en una celda. Por ejemplo, en la celda A1 para poner el número: 1, 1200, 0.50 y en la celda B1 para calcular la suma de (1, 1200, 0.50)

Si alguien me pudiera ayudar,

Gracias de antemano.

Solución

Mientras haya 3 números y configuración iguales.

primer número espacio de coma segundo número espacio de coma tercer número

entonces la siguiente macro te dará el resultado en B1

Se puede construir una fórmula pero para mí será complicada.

La macro es:

 Prueba secundaria () Dim j, j1, k, k1, m, m1, nj = InStr (rango ("a1"). Valor, ", ") j1 = Izquierda (rango ("A1"). Valor, j - 1 ) k = InStr (j + 1, Rango ("A1"). Valor, ", ") k1 = Medio (Rango ("A1"). Valor, j + 2, k - 4) m1 = Derecho (Rango (" A1 "). Valor, Len (Rango (" A1 "). Valor) - k) n = WorksheetFunction.Sum (j1, k1, m1) 'MsgBox n Range (" B1 ") = n End Sub