Somma particolare



  • Somma §particolare§
    di Vincenzo (utente non iscritto) data: 12/04/2014 09:23:54

    Salve a tutti. Dovrei fare la somma di questi numeri, faccio un esempio:
    A1= 15
    A2= 12
    A3= 6 + 10
    A4= 15 + 10
    A5= 22
    in A6 come somma dovrei avere 90. In A3 ho come già scritto 6 + 10 che mi crea il problema, lo stesso in A4. Grazie



  • di lepat (utente non iscritto) data: 12/04/2014 09:30:28

    non è chiaro scritto così, allega un file di esempio



  • di Mister_x (utente non iscritto) data: 12/04/2014 10:39:36

    ciao

    per fare questo bisogna ricorrere a vba

    due soluzioni con una sub() o una funzione
    la sub inserita nel foglio, la funzione in un modulo

    ti passo il file con le due soluzioni
    ciao
     
    'Sub()
    Sub calcola()
    Dim AZ As Range
    Dim valore As Double
    valore = 0
    Set AZ = Range("A1:A5")
    For Each a_z In AZ
      valore = valore + Application.Evaluate(a_z.Formula)
    Next
    Set AZ = Nothing
    Range("A6") = valore
    End Sub
    
    'Funzione da utilizzare come somma
    'utilizzo  =Somma_Range("A1:A5")
    Public Function Somma_Range(TCelle As Range)
    Dim celle As Range
    Dim Totale As Double
    Dim cella As Variant
    Set celle = TCelle
     For Each cella In celle
       Totale = Totale + Application.Evaluate(cella.Formula)
     Next
    Set celle = Nothing
    Somma_Range = Totale
    End Function
      






  • di Textomb data: 12/04/2014 11:03:44

    ciao
    se vuoi puoi evitare il VBA.
    utilizza una funzione definita dall'utente.
    posizionati nella cella B1 del tuo foglio di lavoro.
    vai su inserisci nome.
    Trova una descrizione adatta alla nuova funzione ad esempio
    [nome]: Eval
    [riferito a]: =VALUTA.TESTO(A1)
    A questo punto su B1 scrivi semplicemente
    =Eval e trascini in basso la formula fino alla cella B5
    Questa funzione eseguirà l'espressione riportata nella cella a sinistra.
    A questo punto in A6 potrai eseguire la Somma di B1:B5 perchè la nuova funzione avrà convertito le espressioni in valori numerici.



  • di Vincenzo (utente non iscritto) data: 12/04/2014 17:22:16

    Ok, grazie a tutti. Ho optato per la funzione di Mister X in quanto ho diverse colonne con lo stesso problema. Grandi!