Il y a quelque mois, j'ai trouv=E9 dans ce groupe un code VBA qui
permettais de mettre en couleur la ligne de la cellule s=E9lectionn=E9e.
Je m'explique, quelle que soit la cellule que j'activerais dans ma
feuille de classeur, je souhaiterais que la ligne de cette cellule se
colorie en gris par exemple.
Bien le bonjour, If Selection.Count <> 1 Then Exit Sub Rows(Selection.Row).Interior.ColorIndex = 15 Youky
"crole" a écrit dans le message de news:
Bonjour le groupe,
Il y a quelque mois, j'ai trouvé dans ce groupe un code VBA qui permettais de mettre en couleur la ligne de la cellule sélectionnée.
Je m'explique, quelle que soit la cellule que j'activerais dans ma feuille de classeur, je souhaiterais que la ligne de cette cellule se colorie en gris par exemple.
Quelqu'un aurait-il la réponse. Merci d'avance
Cordialement Crole
Bien le bonjour,
If Selection.Count <> 1 Then Exit Sub
Rows(Selection.Row).Interior.ColorIndex = 15
Youky
"crole" <contactbruno@skynet.be> a écrit dans le message de news:
1176806826.250229.59110@b75g2000hsg.googlegroups.com...
Bonjour le groupe,
Il y a quelque mois, j'ai trouvé dans ce groupe un code VBA qui
permettais de mettre en couleur la ligne de la cellule sélectionnée.
Je m'explique, quelle que soit la cellule que j'activerais dans ma
feuille de classeur, je souhaiterais que la ligne de cette cellule se
colorie en gris par exemple.
Bien le bonjour, If Selection.Count <> 1 Then Exit Sub Rows(Selection.Row).Interior.ColorIndex = 15 Youky
"crole" a écrit dans le message de news:
Bonjour le groupe,
Il y a quelque mois, j'ai trouvé dans ce groupe un code VBA qui permettais de mettre en couleur la ligne de la cellule sélectionnée.
Je m'explique, quelle que soit la cellule que j'activerais dans ma feuille de classeur, je souhaiterais que la ligne de cette cellule se colorie en gris par exemple.
Quelqu'un aurait-il la réponse. Merci d'avance
Cordialement Crole
ru-th
Salut
dans le module de la feuille concernée Private Sub Worksheet_SelectionChange(ByVal Target As Range) Cells.Interior.ColorIndex = xlNone Rows(Target.Row).Interior.ColorIndex = 15 End Sub
a+ rural thierry
"crole" a écrit dans le message de news: Bonjour le groupe,
Il y a quelque mois, j'ai trouvé dans ce groupe un code VBA qui permettais de mettre en couleur la ligne de la cellule sélectionnée.
Je m'explique, quelle que soit la cellule que j'activerais dans ma feuille de classeur, je souhaiterais que la ligne de cette cellule se colorie en gris par exemple.
Quelqu'un aurait-il la réponse. Merci d'avance
Cordialement Crole
Salut
dans le module de la feuille concernée
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
Rows(Target.Row).Interior.ColorIndex = 15
End Sub
a+
rural thierry
"crole" <contactbruno@skynet.be> a écrit dans le message de
news:1176806826.250229.59110@b75g2000hsg.googlegroups.com...
Bonjour le groupe,
Il y a quelque mois, j'ai trouvé dans ce groupe un code VBA qui
permettais de mettre en couleur la ligne de la cellule sélectionnée.
Je m'explique, quelle que soit la cellule que j'activerais dans ma
feuille de classeur, je souhaiterais que la ligne de cette cellule se
colorie en gris par exemple.
dans le module de la feuille concernée Private Sub Worksheet_SelectionChange(ByVal Target As Range) Cells.Interior.ColorIndex = xlNone Rows(Target.Row).Interior.ColorIndex = 15 End Sub
a+ rural thierry
"crole" a écrit dans le message de news: Bonjour le groupe,
Il y a quelque mois, j'ai trouvé dans ce groupe un code VBA qui permettais de mettre en couleur la ligne de la cellule sélectionnée.
Je m'explique, quelle que soit la cellule que j'activerais dans ma feuille de classeur, je souhaiterais que la ligne de cette cellule se colorie en gris par exemple.
Quelqu'un aurait-il la réponse. Merci d'avance
Cordialement Crole
Modeste
Bonsour® "mon père" avec ferveur ;o))) vous nous disiez :
dans le module de la feuille concernée Private Sub Worksheet_SelectionChange(ByVal Target As Range) Cells.Interior.ColorIndex = xlNone Rows(Target.Row).Interior.ColorIndex = 15 End Sub
hélas cela détruit les couleurs pré-existantes sur la ligne, et petit à petit toutes les couleurs de cellules.
pour votre pénitence je vous infligerai donc : http://www.polykromy.com/fichiers/rectangle.xls
;o)))
-- -- @+ ;o)))
Bonsour® "mon père" avec ferveur ;o))) vous nous disiez :
dans le module de la feuille concernée
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
Rows(Target.Row).Interior.ColorIndex = 15
End Sub
hélas cela détruit les couleurs pré-existantes sur la ligne, et petit à petit
toutes les couleurs de cellules.
pour votre pénitence je vous infligerai donc :
http://www.polykromy.com/fichiers/rectangle.xls
Bonsour® "mon père" avec ferveur ;o))) vous nous disiez :
dans le module de la feuille concernée Private Sub Worksheet_SelectionChange(ByVal Target As Range) Cells.Interior.ColorIndex = xlNone Rows(Target.Row).Interior.ColorIndex = 15 End Sub
hélas cela détruit les couleurs pré-existantes sur la ligne, et petit à petit toutes les couleurs de cellules.
pour votre pénitence je vous infligerai donc : http://www.polykromy.com/fichiers/rectangle.xls
;o)))
-- -- @+ ;o)))
ru-th
Salut,
a priori c'est voulu ;-)) sinon, je te dis pas l'allure de la feuille au 15ème clic
Cela dépend de ce que crole creut crfaire ! mais la solution de gaëtan est très agréable j'en conviens. Mais, ne faut il pas revenir aux aspects ...pédagogiques voire un peu ludiques sur ce forum. Platon ne disait 'il pas, "si tu ne joues pas dans le bac à sable, comment veux-tu construire un chateau ?" a+ rural thierry
"Modeste" a écrit dans le message de news:
Bonsour® "mon père" avec ferveur ;o))) vous nous disiez :
dans le module de la feuille concernée Private Sub Worksheet_SelectionChange(ByVal Target As Range) Cells.Interior.ColorIndex = xlNone Rows(Target.Row).Interior.ColorIndex = 15 End Sub
hélas cela détruit les couleurs pré-existantes sur la ligne, et petit à petit
toutes les couleurs de cellules.
pour votre pénitence je vous infligerai donc : http://www.polykroce que my.com/fichiers/rectangle.xls
;o)))
-- -- @+ ;o)))
Salut,
a priori c'est voulu ;-))
sinon, je te dis pas l'allure de la feuille au 15ème clic
Cela dépend de ce que crole creut crfaire !
mais la solution de gaëtan est très agréable j'en conviens.
Mais, ne faut il pas revenir aux aspects ...pédagogiques voire un peu
ludiques sur ce forum.
Platon ne disait 'il pas, "si tu ne joues pas dans le bac à sable, comment
veux-tu construire un chateau ?"
a+
rural thierry
"Modeste" <nomail@nomail.net> a écrit dans le message de
news:u7LtgSOgHHA.1244@TK2MSFTNGP04.phx.gbl...
Bonsour® "mon père" avec ferveur ;o))) vous nous disiez :
dans le module de la feuille concernée
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
Rows(Target.Row).Interior.ColorIndex = 15
End Sub
hélas cela détruit les couleurs pré-existantes sur la ligne, et petit à
petit
toutes les couleurs de cellules.
pour votre pénitence je vous infligerai donc :
http://www.polykroce que my.com/fichiers/rectangle.xls
a priori c'est voulu ;-)) sinon, je te dis pas l'allure de la feuille au 15ème clic
Cela dépend de ce que crole creut crfaire ! mais la solution de gaëtan est très agréable j'en conviens. Mais, ne faut il pas revenir aux aspects ...pédagogiques voire un peu ludiques sur ce forum. Platon ne disait 'il pas, "si tu ne joues pas dans le bac à sable, comment veux-tu construire un chateau ?" a+ rural thierry
"Modeste" a écrit dans le message de news:
Bonsour® "mon père" avec ferveur ;o))) vous nous disiez :
dans le module de la feuille concernée Private Sub Worksheet_SelectionChange(ByVal Target As Range) Cells.Interior.ColorIndex = xlNone Rows(Target.Row).Interior.ColorIndex = 15 End Sub
hélas cela détruit les couleurs pré-existantes sur la ligne, et petit à petit
toutes les couleurs de cellules.
pour votre pénitence je vous infligerai donc : http://www.polykroce que my.com/fichiers/rectangle.xls
Il y a quelque mois, j'ai trouvé dans ce groupe un code VBA qui permettais de mettre en couleur la ligne de la cellule sélectionnée.
Je m'explique, quelle que soit la cellule que j'activerais dans ma feuille de classeur, je souhaiterais que la ligne de cette cellule se colorie en gris par exemple.
Quelqu'un aurait-il la réponse. Merci d'avance
Cordialement Crole
Bonsoir,
La ligne active est surlignée
-Sélectionner le champ A2:D16
-Format/Mise en forme Conditionnelle
=LIGNE()=CELLULE("ligne")
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Calculate
End Sub
On 17 avr, 12:47, crole <contactbr...@skynet.be> wrote:
Bonjour le groupe,
Il y a quelque mois, j'ai trouvé dans ce groupe un code VBA qui
permettais de mettre en couleur la ligne de la cellule sélectionnée.
Je m'explique, quelle que soit la cellule que j'activerais dans ma
feuille de classeur, je souhaiterais que la ligne de cette cellule se
colorie en gris par exemple.
Il y a quelque mois, j'ai trouvé dans ce groupe un code VBA qui permettais de mettre en couleur la ligne de la cellule sélectionnée.
Je m'explique, quelle que soit la cellule que j'activerais dans ma feuille de classeur, je souhaiterais que la ligne de cette cellule se colorie en gris par exemple.
Quelqu'un aurait-il la réponse. Merci d'avance
Cordialement Crole
Jacquouille
Mon Père Entre deux oraisons, auriez-vous place pour une choucroute à Strasbourg ?
-- Bien amicalmement, Vivement conseillés: http://www.excelabo.net http://jacxl.free.fr/mpfe/trombino.html http://dj.joss.free.fr/netiquet.htm http://frederic.sigonneau.free.fr/
Jacquouille.
"ru-th" a écrit dans le message de news: uQko%
Salut,
a priori c'est voulu ;-)) sinon, je te dis pas l'allure de la feuille au 15ème clic
Cela dépend de ce que crole creut crfaire ! mais la solution de gaëtan est très agréable j'en conviens. Mais, ne faut il pas revenir aux aspects ...pédagogiques voire un peu ludiques sur ce forum. Platon ne disait 'il pas, "si tu ne joues pas dans le bac à sable, comment veux-tu construire un chateau ?" a+ rural thierry
"Modeste" a écrit dans le message de news:
Bonsour® "mon père" avec ferveur ;o))) vous nous disiez :
dans le module de la feuille concernée Private Sub Worksheet_SelectionChange(ByVal Target As Range) Cells.Interior.ColorIndex = xlNone Rows(Target.Row).Interior.ColorIndex = 15 End Sub
hélas cela détruit les couleurs pré-existantes sur la ligne, et petit à petit
toutes les couleurs de cellules.
pour votre pénitence je vous infligerai donc : http://www.polykroce que my.com/fichiers/rectangle.xls
;o)))
-- -- @+ ;o)))
Mon Père
Entre deux oraisons, auriez-vous place pour une choucroute à Strasbourg ?
--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/
Jacquouille.
"ru-th" <ailleurs@nowhere.fr> a écrit dans le message de news:
uQko%23aOgHHA.5052@TK2MSFTNGP05.phx.gbl...
Salut,
a priori c'est voulu ;-))
sinon, je te dis pas l'allure de la feuille au 15ème clic
Cela dépend de ce que crole creut crfaire !
mais la solution de gaëtan est très agréable j'en conviens.
Mais, ne faut il pas revenir aux aspects ...pédagogiques voire un peu
ludiques sur ce forum.
Platon ne disait 'il pas, "si tu ne joues pas dans le bac à sable, comment
veux-tu construire un chateau ?"
a+
rural thierry
"Modeste" <nomail@nomail.net> a écrit dans le message de
news:u7LtgSOgHHA.1244@TK2MSFTNGP04.phx.gbl...
Bonsour® "mon père" avec ferveur ;o))) vous nous disiez :
dans le module de la feuille concernée
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
Rows(Target.Row).Interior.ColorIndex = 15
End Sub
hélas cela détruit les couleurs pré-existantes sur la ligne, et petit à
petit
toutes les couleurs de cellules.
pour votre pénitence je vous infligerai donc :
http://www.polykroce que my.com/fichiers/rectangle.xls
Mon Père Entre deux oraisons, auriez-vous place pour une choucroute à Strasbourg ?
-- Bien amicalmement, Vivement conseillés: http://www.excelabo.net http://jacxl.free.fr/mpfe/trombino.html http://dj.joss.free.fr/netiquet.htm http://frederic.sigonneau.free.fr/
Jacquouille.
"ru-th" a écrit dans le message de news: uQko%
Salut,
a priori c'est voulu ;-)) sinon, je te dis pas l'allure de la feuille au 15ème clic
Cela dépend de ce que crole creut crfaire ! mais la solution de gaëtan est très agréable j'en conviens. Mais, ne faut il pas revenir aux aspects ...pédagogiques voire un peu ludiques sur ce forum. Platon ne disait 'il pas, "si tu ne joues pas dans le bac à sable, comment veux-tu construire un chateau ?" a+ rural thierry
"Modeste" a écrit dans le message de news:
Bonsour® "mon père" avec ferveur ;o))) vous nous disiez :
dans le module de la feuille concernée Private Sub Worksheet_SelectionChange(ByVal Target As Range) Cells.Interior.ColorIndex = xlNone Rows(Target.Row).Interior.ColorIndex = 15 End Sub
hélas cela détruit les couleurs pré-existantes sur la ligne, et petit à petit
toutes les couleurs de cellules.
pour votre pénitence je vous infligerai donc : http://www.polykroce que my.com/fichiers/rectangle.xls
;o)))
-- -- @+ ;o)))
Modeste
Bonsour® ru-th avec ferveur ;o))) vous nous disiez :
Mais, ne faut il pas revenir aux aspects ...pédagogiques voire un peu ludiques sur ce forum. Platon ne disait 'il pas, "si tu ne joues pas dans le bac à sable, comment veux-tu construire un chateau ?"
http://cjoint.com/?esbrQs2BWf
-- -- @+ ;o)))
Bonsour® ru-th avec ferveur ;o))) vous nous disiez :
Mais, ne faut il pas revenir aux aspects ...pédagogiques voire un peu
ludiques sur ce forum.
Platon ne disait 'il pas, "si tu ne joues pas dans le bac à sable, comment
veux-tu construire un chateau ?"
Bonsour® ru-th avec ferveur ;o))) vous nous disiez :
Mais, ne faut il pas revenir aux aspects ...pédagogiques voire un peu ludiques sur ce forum. Platon ne disait 'il pas, "si tu ne joues pas dans le bac à sable, comment veux-tu construire un chateau ?"
http://cjoint.com/?esbrQs2BWf
-- -- @+ ;o)))
J
Bonjourzatous Mâtin, quel château ! ça, c'est du ludique ! :-))) J@@
Modeste wrote:
Bonsour® ru-th avec ferveur ;o))) vous nous disiez :
Mais, ne faut il pas revenir aux aspects ...pédagogiques voire un peu ludiques sur ce forum. Platon ne disait 'il pas, "si tu ne joues pas dans le bac à sable, comment veux-tu construire un chateau ?"
http://cjoint.com/?esbrQs2BWf
Bonjourzatous
Mâtin, quel château !
ça, c'est du ludique !
:-)))
J@@
Modeste wrote:
Bonsour® ru-th avec ferveur ;o))) vous nous disiez :
Mais, ne faut il pas revenir aux aspects ...pédagogiques voire un peu
ludiques sur ce forum.
Platon ne disait 'il pas, "si tu ne joues pas dans le bac à sable, comment
veux-tu construire un chateau ?"
Bonjourzatous Mâtin, quel château ! ça, c'est du ludique ! :-))) J@@
Modeste wrote:
Bonsour® ru-th avec ferveur ;o))) vous nous disiez :
Mais, ne faut il pas revenir aux aspects ...pédagogiques voire un peu ludiques sur ce forum. Platon ne disait 'il pas, "si tu ne joues pas dans le bac à sable, comment veux-tu construire un chateau ?"
