Bonsoir à tous,
Dans une cellule je voudrais faire aparaître un texte si une ou plusieurs
cellules d'une plage définie sont de couleur rouge.
Merci de votre aide.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Jacky
Bonsoir,
Sauf si les couleurs sont le résultat d'une MFC Plage= à définir ou à nommer '----------- Sub jj() For Each c In Range("plage") If c.Interior.Color = vbRed Then [a1] = "ici le texte" Next End Sub
'--------- Salutations JJ
"DADI" a écrit dans le message de news:
Bonsoir à tous, Dans une cellule je voudrais faire aparaître un texte si une ou plusieurs cellules d'une plage définie sont de couleur rouge. Merci de votre aide.
Bonsoir,
Sauf si les couleurs sont le résultat d'une MFC
Plage= à définir ou à nommer
'-----------
Sub jj()
For Each c In Range("plage")
If c.Interior.Color = vbRed Then [a1] = "ici le texte"
Next
End Sub
'---------
Salutations
JJ
"DADI" <dadi@discussions.microsoft.com> a écrit dans le message de news:
A568495F-8DDF-4223-A19B-B8C6CB2155E5@microsoft.com...
Bonsoir à tous,
Dans une cellule je voudrais faire aparaître un texte si une ou plusieurs
cellules d'une plage définie sont de couleur rouge.
Merci de votre aide.
Sauf si les couleurs sont le résultat d'une MFC Plage= à définir ou à nommer '----------- Sub jj() For Each c In Range("plage") If c.Interior.Color = vbRed Then [a1] = "ici le texte" Next End Sub
'--------- Salutations JJ
"DADI" a écrit dans le message de news:
Bonsoir à tous, Dans une cellule je voudrais faire aparaître un texte si une ou plusieurs cellules d'une plage définie sont de couleur rouge. Merci de votre aide.
JB
Bonjour,
http://cjoint.com/?bBjNqYVvNC
Affiche Ok si une cellule au moins a un fond rouge dans B2:G2
Dans le tableur: =siComptecouleur(B2:G2;3)
Dans un module (Alt+F11) puis Insertion/Module
Function SiCompteCouleur(champ As Range, couleurFond) Application.Volatile Dim c, temp temp = 0 For Each c In champ If c.Interior.ColorIndex = couleurFond Then temp = temp + 1 End If Next c SiCompteCouleur = IIf(temp > 0, "ok", "NoOk") End Function
Pour une maj auto: (sinon F9)
Private Sub Worksheet_SelectionChange(ByVal Target As Range) Calculate End Sub
Cordialement JB
Bonjour,
http://cjoint.com/?bBjNqYVvNC
Affiche Ok si une cellule au moins a un fond rouge dans B2:G2
Dans le tableur: =siComptecouleur(B2:G2;3)
Dans un module (Alt+F11) puis Insertion/Module
Function SiCompteCouleur(champ As Range, couleurFond)
Application.Volatile
Dim c, temp
temp = 0
For Each c In champ
If c.Interior.ColorIndex = couleurFond Then
temp = temp + 1
End If
Next c
SiCompteCouleur = IIf(temp > 0, "ok", "NoOk")
End Function
Pour une maj auto: (sinon F9)
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Calculate
End Sub
Affiche Ok si une cellule au moins a un fond rouge dans B2:G2
Dans le tableur: =siComptecouleur(B2:G2;3)
Dans un module (Alt+F11) puis Insertion/Module
Function SiCompteCouleur(champ As Range, couleurFond) Application.Volatile Dim c, temp temp = 0 For Each c In champ If c.Interior.ColorIndex = couleurFond Then temp = temp + 1 End If Next c SiCompteCouleur = IIf(temp > 0, "ok", "NoOk") End Function
Pour une maj auto: (sinon F9)
Private Sub Worksheet_SelectionChange(ByVal Target As Range) Calculate End Sub
Cordialement JB
DADI
Bonsoir Jacky, Merci de cette réponse, mais la couleur de cellule est le résultat d'une MFC. Peut-on faire qquechose? Mercie encore
Dadi
Bonsoir,
Sauf si les couleurs sont le résultat d'une MFC Plage= à définir ou à nommer '----------- Sub jj() For Each c In Range("plage") If c.Interior.Color = vbRed Then [a1] = "ici le texte" Next End Sub
'--------- Salutations JJ
"DADI" a écrit dans le message de news:
Bonsoir à tous, Dans une cellule je voudrais faire aparaître un texte si une ou plusieurs cellules d'une plage définie sont de couleur rouge. Merci de votre aide.
Bonsoir Jacky,
Merci de cette réponse, mais la couleur de cellule est le résultat d'une
MFC. Peut-on faire qquechose?
Mercie encore
Dadi
Bonsoir,
Sauf si les couleurs sont le résultat d'une MFC
Plage= à définir ou à nommer
'-----------
Sub jj()
For Each c In Range("plage")
If c.Interior.Color = vbRed Then [a1] = "ici le texte"
Next
End Sub
'---------
Salutations
JJ
"DADI" <dadi@discussions.microsoft.com> a écrit dans le message de news:
A568495F-8DDF-4223-A19B-B8C6CB2155E5@microsoft.com...
Bonsoir à tous,
Dans une cellule je voudrais faire aparaître un texte si une ou plusieurs
cellules d'une plage définie sont de couleur rouge.
Merci de votre aide.
Bonsoir Jacky, Merci de cette réponse, mais la couleur de cellule est le résultat d'une MFC. Peut-on faire qquechose? Mercie encore
Dadi
Bonsoir,
Sauf si les couleurs sont le résultat d'une MFC Plage= à définir ou à nommer '----------- Sub jj() For Each c In Range("plage") If c.Interior.Color = vbRed Then [a1] = "ici le texte" Next End Sub
'--------- Salutations JJ
"DADI" a écrit dans le message de news:
Bonsoir à tous, Dans une cellule je voudrais faire aparaître un texte si une ou plusieurs cellules d'une plage définie sont de couleur rouge. Merci de votre aide.
Lionel
Bonsoir DADI,
Si elle n'est pas trop compliquée, tu reprends simplement la ou les conditions de ta MFC :
=SI(ConditionMFC=VRAI;"texte";"")
Amicalement Lionel
"DADI" a écrit dans le message de news:
Bonsoir Jacky, Merci de cette réponse, mais la couleur de cellule est le résultat d'une MFC. Peut-on faire qquechose? Mercie encore
Dadi
Bonsoir,
Sauf si les couleurs sont le résultat d'une MFC Plage= à définir ou à nommer '----------- Sub jj() For Each c In Range("plage") If c.Interior.Color = vbRed Then [a1] = "ici le texte" Next End Sub
'--------- Salutations JJ
"DADI" a écrit dans le message de news:
Bonsoir à tous, Dans une cellule je voudrais faire aparaître un texte si une ou plusieurs
cellules d'une plage définie sont de couleur rouge. Merci de votre aide.
Bonsoir DADI,
Si elle n'est pas trop compliquée, tu reprends simplement la ou les
conditions de ta MFC :
=SI(ConditionMFC=VRAI;"texte";"")
Amicalement
Lionel
"DADI" <dadi@discussions.microsoft.com> a écrit dans le message de
news:E60EBF8B-12F1-429C-8A20-E33738B96567@microsoft.com...
Bonsoir Jacky,
Merci de cette réponse, mais la couleur de cellule est le résultat d'une
MFC. Peut-on faire qquechose?
Mercie encore
Dadi
Bonsoir,
Sauf si les couleurs sont le résultat d'une MFC
Plage= à définir ou à nommer
'-----------
Sub jj()
For Each c In Range("plage")
If c.Interior.Color = vbRed Then [a1] = "ici le texte"
Next
End Sub
'---------
Salutations
JJ
"DADI" <dadi@discussions.microsoft.com> a écrit dans le message de news:
A568495F-8DDF-4223-A19B-B8C6CB2155E5@microsoft.com...
Bonsoir à tous,
Dans une cellule je voudrais faire aparaître un texte si une ou
plusieurs
cellules d'une plage définie sont de couleur rouge.
Merci de votre aide.
Si elle n'est pas trop compliquée, tu reprends simplement la ou les conditions de ta MFC :
=SI(ConditionMFC=VRAI;"texte";"")
Amicalement Lionel
"DADI" a écrit dans le message de news:
Bonsoir Jacky, Merci de cette réponse, mais la couleur de cellule est le résultat d'une MFC. Peut-on faire qquechose? Mercie encore
Dadi
Bonsoir,
Sauf si les couleurs sont le résultat d'une MFC Plage= à définir ou à nommer '----------- Sub jj() For Each c In Range("plage") If c.Interior.Color = vbRed Then [a1] = "ici le texte" Next End Sub
'--------- Salutations JJ
"DADI" a écrit dans le message de news:
Bonsoir à tous, Dans une cellule je voudrais faire aparaître un texte si une ou plusieurs
cellules d'une plage définie sont de couleur rouge. Merci de votre aide.
Patrick BASTARD
Bonjour, *DADI*
Plus d'informations permettraient de proposer une solution. Quelles sont les conditions de la MEFC, où agit-elle...? Peut-être un exemple sur cjoint.com?
-- Bien amicordialement, P. Bastard
Bonsoir Jacky, Merci de cette réponse, mais la couleur de cellule est le résultat d'une MFC. Peut-on faire qquechose? Mercie encore
Dadi
Bonsoir,
Sauf si les couleurs sont le résultat d'une MFC Plage= à définir ou à nommer '----------- Sub jj() For Each c In Range("plage") If c.Interior.Color = vbRed Then [a1] = "ici le texte" Next End Sub
'--------- Salutations JJ
"DADI" a écrit dans le message de news:
Bonsoir à tous, Dans une cellule je voudrais faire aparaître un texte si une ou plusieurs cellules d'une plage définie sont de couleur rouge. Merci de votre aide.
Bonjour, *DADI*
Plus d'informations permettraient de proposer une solution.
Quelles sont les conditions de la MEFC, où agit-elle...?
Peut-être un exemple sur cjoint.com?
--
Bien amicordialement,
P. Bastard
Bonsoir Jacky,
Merci de cette réponse, mais la couleur de cellule est le résultat
d'une MFC. Peut-on faire qquechose?
Mercie encore
Dadi
Bonsoir,
Sauf si les couleurs sont le résultat d'une MFC
Plage= à définir ou à nommer
'-----------
Sub jj()
For Each c In Range("plage")
If c.Interior.Color = vbRed Then [a1] = "ici le texte"
Next
End Sub
'---------
Salutations
JJ
"DADI" <dadi@discussions.microsoft.com> a écrit dans le message de
news: A568495F-8DDF-4223-A19B-B8C6CB2155E5@microsoft.com...
Bonsoir à tous,
Dans une cellule je voudrais faire aparaître un texte si une ou
plusieurs cellules d'une plage définie sont de couleur rouge.
Merci de votre aide.
Plus d'informations permettraient de proposer une solution. Quelles sont les conditions de la MEFC, où agit-elle...? Peut-être un exemple sur cjoint.com?
-- Bien amicordialement, P. Bastard
Bonsoir Jacky, Merci de cette réponse, mais la couleur de cellule est le résultat d'une MFC. Peut-on faire qquechose? Mercie encore
Dadi
Bonsoir,
Sauf si les couleurs sont le résultat d'une MFC Plage= à définir ou à nommer '----------- Sub jj() For Each c In Range("plage") If c.Interior.Color = vbRed Then [a1] = "ici le texte" Next End Sub
'--------- Salutations JJ
"DADI" a écrit dans le message de news:
Bonsoir à tous, Dans une cellule je voudrais faire aparaître un texte si une ou plusieurs cellules d'une plage définie sont de couleur rouge. Merci de votre aide.
DADI
Bonsoir à tous,
Voici la MFC actuelle des cellules d'une plage définie: 1ère cond =ESTTEXTE(E10) 'qui arrête la condition ci-dessous' 2 ème cond =ET(SOMME(F10:R10)>0;VarEclairage=1) 'clignotant en rouge'
Macro de clignotement : (qui bug un peu, d'ailleurs)
Public Sub Eclairage() vNow = Now + TimeValue("00:00:01") Application.OnTime vNow, "Eclairage" ActiveWorkbook.Names.Add Name:="VarEclairage", RefersToR1C1:=1 - [VarEclairage] End Sub
Public Sub ArrêtEclairage() Application.OnTime EarliestTime:=vNow, _ Procedure:="Eclairage", Schedule:úlse ActiveWorkbook.Names.Add Name:="VarEclairage", RefersToR1C1:=1 End Sub
Donc je voudrais que dans une cellule bien définie, apparaisse la mention "cellule clignotante = à renseigner" dès qu'au moins 1 cellule clignote en rouge dans la plage définie.
Ai-je été clair!! Merci Dadi
Bonjour, *DADI*
Plus d'informations permettraient de proposer une solution. Quelles sont les conditions de la MEFC, où agit-elle...? Peut-être un exemple sur cjoint.com?
-- Bien amicordialement, P. Bastard
Bonsoir Jacky, Merci de cette réponse, mais la couleur de cellule est le résultat d'une MFC. Peut-on faire qquechose? Mercie encore
Dadi
Bonsoir,
Sauf si les couleurs sont le résultat d'une MFC Plage= à définir ou à nommer '----------- Sub jj() For Each c In Range("plage") If c.Interior.Color = vbRed Then [a1] = "ici le texte" Next End Sub
'--------- Salutations JJ
"DADI" a écrit dans le message de news:
Bonsoir à tous, Dans une cellule je voudrais faire aparaître un texte si une ou plusieurs cellules d'une plage définie sont de couleur rouge. Merci de votre aide.
Bonsoir à tous,
Voici la MFC actuelle des cellules d'une plage définie:
1ère cond =ESTTEXTE(E10) 'qui arrête la condition ci-dessous'
2 ème cond =ET(SOMME(F10:R10)>0;VarEclairage=1) 'clignotant en rouge'
Macro de clignotement : (qui bug un peu, d'ailleurs)
Public Sub Eclairage()
vNow = Now + TimeValue("00:00:01")
Application.OnTime vNow, "Eclairage"
ActiveWorkbook.Names.Add Name:="VarEclairage", RefersToR1C1:=1 -
[VarEclairage]
End Sub
Public Sub ArrêtEclairage()
Application.OnTime EarliestTime:=vNow, _
Procedure:="Eclairage", Schedule:úlse
ActiveWorkbook.Names.Add Name:="VarEclairage", RefersToR1C1:=1
End Sub
Donc je voudrais que dans une cellule bien définie, apparaisse la mention
"cellule clignotante = à renseigner" dès qu'au moins 1 cellule clignote en
rouge dans la plage définie.
Ai-je été clair!!
Merci
Dadi
Bonjour, *DADI*
Plus d'informations permettraient de proposer une solution.
Quelles sont les conditions de la MEFC, où agit-elle...?
Peut-être un exemple sur cjoint.com?
--
Bien amicordialement,
P. Bastard
Bonsoir Jacky,
Merci de cette réponse, mais la couleur de cellule est le résultat
d'une MFC. Peut-on faire qquechose?
Mercie encore
Dadi
Bonsoir,
Sauf si les couleurs sont le résultat d'une MFC
Plage= à définir ou à nommer
'-----------
Sub jj()
For Each c In Range("plage")
If c.Interior.Color = vbRed Then [a1] = "ici le texte"
Next
End Sub
'---------
Salutations
JJ
"DADI" <dadi@discussions.microsoft.com> a écrit dans le message de
news: A568495F-8DDF-4223-A19B-B8C6CB2155E5@microsoft.com...
Bonsoir à tous,
Dans une cellule je voudrais faire aparaître un texte si une ou
plusieurs cellules d'une plage définie sont de couleur rouge.
Merci de votre aide.
Voici la MFC actuelle des cellules d'une plage définie: 1ère cond =ESTTEXTE(E10) 'qui arrête la condition ci-dessous' 2 ème cond =ET(SOMME(F10:R10)>0;VarEclairage=1) 'clignotant en rouge'
Macro de clignotement : (qui bug un peu, d'ailleurs)
Public Sub Eclairage() vNow = Now + TimeValue("00:00:01") Application.OnTime vNow, "Eclairage" ActiveWorkbook.Names.Add Name:="VarEclairage", RefersToR1C1:=1 - [VarEclairage] End Sub
Public Sub ArrêtEclairage() Application.OnTime EarliestTime:=vNow, _ Procedure:="Eclairage", Schedule:úlse ActiveWorkbook.Names.Add Name:="VarEclairage", RefersToR1C1:=1 End Sub
Donc je voudrais que dans une cellule bien définie, apparaisse la mention "cellule clignotante = à renseigner" dès qu'au moins 1 cellule clignote en rouge dans la plage définie.
Ai-je été clair!! Merci Dadi
Bonjour, *DADI*
Plus d'informations permettraient de proposer une solution. Quelles sont les conditions de la MEFC, où agit-elle...? Peut-être un exemple sur cjoint.com?
-- Bien amicordialement, P. Bastard
Bonsoir Jacky, Merci de cette réponse, mais la couleur de cellule est le résultat d'une MFC. Peut-on faire qquechose? Mercie encore
Dadi
Bonsoir,
Sauf si les couleurs sont le résultat d'une MFC Plage= à définir ou à nommer '----------- Sub jj() For Each c In Range("plage") If c.Interior.Color = vbRed Then [a1] = "ici le texte" Next End Sub
'--------- Salutations JJ
"DADI" a écrit dans le message de news:
Bonsoir à tous, Dans une cellule je voudrais faire aparaître un texte si une ou plusieurs cellules d'une plage définie sont de couleur rouge. Merci de votre aide.
Patrick BASTARD
Bonjour, *DADI*
D'après le peu que j'ai compris... Si tes cellules clignotent quand somme(c10:r10)>0 et E10 contient du texte : Tu mets dans ta cellule : =SI(ET(SOMME(C10:R10)>0; ESTTEXTE(E10));"tontexte";"") et tontexte s'affichera si les conditions sont remplies.
-- Bien amicordialement, P. Bastard
Bonsoir à tous,
Voici la MFC actuelle des cellules d'une plage définie: 1ère cond =ESTTEXTE(E10) 'qui arrête la condition ci-dessous' 2 ème cond =ET(SOMME(F10:R10)>0;VarEclairage=1) 'clignotant en rouge'
Macro de clignotement : (qui bug un peu, d'ailleurs)
Public Sub Eclairage() vNow = Now + TimeValue("00:00:01") Application.OnTime vNow, "Eclairage" ActiveWorkbook.Names.Add Name:="VarEclairage", RefersToR1C1:=1 - [VarEclairage] End Sub
Public Sub ArrêtEclairage() Application.OnTime EarliestTime:=vNow, _ Procedure:="Eclairage", Schedule:úlse ActiveWorkbook.Names.Add Name:="VarEclairage", RefersToR1C1:=1 End Sub
Donc je voudrais que dans une cellule bien définie, apparaisse la mention "cellule clignotante = à renseigner" dès qu'au moins 1 cellule clignote en rouge dans la plage définie.
Ai-je été clair!! Merci Dadi
Bonjour, *DADI*
Plus d'informations permettraient de proposer une solution. Quelles sont les conditions de la MEFC, où agit-elle...? Peut-être un exemple sur cjoint.com?
-- Bien amicordialement, P. Bastard
Bonsoir Jacky, Merci de cette réponse, mais la couleur de cellule est le résultat d'une MFC. Peut-on faire qquechose? Mercie encore
Dadi
Bonsoir,
Sauf si les couleurs sont le résultat d'une MFC Plage= à définir ou à nommer '----------- Sub jj() For Each c In Range("plage") If c.Interior.Color = vbRed Then [a1] = "ici le texte" Next End Sub
'--------- Salutations JJ
"DADI" a écrit dans le message de news:
Bonsoir à tous, Dans une cellule je voudrais faire aparaître un texte si une ou plusieurs cellules d'une plage définie sont de couleur rouge. Merci de votre aide.
Bonjour, *DADI*
D'après le peu que j'ai compris...
Si tes cellules clignotent quand somme(c10:r10)>0 et E10 contient du texte :
Tu mets dans ta cellule : =SI(ET(SOMME(C10:R10)>0;
ESTTEXTE(E10));"tontexte";"")
et tontexte s'affichera si les conditions sont remplies.
--
Bien amicordialement,
P. Bastard
Bonsoir à tous,
Voici la MFC actuelle des cellules d'une plage définie:
1ère cond =ESTTEXTE(E10) 'qui arrête la condition ci-dessous'
2 ème cond =ET(SOMME(F10:R10)>0;VarEclairage=1) 'clignotant en
rouge'
Macro de clignotement : (qui bug un peu, d'ailleurs)
Public Sub Eclairage()
vNow = Now + TimeValue("00:00:01")
Application.OnTime vNow, "Eclairage"
ActiveWorkbook.Names.Add Name:="VarEclairage", RefersToR1C1:=1 -
[VarEclairage]
End Sub
Public Sub ArrêtEclairage()
Application.OnTime EarliestTime:=vNow, _
Procedure:="Eclairage", Schedule:úlse
ActiveWorkbook.Names.Add Name:="VarEclairage", RefersToR1C1:=1
End Sub
Donc je voudrais que dans une cellule bien définie, apparaisse la
mention "cellule clignotante = à renseigner" dès qu'au moins 1
cellule clignote en rouge dans la plage définie.
Ai-je été clair!!
Merci
Dadi
Bonjour, *DADI*
Plus d'informations permettraient de proposer une solution.
Quelles sont les conditions de la MEFC, où agit-elle...?
Peut-être un exemple sur cjoint.com?
--
Bien amicordialement,
P. Bastard
Bonsoir Jacky,
Merci de cette réponse, mais la couleur de cellule est le résultat
d'une MFC. Peut-on faire qquechose?
Mercie encore
Dadi
Bonsoir,
Sauf si les couleurs sont le résultat d'une MFC
Plage= à définir ou à nommer
'-----------
Sub jj()
For Each c In Range("plage")
If c.Interior.Color = vbRed Then [a1] = "ici le texte"
Next
End Sub
'---------
Salutations
JJ
"DADI" <dadi@discussions.microsoft.com> a écrit dans le message de
news: A568495F-8DDF-4223-A19B-B8C6CB2155E5@microsoft.com...
Bonsoir à tous,
Dans une cellule je voudrais faire aparaître un texte si une ou
plusieurs cellules d'une plage définie sont de couleur rouge.
Merci de votre aide.
D'après le peu que j'ai compris... Si tes cellules clignotent quand somme(c10:r10)>0 et E10 contient du texte : Tu mets dans ta cellule : =SI(ET(SOMME(C10:R10)>0; ESTTEXTE(E10));"tontexte";"") et tontexte s'affichera si les conditions sont remplies.
-- Bien amicordialement, P. Bastard
Bonsoir à tous,
Voici la MFC actuelle des cellules d'une plage définie: 1ère cond =ESTTEXTE(E10) 'qui arrête la condition ci-dessous' 2 ème cond =ET(SOMME(F10:R10)>0;VarEclairage=1) 'clignotant en rouge'
Macro de clignotement : (qui bug un peu, d'ailleurs)
Public Sub Eclairage() vNow = Now + TimeValue("00:00:01") Application.OnTime vNow, "Eclairage" ActiveWorkbook.Names.Add Name:="VarEclairage", RefersToR1C1:=1 - [VarEclairage] End Sub
Public Sub ArrêtEclairage() Application.OnTime EarliestTime:=vNow, _ Procedure:="Eclairage", Schedule:úlse ActiveWorkbook.Names.Add Name:="VarEclairage", RefersToR1C1:=1 End Sub
Donc je voudrais que dans une cellule bien définie, apparaisse la mention "cellule clignotante = à renseigner" dès qu'au moins 1 cellule clignote en rouge dans la plage définie.
Ai-je été clair!! Merci Dadi
Bonjour, *DADI*
Plus d'informations permettraient de proposer une solution. Quelles sont les conditions de la MEFC, où agit-elle...? Peut-être un exemple sur cjoint.com?
-- Bien amicordialement, P. Bastard
Bonsoir Jacky, Merci de cette réponse, mais la couleur de cellule est le résultat d'une MFC. Peut-on faire qquechose? Mercie encore
Dadi
Bonsoir,
Sauf si les couleurs sont le résultat d'une MFC Plage= à définir ou à nommer '----------- Sub jj() For Each c In Range("plage") If c.Interior.Color = vbRed Then [a1] = "ici le texte" Next End Sub
'--------- Salutations JJ
"DADI" a écrit dans le message de news:
Bonsoir à tous, Dans une cellule je voudrais faire aparaître un texte si une ou plusieurs cellules d'une plage définie sont de couleur rouge. Merci de votre aide.
