XL 2013 supprimer ma valeur #n/a et#div par 0(résolu)

[da silva]

Bonjour,

apres quelque recherche et test je reste bloquer sur cette question comment en vba peut t'on supprimer sur un sheet bien défini tous les #n/a et#div par 0.

Merci d'avance =)!

 

[Modeste geedee]

Bonsour®

Bonjour,

apres quelque recherche et test je reste bloquer sur cette question comment en vba peut t'on supprimer sur un sheet bien défini tous les #n/a et#div par 0.
Merci d'avance =)!

si les calculs sont fait sous VBA, les conditions de calculs devraient permettre l'interception et rectification.

s'agit-il de confort visuel ou bien pour faciliter les calculs ???
un exemple serait bienvenu

 

[DoubleZero]

Bonjour, da silva, le Forum,

Après avoir sélectionné la colonne concernée :

Option Explicit
Sub Erreurs_supprimer()
    Selection.SpecialCells(xlCellTypeFormulas, 16).ClearContents
End Sub

A bientôt

P.S. : Bonjour, Modeste geedee

 

[da silva]

Bonsour®

si les calculs sont fait sous VBA, les conditions de calculs devraient permettre l'interception et rectification.

s'agit-il de confort visuel ou bien pour faciliter les calculs ???
un exemple serait bienvenu

Alors s'était plus visuel car pour l'opération s'est ok

et merci double zero s'est niquel mais question peut ton l'échanger avec un 0?

Sub g2()
ActiveWorkbook.Worksheets("G2").Range("A2:AZ999999").Select
Selection.SpecialCells(xlCellTypeFormulas, 16).ClearContents
End Sub

Merci !!

 

[DoubleZero]

Re-bonjour,

... peut ton l'échanger avec un 0?...

Comme ceci ?

Option Explicit
Sub Erreurs_supprimer()
    Selection.SpecialCells(xlCellTypeFormulas, 16) = 0
End Sub

A bientôt

 

[da silva]

mmmmmmmerci beaucoup en une ligne tu ma sauver x)!!

 

[DoubleZero]

Re-bonjour,

Cette version est "plus mieux bien"...

Option Explicit
Sub Erreurs_supprimer_v3()
    With Sheets("G2"): .Range("a:az").SpecialCells(xlCellTypeFormulas, 16) = 0: End With
End Sub

A bientôt

 

[Staple1600]

Bonsoir le fil, le forum

Pour les claviers en mal d'affection.
(C'est plus long, mais c'est pour leur bien)
F5
ALT+C
ALT+U
ALT+B
ALT+X
ALT+G
ENTER
SUPPR
0 (dans la barre de formule)
CTRL+SHIFT+ENTER



PS: Pour les souris en mal d'affection
F5, Y clique (5 fois), Y clique sur ENTER, Y clique dans la barre de formule et il finit comme les aficionados du clavier.

 

[da silva]

Merci! pour la formule v3=) et pour la version v 4 sa ma coûte cher le rage quite keyboard et souris x)