Signaler

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

Posez votre question actaris51 93Messages postés mardi 15 juillet 2008Date d'inscription 11 juillet 2011 Dernière intervention - Dernière réponse le 3 août 2009 à 10:16 par jjsteing
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
Utile
+1
plus moins
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"
Cette réponse vous a-t-elle aidé ?  
Utile
+0
plus moins
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
Utile
+0
plus moins
impec merci
Utile
+0
plus moins
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
Utile
-1
plus moins
Salut,

Regarde la fonction ESTNA

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !