Pb avec '"Si"

[Hugues]

Bonjour Le Forum

Dans une liste de client (1ere colonne de la feuille) dont le chiffre d'affaire est positionnée dans la deuxieme colonne , je souhaiterais extraire uniquement le client qui ont un chiffre d'affaire, donc exclure ceux dont le CA est égal à zéro et ceux où le CA n'est pas renseigné (cellule vide).

j'ai tapé le code suivant :

If Cells(n, colE) <> "" Or 0 Then ....

Mais ça ne fonctionne pas.

Pourriez vous m'aider ?

Merci par avance,

 

[Raja]

Re : Pb avec '"Si"

Bonsoir,

Essaye donc comme ça :

If Cells(n, colE) <> "" Or Cells(n, colE) <> 0 Then

 

[ROGER2327]

Re : Pb avec '"Si"

Bonsoir Hugues,

La syntaxe correcte pour

If Cells(n, colE) <> "" Or 0 Then ....

est

If Cells(n, colE) <> "" Or Cells(n, colE) <> 0 Then ....

Bon courage pour la suite !
ROGER2327

Ajout : je ne suis pas assez rapide !

 

[soenda]

Re : Pb avec '"Si"

Bonsoir Hugues, Raja, Roger2327

Quoique les réponses de Raja et de Roger, soient parfaitement opérationnelles,
je ne peux m'empêcher de proposer la variante suivante:

Dim x as integer ' ou boolean, ou autre
---
x = Cells(n, colE)
 
if x then

A plus

 

[soenda]

Re : Pb avec '"Si"

Re,

Ou encore

Dim ok as integer ' ou boolean, ou autre
---
ok = Cells(n, colE)
 
if ok then

A plus

PS: si on a une chaine on peut écrire: ok = Len(Cells(n, colE))

 

[Hugues]

Re : Pb avec '"Si"

Merci bien à vous pour vos réponses.

Hugues