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

XL 2010 Effacer si condition non remplit en VBA

Sartheas

XLDnaute Nouveau
Bonjour,

Je souhaite effacer une cellule si celle-ci est différente de "1" en VBA

De la cellule AH18 jusqu'à ce que ça ne soit plus vrai

Je sais qu'il faut utiliser Dim i as integrer

Mais je galére depuis 1h dessus

Merci

Sarthéas
 

Hieu

XLDnaute Impliqué
Re : Effacer si condition non remplit en VBA

Je vais essayer de sortir ma boule de cristal ^^

Code:
Sub mlk()
Do
If Range("ah18") <> 1 Then
    Range("ah18").Clear
Else: Exit Do
End If
Loop
End Sub

++

nota: ca bouclera à l'infini, si y a rien qui remplit la cellule !!
 

Discussions similaires

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