Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Formula Utente

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

Formula Utente

Postdi papiriof » 11/05/21 16:50

Ho questa formula utente semplicissima che mi fece una trentina di anni fa un giovane mio conoscente.
Codice: Seleziona tutto
Function circ(Val, limite)
    If Val > limite Then
        circ = Val - limite
    ElseIf Val <= 0 Then
        circ = Val + limite
    Else
        circ = Val
    End If
End Function

Ipotesi 1 in A1 =89 in A2=22 in C1 metto la formula = circ(A1+A2;90) il risultato mi da 21
Ipotesi 2 in A1 =89 in A2=22 in C1 metto la formula = circ(A1-A2;90) il risultato mi da 67
Ipotesi 3 in A1 =89 in A2=22 in C1 metto la formula = circ(A1-A2;90) il risultato mi da 67
Fermo restando che limite deve essere sempre 90 come gestire anche anche la moltiplicazione?
Come deve essere trasformata la formula in modo da gestire anche la moltiplicazione ?
Ipotesi 4 in A1 =89 in A2=22 in C1 metto la formula = circ(A1*A2;90) il risultato in questo caso mi da 1868 cioè 1958 -90
mentre mi attenderei "68"
Win 7+Office 2010
papiriof
Utente Senior
 
Post: 284
Iscritto il: 16/02/10 13:23

Sponsor
 

Re: Formula Utente

Postdi papiriof » 11/05/21 16:54

nella 3 ipotesi leggasi Ipotesi 3 in A1 =89 in A2=22 in C1 metto la formula = circ(A2-A1;90) il risultato mi da 23
Win 7+Office 2010
papiriof
Utente Senior
 
Post: 284
Iscritto il: 16/02/10 13:23

Re: Formula Utente

Postdi Anthony47 » 11/05/21 19:25

Ad esempio:
Codice: Seleziona tutto
Function circ(Val, limite)
circ = Val Mod limite
If circ = 0 Then circ = limite
End Function

Questo avendo ignorato la puntualizzazione (incompresa) del secondo messaggio

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

Re: Formula Utente

Postdi papiriof » 11/05/21 20:30

"Questo avendo ignorato la puntualizzazione (incompresa) del secondo messaggio"
Va tutto bene tranne quando val è un numero negativo in questo caso avevo corretto nel secondo messaggio
dicendo "nella 3 ipotesi leggasi Ipotesi 3 in A1 =89 in A2=22 in C1 metto la formula = circ(A2-A1;90) il risultato mi da 23"
Win 7+Office 2010
papiriof
Utente Senior
 
Post: 284
Iscritto il: 16/02/10 13:23

Re: Formula Utente

Postdi Anthony47 » 11/05/21 20:36

Non avevo notato la piccola differenza...
Allora prova con:
Codice: Seleziona tutto
Function circ(Val, limite)
circ = Abs(Val) Mod limite
If circ = 0 Then circ = limite
End Function
Si nota la piccola differenza?
Avatar utente
Anthony47
Moderatore
 
Post: 17664
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Formula Utente

Postdi papiriof » 11/05/21 20:52

No Anthony non bisogna cambiarecon Abs in questo caso quando Val assume un valore negativo 90 (limite) si aggiunge al più piccolo così 22+90 =112-89 ... risultato atteso 23
Win 7+Office 2010
papiriof
Utente Senior
 
Post: 284
Iscritto il: 16/02/10 13:23

Re: Formula Utente

Postdi Anthony47 » 11/05/21 22:56

Io ti vengo dietro ma non so di che parli:
Codice: Seleziona tutto
Function circ(ByVal Val As Long, Optional ByVal limite As Long = 90)
    If Val < 0 Then Val = Val + limite
    circ = Val Mod limite
    If circ = 0 Then circ = limite
End Function

:?: :?:
Avatar utente
Anthony47
Moderatore
 
Post: 17664
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Formula Utente

Postdi papiriof » 11/05/21 23:37

E lo so, siamo un po ermetici ...... ma adesso ci siamo !!!!
Win 7+Office 2010
papiriof
Utente Senior
 
Post: 284
Iscritto il: 16/02/10 13:23


Torna a Applicazioni Office Windows


Topic correlati a "Formula Utente":


Chi c’è in linea

Visitano il forum: raimea e 25 ospiti