Vider les cellules #N/A Résolu

Question

Bonjour, 


J'aimerai vider toutes les cellules #N/A d'un tableau
à l'aide d'une VBA.

Merci d'avance

Configuration: Windows XP / Internet Explorer 8.0

pijaku · Answer

Bonjour,

Avant de supprimer toutes ces formules, essaie cette macro de test qui va te donner l'adresse des cellules en erreur #N/A :
Sub aaa()
Dim cell As Range, maPlage As Range

Set maPlage = Range("A1:F112")
For Each cell In maPlage
    If IsError(cell) Then
        If cell.ShowErrors.Value = CVErr(xlErrNA) Then MsgBox "Erreur #N/A détectée en cellule : " & cell.Address
    End If
Next
End Sub

pijaku · Answer

Et bien, dans la macro donnée précédemment il suffit de remplacer :
If cell.ShowErrors.Value = CVErr(xlErrNA) Then MsgBox "Erreur #N/A détectée en cellule : " & cell.Address
Par :
If cell.ShowErrors.Value = CVErr(xlErrNA) Then cell.Value = ""

Vider les cellules #N/A

2 réponses

Discussions similaires

Newsletters