Encore macro tant que...

[Temjeh]

Bonjour le forum
-28 au mercure ici à montreal .....mais pas dans ma tête pour une autre question:

J'ai ceci

debut:
If Range("A10") <> " " Then
Range("A10").Select
ActiveCell.FormulaR1C1 = ""
Else
If Range("A1") = "" Or Range("A10") <> " " Then Exit Sub
Macro1
GoTo debut
End If

Le prob est que si A10 ="" il bloc là!!
Je veux aussi que la macro continue si A10=""

J'ai essayé ceci mais sans résultat

debut:
If Range("A10") <> " " Or Range("A10") <> "" Then
Range("A10").Select
ActiveCell.FormulaR1C1 = ""
Else
If Range("A1") = "" Or Range("A10") <> " " Then Exit Sub
Macro1
GoTo debut
End If

Merci

A++

Temjeh

 

[Minick]

Salut,

Il suffit de remplacer Or par And

@+ Minick

 

[Temjeh]

Merci Minick

En les remplacant tous les 2 ca fonctionne

Mille merci

A++

Temjeh