Excel: calcolo a una cella

Problema
Soluzione
Nota

Problema

Hai bisogno di un programma che calcoli la somma ogni volta che inserisco un numero in una cella. Ad esempio, nella cella A1 inserire il numero: 1, 1200, 0, 50 e nella cella B1 per calcolare la somma di (1, 1200, 0.50)

Se qualcuno potesse aiutarmi,

Grazie in anticipo.

Soluzione

Finché ci sono 3 numeri e la stessa configurazione

primo numero virgola spazio secondo numero virgola spazio terzo numero

quindi la seguente macro ti darà il risultato in B1

Una formula può essere costruita ma per me sarà complicata.

La macro è:

 Sottotest () Dim j, j1, k, k1, m, m1, nj = InStr (Intervallo ("a1"). Valore, ", ") j1 = Sinistro (Intervallo ("A1"). Valore, j - 1 ) k = InStr (j + 1, Range ("A1"). Value, ", ") k1 = Mid (Range ("A1"). Value, j + 2, k - 4) m1 = Right (Range (" A1 "). Value, Len (Range (" A1 "). Value) - k) n = WorksheetFunction.Sum (j1, k1, m1) 'MsgBox n Range (" B1 ") = n End Sub