Formule si cellule contient....

Re : Formule si cellule contient....

Bonjourwicca18


Je vais essayer d'etre concis et clair. Si ca ne l'est pas hésitez pas.

Une des meilleures façons d'être concis et clair est de nous faire parvenir une pièce jointe, avec ce que tu as et ce que tu désires obtenir.

A te relire

Cordialement

Re : Formule si cellule contient....

Merci de ta réponse, je joint le fichier avec l'onglet extract (extraction que je ne veux pas toucher) et la feuille synth (ou afficher certains éléments de la feuille extract).

Merci pour votre aide.

Cordialement

Re : Formule si cellule contient....

RE

Regardes si cela convient ?

A+

Re : Formule si cellule contient....

Bonsoir

Oui c'est exactement ce que je recherchais.

Par contre est-il possible de savoir comment tu as fait pour que je puisse le refaire ou le modifier.


En tout cas merci pour ton aide.

Cordialement

Re : Formule si cellule contient....

Re

Voici les explications.

Private Sub CommandButton1_Click()
Sheets("extract").Select**** selection de la feuille "extact"
i = 2'***** variable du numero de ligne *******
Do Until Sheets("extract").Cells(i, 1) = ""'* parcourir depuis ligne2 jusqu'à cellule vide********
Sheets("synth").Cells(i, 1) = Sheets("extract").Cells(i, 15)l' ** la cellule ligne i, colonne 1 = feuille "extact" cellule ligne i col 15
If Sheets("extract").Cells(i, 5) = 1 Then ' ****si la cellule ligne i col 5 de la feuille "extact" = 1 alors
Sheets("synth").Cells(i, 2) = "marion" '******* la cellule ligne i col 2 de la feuille "synth" ="marion
Sheets("synth").Cells(i, 3) = "reçu"'***cellule ligne i col 3 de la feuille "synth" ="reçu"
Else'***sinon********
Sheets("synth").Cells(i, 2) = "olivier"
Sheets("synth").Cells(i, 3) = "envoyé"
End If
Sheets("synth").Cells(i, 4) = Sheets("extract").Cells(i, 7)** la cellule ligne i, colonne4 de feuille "synth"= cellule ligne i col 7 Sheets("extract")
i = i + 1 incrémente une ligne
Loop' retour a Do loop
End Sub


A+

Re : Formule si cellule contient....

Salut,

Merci beaucoup pour ton aide, ca marche super bien.

Ca marche nickel sur Excel 2012 mais pas sur 2007. As-tu une idée de comment le faire marcher sur 2007?

Merci

Re : Formule si cellule contient....

Re,


Quelle ligne devient jaune dans le code quand tu lance la macro ? (la ou le code s'arrête)