Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

effacer des cellules non numeriques

M

Max

Guest
Bonjour a tous, experts et debutants adeptes du VBA,

je cherche dans ma macro a effacer le contenu des cellules d'une colonne si elles ne contiennent pas des chiffres:
chaque cellule de ma colonne contient des mots, des espaces ou des nombres entiers, et je veux ne garder que les nombres, en effaçant le reste.
je pensais lui faire effacer toutes les cellules n'etant pas integer, mais je ne sais meme pas comment lui faire sortir le type de la cellule.

si quelqu'un a une idee, ca me depannerait vraiment bien.
merci beaucoup
 
W

wally

Guest
Bonjour Max et le forum,

Essaye ceci :

For i = 1 To Range("A65536").Cells.End(xlUp).Row
If Not IsNumeric(Range("A" & i)) Then
Range("A" & i).ClearContents
End If
Next i


@+

wally
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…