Questo è il codice utilizzato:
- Codice: Seleziona tutto
Dim r As Long
Dim t As Long
r = 10 * 9 * 8 * 7 * 6 * 5 * 4 * 3 * 2
t = 9 * 8 * 7 * 6 * 5 * 4 * 3 * 2 * 1
Ringrazio chi può aiutarmi a risolvere l'errore,
Francesco
Moderatori: Anthony47, Flash30005
Dim r As Long
Dim t As Long
r = 10 * 9 * 8 * 7 * 6 * 5 * 4 * 3 * 2
t = 9 * 8 * 7 * 6 * 5 * 4 * 3 * 2 * 1
Dim r As Long
Dim t As Long
r = 10 * 9 * 8 * 7 * 6
r = r * 5 * 4 * 3 * 2
t = 9 * 8 * 7 * 6 * 5
t = t * 4 * 3 * 2 * 1
r = 1
For i = 10 To 2 Step -1
r = r * i
Next i
t = 9& * 8 * 7 * 6 * 5 * 4 * 3 * 2 * 1 '9&=tipo Long; risultato Ok
t = 9 * 8 * 7 * 6 * 5 * 4 * 3 * 2 * 1 'risultato Overflow
r = 10 * 9 * 8 * 7 * 6
r = r * 5 * 4 * 3 * 2
r = Application.WorksheetFunction.Fact(10)
Torna a Applicazioni Office Windows
Excel: formula automatica per evidenziare prodotto scaduto Autore: gamma_ray |
Forum: Applicazioni Office Windows Risposte: 3 |
Salvare file excel in formato html escludendo le immagini Autore: systemcrack |
Forum: Applicazioni Office Windows Risposte: 5 |
formula excel non visualizza risultato Autore: tommasog |
Forum: Applicazioni Office Windows Risposte: 6 |
Excel 2016 - Funzione SCARTO + INDIRETTO Autore: pl1957 |
Forum: Applicazioni Office Windows Risposte: 2 |
Visitano il forum: Nessuno e 33 ospiti