Macro changeant la valeur des cellules

[Elodie195]

Bonjour,

j'ai un petit soucis avec mon fichier Excel.

Il se compose principalement d'une enteprise, un magasin, et un type.

Je voudrais que lorsque l'entreprise est VEOL ou REC et que le magasin est "MAGASIN DE PARIS", je voudrais que dans la cellule type cela m'affiche "FG" au lieu de "Secteur Frais".

Je vous joins mon tableau.

merci d'avance de vos éclairements.

Elo

 

[Pierrot93]

Re : Macro changeant la valeur des cellules

Bonsoir Elo,

A priori ton fichier n'est pas passé...

bonne soirée
@+

 

[Elodie195]

Re : Macro changeant la valeur des cellules

Bonjour,

effectivement mon PC a buggué 😱

je vous ai joins le fichier sur mon premier message 😉

 

[Dull]

Re : Macro changeant la valeur des cellules

Salut Elodie195, Pierrot🙂, CC🙂, le Forum

Peut-être comme cela

=SI(ET(E2="MAGASIN DE PARIS";OU(D2="VEOL";D2="REC"));"FG";F2)

en G2 à incrémenter vers le Bas

Bonne Journée

 

[Elodie195]

Re : Macro changeant la valeur des cellules

Bonjour,

merci de votre réponse.

En fait j'aurais voulu sous forme de macro à exécuter 🙂 si possible 😀

 

[Dull]

Re : Macro changeant la valeur des cellules

Re Elodie, LE Fil

Alors comme cela

Private Sub CommandButton1_Click()
Dim DerLig As Long,i As long
DerLig = Feuil1.Range("A" & Rows.Count).End(xlUp).Row
For i = 2 To DerLig
If Cells(i, 5) = "MAGASIN DE PARIS" And Cells(i, 4) = "VEOL" Or Cells(i, 4) = "REC" Then _
Cells(i, 8) = "FG" Else Cells(i, 8) = Cells(i, 6)
Next i
End Sub

Bonne Journée

 

[Elodie195]

Re : Macro changeant la valeur des cellules

merci !!

ça marche à la perfection !

merci de votre patience et du temps que vous m'avez consacré.

Bonne journée 😀