Condition

[jeanphi]

Bonjour

Dans le fichier joint, je souhaite que les valeurs de la feuille "FEB" de la colonne B se copient sur la colonne A de la feuille "Commande" si la condition suivante est respectée:
Je veux que si la valeur de la colonne T est supérieure à la valeur de la colonne I + 20000 alors la valeur de la colonne B se copie dans la feuille "Commande"
Par ailleurs j'ai un autre souci:
Dans la colonne T, j'ai parfois des points d'interrogation si je ne connais pas le prix
Du coup, ma macro interprète ces lignes comme une valeur numérique et considère la cellule comme supérieure à la cellule de la colonne I
Comment régler ces problèmes SVP?
Merci

 

[pierrejean]

Re : Condition

bonjour jeanphi

teste:

Sub DeltaPrescritEngage()
Sheets("Commande").Range("A1:A" & Range("A65536").End(xlUp).Row).ClearContents
Dim cell As Range
For Each cell In Sheets("FEB").Range("T5:T" & Sheets("FEB").Range("I65536").End(xlUp).Row)
If cell <> "?" Then
If cell > cell.Offset(0, -11) + 20000 Then
  cell.Offset(0, -18).Copy Destination:=Sheets("Commande").Range("A" & Sheets("Commande").Range("A65536").End(xlUp).Row + 1)
End If
End If
Next
End Sub

 

[Bigalo]

Re : Condition

Bonjour,

Il n'est pas nécessaire d'utiliser VBA. Une formule suffit. En cellule A1 :

=SI(ET(ESTNUM(FEB!I5);ESTNUM(FEB!T5));SI(FEB!T5 - FEB!I5 >= Delta;FEB!B5;"");"")

à recopier vers le bas.

Delta est un nom donnée à une cellule stockant la différence (20000) à partir de laquelle afficher le contenu de la col. B.

Si le contenu en cellule A doit être numérique, il faut utiliser cette variante de la formule, quitte à ne pas afficher les valeurs zéro (préférences si Mac, options si Win) :

=SI(ET(ESTNUM(FEB!I5);ESTNUM(FEB!T5));SI(FEB!T5 - FEB!I5 >= Delta;FEB!B5;0);0)

Le fichier test modifié est ici : http://cjoint.com/?mmpXw5pVyx

Désolé, je suis nouveau sur le forum, et je n'ai pas trouvé comment joindre le fichier directement.

Cordialement,

Bonjour

Dans le fichier joint, je souhaite que les valeurs de la feuille "FEB" de la colonne B se copient sur la colonne A de la feuille "Commande" si la condition suivante est respectée:
Je veux que si la valeur de la colonne T est supérieure à la valeur de la colonne I + 20000 alors la valeur de la colonne B se copie dans la feuille "Commande"
Par ailleurs j'ai un autre souci:
Dans la colonne T, j'ai parfois des points d'interrogation si je ne connais pas le prix
Du coup, ma macro interprète ces lignes comme une valeur numérique et considère la cellule comme supérieure à la cellule de la colonne I
Comment régler ces problèmes SVP?
Merci

 

[jeanphi]

Re : Condition

bjr pierrejean

merci ca fonctionne, je n'avais pas pensé a cette astuce
par contre je souhaite aussi résoudre le pb suivant:


Je veux que si la valeur de la colonne T est supérieure à la valeur de la colonne I + 20000 alors la valeur de la colonne B se copie dans la feuille "Commande"


aurais tu une idée?

 

[jeanphi]

Re : Condition

Bjr bigalo

pas mal ta fonction
merci

 

[Bigalo]

Re : Condition

Bjr bigalo

pas mal ta fonction
merci

De rien ; c'est un plaisir.

 

[jeanphi]

Re : Condition

bonjour pj

désolé mais cà marche pas!!

 

[pierrejean]

Re : Condition

bonjour jeanphi

peut-on savoir ce qui ne marche pas ??

fichier joint avec test

 

[Temjeh]

Re : Condition

Bonjour à tous

ATTENTION DE NE PAS FAIRE PLUSIEURS POSTE POUR DES QUESTIONS SEMBLABLES
6 ou 7 post plus haut

https://www.excel-downloads.com/threads/condition.86573/

A+

Temjeh

 

[jeanphi]

Re : Condition

bjr pj


il y avait juste un pb d offset ds le fichier que tu m a joint hier
mais sinon ca marche super
merci

 

[jeanphi]

Re : Condition

bonjour

j essaye d el envoyer mais il fait 80ko zippé et ca passe pas!

 

[jeanphi]

Re : Condition

par contre avec mon fichier original, ca ne fonctionne pas et ca plante alors qu il est structuré pareil!
je ne peux pas l envoyer il fait 80ko zippé

 

[pierrejean]

Re : Condition

re

fais une copie de ton fichier

allege la en ne conservant que quelques données (une dizaine de lignes)
remplace les données confidentielles par des données "bidon"
zippe et envoie

 

[jeanphi]

Re : Condition

c est ce que j ai déjà fais pj et rien à faire!!!

 

[pierrejean]

Re : Condition

Re

vois ici:

Accueil de Cjoint.com