Forum di Excel e VBA, per condividere esperienze e risolvere problemi su:
Excel, Word, Access, Power Point, Microsoft Office, macro, Visual Basic e Visual Studio.
Il malefico errore DIV0
- Hai un problema con Excel?
Il malefico errore #DIV/0!
di nabba72 (utente non iscritto) data: 14/04/2014 10:31:26
Ciao a tutti! Ricordo di aver visto alcune discussioni su come eliminare il codice d'errore #DIV/0!, ma non riesco più a rintracciarle. Qualcuno si ricorda come si eliminava questo errore?
Grazie.
di stefanmi data: 14/04/2014 10:33:30
un sistema potrebbe essere con la formula SE.ERRORE
di Lucas87 data: 14/04/2014 11:23:26
Nel senso che non vuoi vederlo?
=se(val.errore(tua_formula);"";tua_formula)
di nabba72 (utente non iscritto) data: 14/04/2014 11:33:35
Ciao e grazie per l'interessamento.
Sì non voglio vederlo.
Il problema è che devo applicare questa formula su un foglio molto lungo e complesso.
Ricordo di aver visto tempo fa' una codice vba che rimuoveva questo problema scrivendo al posto di #DIV/0 il valore 0
di Mister_x (utente non iscritto) data: 14/04/2014 12:03:05
ciao nabba
stai usando il 2010 quindi in a tuo favore ai la funzione SE.ERRORE() do ve per esempio
tu in A1=10 B1=0 se fai A1/B1 ti ritorna errore #DIV/0!,
invede se in C1 scrivi
=SE.ERRORE(A1/B1;0) in questo caso ti ritorna 0 perche' questa funzione riporta un valore che tu stabilisci se nella operazione vi e' un errore altrimenti fa l'operazione
vedi tiga 1,2 ,3 colonna C
10-- 0-- 0
10-- 10-- 1
0-- 0-- 0
ciao
di nabba72 (utente non iscritto) data: 14/04/2014 12:10:06
Grazie!!!
Sulla singola formula funzione in modo corretto e soddisfacente.
Ora o trovo il codice vba oppure incollo la formula con se.errore circa su 1.500 formule....
di Mister_x (utente non iscritto) data: 14/04/2014 12:53:31
ciao
se mi ricordo questa macro eliminava l'errore ma eliminava anche la formula in essa contenuta quindi in questo caso non avrai piu' la formula in quella cella
la macro in questione e' pressapoco questa, devi adattare il range() al tuo foglio
prima
10 0 #DIV/0!
10 10 1
0 10 0
dopo
10 0 0
10 10 1
0 10 0
ciao
Sub No_errore() Dim celle As Range Dim cella As Variant Set celle = Range("A1:C3") ''da adattare For Each cella In celle If IsError(cella) Then cella.Value = 0 Next Set celle = Nothing End Sub
di nabba72 (utente non iscritto) data: 14/04/2014 13:04:01
OK grazie.
Con un paio di trova/sostituisci ho cambiato le 1500 formule.
Grazie nuovamente a tutti
- Vuoi Approfondire?
