VBA Remplacer "N/A" par cellule vide Résolu/Fermé

Question

Bonjour,
Dans ma colonne P, j'ai parfois des cellules qui ont la valeur "N/A" (en texte)
Je voudrais créer une macro qui remplace ces celulles par des celulles vides, en gros qui suppriment leur contenu.
Pouvez vous m'aider ?
Merci

lami20j · Answer

Salut,

Regarde la fonction ESTNA

actaris51 · Answer

Bonjour,
Ce n'est pas le N/A d'Excel, mais un texte
En fait ma question pirrait tres bien etre :
j'ai parfois des cellules qui ont la valeur "toto"

jjsteing · Answer

bonjour...

donc ce que tu veux c'est mettre ce "toto" en vide dans n importe quel feuille à n importe quel endroit c'est ca ?

si oui en vba :

Macro1()

mot ="toto"
For Feuille = 1 To Sheets.Count
    Worksheets(Feuille).Activate
    With Worksheets(Feuille).Range("a1:zz500")
        Set trouvé1 = .Find(mot, LookIn:=xlValues)
étiq:
        If Not trouvé1 Is Nothing Then
            NumRow = trouvé1.Row
            trouvé1.Activate
            trouvé1.value=""
            If MsgBox("Suivant ?", 4) = vbNo Then Exit Sub 'Tu n'est pas obliger de mettre cette ligne
                Set trouvé1 = .FindNext(trouvé1)
                If NumRow < trouvé1.Row Then GoTo étiq

            End If ' si tu as enlever le 1er if, enleve aussi ca
    End With
Next Feuille

end

actaris51 · Answer

impec merci

jjsteing · Answer

re :)

y a moyen de changer 
With Worksheets(Feuille).Range("a1:zz500") 

par les vrais numéros de cellules utilisées.. si tu as un très très très grand tableau

VBA Remplacer "N/A" par cellule vide

5 réponses

Discussions similaires