Condividi:        

dx, sx, palla al centro

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

dx, sx, palla al centro

Postdi giorgioa » 18/08/15 12:07

Salve a tutti,

semplice, semplice, semplice:
Ho un numero a 3 anche 4 o 5 unita,
es a 3 cifre: 221 vorrei sommare le prime 2 cifre
=somma(sx+ centro? cosa uso?)
es a 4 cifre 2214 vorrei sommare le prime 3 cifre
=somma(sx+?+?)
es a 5 cifre:22145.....
Fatto la somma dei primi 2 il numero sarà 41(2+2)
fatto la somma dei primi 3 il numero sarà 54(2+2+1)
fatto la somma dei primi 4 il numero sarà 95(2+2+1+4)
in questo caso se la somma supera 90 e fino a 99 la prima cifra di quel numero
non viene contata mentre se supera 99 ad esempio 100 si ricomincia il conteggio come nel caso dei
3 numeri 4 oppure 5 Senza sommare l'ultima cifra.
Quale formula devo usare per questa operazione?

"l'unica cifra che non devo sommare è sempre l'ultima."

Grazie dell'aiuto
giorgioa
Utente Senior
 
Post: 773
Iscritto il: 16/04/12 15:00

Sponsor
 

Re: dx, sx, palla al centro

Postdi wallace&gromit » 18/08/15 14:39

semplice, semplice,.... fai presto a dirlo!
la prima cosa difficile è capire esattamente quello che vuoi.
Comunque sia chiaro che per le formule è troppo complesso.
Prova questa user function e, con qualche tuo esempio, vediamo dove ha successo e dove fallisce.

Codice: Seleziona tutto
Public Function somma2(inizio)
txt = inizio
Do While Len(txt) > 2
somma3 = val(Mid(txt, 1, 1)) + val(Mid(txt, 2, 1))
txt = somma3 & Mid(txt, 3, Len(inizio) - 2)
Loop
somma2 = val(txt)
End Function


se la tua cifra è in A1,nella cella dove vuoi il calcolo inserirai la formula:
Codice: Seleziona tutto
=somma2(A1)
Office2016 + 2019 su win11
Avatar utente
wallace&gromit
Utente Senior
 
Post: 2174
Iscritto il: 16/01/12 14:21

Re: dx, sx, palla al centro

Postdi giorgioa » 18/08/15 15:15

Salve Wallace&Gromit,

Aladino ha strofinato la lampada ed il genio è uscito e mi ha
detto cret.. fai così ....
Se hai detto che è semplice semplice semplice!!!

Il "cret.." è riferito a me.

Ok, va che è una meraviglia.

Bhe! visto che mi stai sopportando per tutte le vacanze ti svelo
perchè la userò o si può usare
cosa pensi se al posto di usare la funzione resto per eliminare i sopra 90 questa che hai
scritto la potrebbe sostituire?

:) :D :D :lol:

cosa ne pensi?
Che genio, da il genio della lampada :D :D :D :D
giorgioa
Utente Senior
 
Post: 773
Iscritto il: 16/04/12 15:00

Re: dx, sx, palla al centro

Postdi giorgioa » 18/08/15 16:00

Ciao Wallace&G,

va che è una meraviglia... quasi
per esempio il numero 187 = 97
in questo caso mi dovrebbe dare 7
cioè 91-92-93...99 non conteggia il primo numero
è come se fosse 17 che rimane 17 oppure 63 che rimane 63
non so se mi sono spiegato.
Infatti non ho riportato, entro da 1 a 90 alcun esempio sommatoria
Ciao
giorgioa
Utente Senior
 
Post: 773
Iscritto il: 16/04/12 15:00

Re: dx, sx, palla al centro

Postdi wallace&gromit » 18/08/15 16:01

:eeh: :eeh: :eeh:
che avevi un conto in sospeso con i sopra 90 l'avevo capito, ma che questa funzione te lo risolva mi sorprende alquanto, comunque, se funziona, tu usala come meglio ti pare.
Office2016 + 2019 su win11
Avatar utente
wallace&gromit
Utente Senior
 
Post: 2174
Iscritto il: 16/01/12 14:21

Re: dx, sx, palla al centro

Postdi giorgioa » 18/08/15 16:19

-
...

credo di aver scoperto come si fa l'acqua calda... la metti al sole ed è fatta.

da l'assassino torna sempre più volte sul luogo del delitto ..gli OVER 90

Ho approfondito il perchè del 9 prima dell'ultimo numero
quando le cifre precedenti all'ultimo numero sommati fanno 9
allora non ne tiene conto.
Per esempio 181 lui fa 91; 271 lui fa 91 eccetera
Attenzione che se fa somma 90 va bene.

Cerco di dare ulteriori notizie se gradite.
giorgioa
Utente Senior
 
Post: 773
Iscritto il: 16/04/12 15:00

Re: dx, sx, palla al centro

Postdi wallace&gromit » 18/08/15 19:56

È che tu mica l'avevi detto che c'era questa storia degli over 90.
Se ti disturbano li togliamo, non c'è problema:
Codice: Seleziona tutto
Public Function somma2(inizio)
txt = inizio
Do While Len(txt) > 2
somma3 = val(Mid(txt, 1, 1)) + val(Mid(txt, 2, 1))
txt = somma3 & Mid(txt, 3, Len(inizio) - 2)
Loop
somma2 = val(txt)
If somma2 > 90 Then
somma2 = somma2 - 90
End If
End Function
Office2016 + 2019 su win11
Avatar utente
wallace&gromit
Utente Senior
 
Post: 2174
Iscritto il: 16/01/12 14:21

Re: dx, sx, palla al centro

Postdi Anthony47 » 19/08/15 00:05

Tanto di cappello a w&g per l'algoritmo usato nella function! (la versione piu' aggiornata e' subito prima di questo mio messaggio).

Solo per curiosita', forse questa formula produce lo stesso risultato:
Codice: Seleziona tutto
=SE(RESTO(--(SOMMA(--STRINGA.ESTRAI(A2;RIF.RIGA(INDIRETTO("1:" & LUNGHEZZA(A2)-1));1))&DESTRA(A2;1));90)=0;90;RESTO(--(SOMMA(--STRINGA.ESTRAI(A2;RIF.RIGA(INDIRETTO("1:" & LUNGHEZZA(A2)-1));1))&DESTRA(A2;1));90))

Da confermare con Contr-Maiusc-Enter, non il solo Enter
Il dato iniziale e' in A2

Ciao a tutti
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: dx, sx, palla al centro

Postdi wallace&gromit » 19/08/15 21:00

:eeh: :eeh: :eeh: wow!
ero convinto che con le formule non fosse possibile (almeno non in una forma tutto sommato così sintentica), ma non è la prima volta che Anthony fa crollare le mie convinzioni!
Grazie comunque per i complimenti per la mia function, ma mi rendo conto che sono a livelli ben più bassi.
Office2016 + 2019 su win11
Avatar utente
wallace&gromit
Utente Senior
 
Post: 2174
Iscritto il: 16/01/12 14:21

Re: dx, sx, palla al centro

Postdi giorgioa » 23/08/15 08:18

Salve e buona domenica,

un saluto e un grazie(TANTI).

[RISOLTO]
giorgioa
Utente Senior
 
Post: 773
Iscritto il: 16/04/12 15:00


Torna a Applicazioni Office Windows


Topic correlati a "dx, sx, palla al centro":


Chi c’è in linea

Visitano il forum: Nessuno e 97 ospiti