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

XL 2019 si / ou

gg13

XLDnaute Occasionnel
Bonjour,
Juste une petite question
Dans une macro comment écrire égal à ou supérieur à

cette écriture ne passe pas

If Sheets("X").Range("A1").Value > 1 ou Sheets("Init").Range("A1").Value = 1 Then .....

GG13
 

TooFatBoy

XLDnaute Barbatruc
Bonjour,

Essaye comme ceci :
VB:
If Sheets("X").Range("A1").Value > 1 or Sheets("Init").Range("A1").Value = 1 Then

Et si c'est la même cellule, alors essaye ceci :
Code:
If Sheets("X").Range("A1").Value >= 1 Then
 

gg13

XLDnaute Occasionnel
oui merci
dans le #3 j'avais corrigé le ou par or.
je l'avais écris un peu trop vite.

if Sheets("X").Range("A1").Value > 1 or Sheets("Init").Range("A1").Value = 1 Then .....
fonctionne

mais la solution
If Sheets("X").Range("A1").Value >= 1 Then
est bien plus simple.

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