Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Boostez vos compétences Excel avec notre communauté !
Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force.
Apprenez, échangez, progressez – et tout ça gratuitement !
👉 Inscrivez-vous maintenant !
Bonjour j'ai un souci avec la formule suivante (D15/E15) qui m'affiche #div/0! quand mes cellules contiennent zéro ou vides.
Comment puis je faire pour enlever ces #div/0!.
je vous remercie d'avance.
tallia 64🙂
Sub Enleve_Erreur_Formule()
Dim rng As Range, cell As Range, fmla As String
Set rng = Cells.SpecialCells(xlCellTypeFormulas, 16)
For Each cell In rng
fmla = Right(cell.Formula, Len(cell.Formula) - 1)
cell.Formula = "=if(iserror(" & fmla & "), """"," & fmla & ")"
Next
End Sub
Une remarque sur la proposition de Pyrof: si a=0, b=35 (ou n'importe quelle valeur non nulle), le résultat existe, et c'est 0. La procédure de Pyrof ne donnera pas ce résultat, mais une chaine vide. Est-ce volontaire ?
- Navigue sans publicité - Accède à Cléa, notre assistante IA experte Excel... et pas que... - Profite de fonctionnalités exclusives Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel. Je deviens Supporter XLD