Risultati da 1 a 9 di 9

Discussione: Sommare singole cifre di un numero - Domanda di LeoLuca



  1. #1
    L'avatar di pkrome59
    Clicca e Apri
    Data Registrazione
    Sep 2015
    Località
    Reggio Calabria
    Età
    58
    Messaggi
    1188
    Versione Office
    Office 2013
    Likes ricevuti
    1198
    Likes dati
    2134

    Sommare singole cifre di un numero - Domanda di LeoLuca

    Ciao Leoluca, chiedo scusa a te e a tutti gli amici del forum, dal momento che non riuscendo a comunicare diversamente con te, utilizzo impropriamente questa sede.
    Mi è parso di capire che chiedevi se ci fosse una formula per poter sommare le cifre che compongono un numero.
    esempio:
    2587=22.
    Francamente non lo so, ma credo che se apri una nuova discussione in merito a questa richiesta qualcuno sicuramente ti saprà dare una risposta esaustiva.
    Comunque ho provato a formulare qualcosa e per i numeri composti da quattro cifre avrei la seguente:

    In A1, immissione del numero
    7947
    In C1:

    =SOMMA((ANNULLA.SPAZI(STRINGA.ESTRAI(SOSTITUISCI($A$1;" ";RIPETI(" ";LUNGHEZZA(A1)));1;LUNGHEZZA(A1)))-ANNULLA.SPAZI(STRINGA.ESTRAI(SOSTITUISCI($A$1;" ";RIPETI(" ";LUNGHEZZA(A1)));2;LUNGHEZZA(A1))))/10^3;(ANNULLA.SPAZI(STRINGA.ESTRAI(SOSTITUISCI($A$1;" ";RIPETI(" ";LUNGHEZZA(A1)));2;LUNGHEZZA(A1)))-ANNULLA.SPAZI(STRINGA.ESTRAI(SOSTITUISCI($A$1;" ";RIPETI(" ";LUNGHEZZA(A1)));3;LUNGHEZZA(A1))))/10^2;(ANNULLA.SPAZI(STRINGA.ESTRAI(SOSTITUISCI($A$1;" ";RIPETI(" ";LUNGHEZZA(A1)));3;LUNGHEZZA(A1)))-ANNULLA.SPAZI(STRINGA.ESTRAI(SOSTITUISCI($A$1;" ";RIPETI(" ";LUNGHEZZA(A1)));4;LUNGHEZZA(A1))))/10^1;NUMERO.VALORE(STRINGA.ESTRAI(SOSTITUISCI($A$1;" ";RIPETI(" ";LUNGHEZZA(A1)));4;LUNGHEZZA(A1)))/10^0)

    Che sfrutta, in parte, la scomposizione polinomiale dei numeri naturali.
    Allego il file d'esempio.

    N.B. Spero di cuore di non aver infranto qualche norma comportamentale, se così fosse chiedo anticipatamente umilmente scusa a tutti e mi impegno a non reiterare l'errore.
    File Allegati File Allegati

  2. #2

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4025
    Versione Office
    2013
    Likes ricevuti
    1229
    Likes dati
    923
    Citazione Originariamente Scritto da pkrome59 Visualizza Messaggio
    N.B. Spero di cuore di non aver infranto qualche norma comportamentale, se così fosse chiedo anticipatamente umilmente scusa a tutti e mi impegno a non reiterare l'errore.
    Ciao pkrome,
    non credo proprio che tu abbia infranto alcuna regola.
    Anche a me aveva fatto questa domanda in privato e come te gli ho suggerito di aprire una nuova discussione.

    Ma visto che siamo in ballo....:166:

    Prendendo come riferimento il tuo file allegato, nella cella C3 potresti usare questa formula matriciale:

    =SOMMA(STRINGA.ESTRAI(A1;RIF.RIGA(INDIRETTO("1:"&LUNGHEZZA(A1)));1)*1)

    [EDIT]
    Provo a spostare questi ultimi due messaggi in una nuova discussione...
    File Allegati File Allegati

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  3. I seguenti 3 utenti hanno dato un "Like" a cromagno per questo post:


  4. #3

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4025
    Versione Office
    2013
    Likes ricevuti
    1229
    Likes dati
    923

    Sommare singole cifre di un numero - Domanda di LeoLuca

    LeoLuca scrive:

    Citazione Originariamente Scritto da LeoLuca
    Ciao a tutti, qualcuno mi fà il favore di dirmi come possa risolvere questo quesito ?

    Dunque : es. c'è un numero di 2 cifre nella cella A1=15, a me serve in B1 che mi venga sommato il 15 in 1+5 ,quindi con il risultato : B1=6
    come potrei fare senza vba ?

    Grazie a chiunque mi darà una mano.

    Notte a tutti

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  5. #4
    L'avatar di pkrome59
    Clicca e Apri
    Data Registrazione
    Sep 2015
    Località
    Reggio Calabria
    Età
    58
    Messaggi
    1188
    Versione Office
    Office 2013
    Likes ricevuti
    1198
    Likes dati
    2134
    Ciao Cromagno, vedo che hai ricevuto anche tu il messaggio.
    Forse ho sbagliato a rispondere in questa discussione, ma non sapevo come fare altrimenti.
    Chiedo di nuovo scusa.

    P.S. Grande formula, (Per concezione, piccola per estensione) mi fai vergognare per aver postato la mia.
    Ma il piacere di far parte di questo forum sta nel fatto che ti metti in continuo confronto con gli altri e ciò non può che far bene.

  6. I seguenti utenti hanno dato un "Like"


  7. #5

    L'avatar di Rubik72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Cosenza
    Età
    45
    Messaggi
    2815
    Versione Office
    Excel 2013
    Likes ricevuti
    1024
    Likes dati
    982
    Mi Aggrego anch'io con la soluzione VBA:
    Codice: 
    Function SommaNumeri(mioNum) As Integer
    Dim i As Integer
    
    
    For i = 1 To Len(mioNum)
        SommaNumeri = SommaNumeri + Mid(mioNum, i, 1)
    Next
    End Function

  8. I seguenti 2 utenti hanno dato un "Like" a Rubik72 per questo post:


  9. #6
    L'avatar di Canapone
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Firenze
    Messaggi
    1076
    Versione Office
    2010 su Win
    Likes ricevuti
    598
    Likes dati
    204
    Ciao a tutti,

    una formula molto simile a quelle già viste

    =SOMMA(SE.ERRORE(STRINGA.ESTRAI(A1;RIF.RIGA(1:15);1)*1;0))


    oppure (diverso approccio) , valida solo per numeri interi:

    =SOMMA(SE.ERRORE(DESTRA(SOSTITUISCI(TRONCA($A$1;-RIF.RIGA(1:15)+1);0;"");1)+0;0))

    Sempre da confermare con control+maiusc+invio.

  10. I seguenti 2 utenti hanno dato un "Like" a Canapone per questo post:


  11. #7
    L'avatar di Gerardo Zuccalà
    Clicca e Apri
    Data Registrazione
    May 2015
    Località
    Milano, Italy
    Età
    49
    Messaggi
    4916
    Versione Office
    2013
    Likes ricevuti
    1117
    Likes dati
    1126
    Ciao a tutti
    Cromagno bellissima formula, mai vista prima!!
    e visto che qui siamo un grande team dove ognuno contribuisce, io vorrei migliorarla unlteriormente

    Ho messo il =MATR.SOMMA.PRODOTTO anzichè il =SOMMA cosi da evitare CTRL+SHIFT+ENTER

    =MATR.SOMMA.PRODOTTO(STRINGA.ESTRAI(A1;RIF.RIGA(INDIRETTO("1:"&LUNGHEZZA(A1)));1)*1)

    Un saluto a tutti e scusate la mia assenza ma per diversi motivi non riesco ne a seguire il forum ne il canale YouTube, spero di ritornare presto..:187:

    [EDIT]

    Ciao Stefano che sorpresa vederti!! ci mancavano le tue formule.... non me fare come che diserti il forum:25:

  12. I seguenti 2 utenti hanno dato un "Like" a Gerardo Zuccalà per questo post:


  13. #8

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    53
    Messaggi
    7165
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2065
    Likes dati
    1304
    Ciao a tutti,
    scusate anche la mia assenza in questi giorni dalla prossima settimana dovrei tornare attivo.

    Giusto per dare un altro contributo alle formule già postate:

    =SOMMA(VALORE(STRINGA.ESTRAI(A1;RIF.RIGA(A1:SCARTO(A1;LUNGHEZZA(A1)-1;0));1)))

    Edit:
    Nel caso nella cella A1 ci fosse un numero negativo (es.
    -15264):

    ="-"&SOMMA(VALORE(STRINGA.ESTRAI(A1;RIF.RIGA(A2:SCARTO(A2;LUNGHEZZA(A1)-2;0));1)))
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  14. I seguenti 3 utenti hanno dato un "Like" a ges per questo post:


  15. #9
    L'avatar di LeoLuca
    Clicca e Apri
    Data Registrazione
    Feb 2016
    Località
    Svizzera
    Messaggi
    4
    Versione Office
    Office 2010
    Likes ricevuti
    0
    Likes dati
    0
    Ciao a tutti raga,
    avete ragione tutti quanti, funzionano tutte.
    avete visto come un banale problema possa impegnare tanto.
    Siete dei veri professionisti.
    Un grazie particolare a tutti voi.
    Spero un giorno di essere anche io utile a qualcun'altro del forum.
    Buona serata a tutti.
    LeoLuca

Discussioni Simili

  1. Capovolgere un numero intero da 1 a 15 cifre
    Di Bruno nel forum Domande su Excel in generale
    Risposte: 3
    Ultimo Messaggio: 17/02/17, 00:09
  2. Risposte: 2
    Ultimo Messaggio: 13/01/17, 17:25
  3. Divisione dei valori di una cella in celle singole
    Di Tiger79 nel forum Domande su Excel in generale
    Risposte: 8
    Ultimo Messaggio: 28/10/16, 18:26
  4. esportare singole colonne in nuovo file excel
    Di Lety88 nel forum Domande su Excel VBA e MACRO
    Risposte: 9
    Ultimo Messaggio: 11/03/16, 19:41
  5. Convertire numero da cifre in lettere
    Di Ste nel forum Domande su Excel in generale
    Risposte: 3
    Ultimo Messaggio: 17/06/15, 19:06

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •