rebenir a état inicial

[Eric]

Bonjour forum,

j´ai créé une macro très simple, qui en cliquant une première fois sur un bouton, colorie une plage de cellule (5 cellule cote a cote sur une meme ligne). JE souhaiterais que sur le 2ème clique ma plage revienne à sa couleur iniciale (1ère, 3 et 5ème cellule marron; 2ème et 4ème orange)

Sub CouleurLignes()
ActiveWorkbook.ActiveSheet.Range('celd').Interior.ColorIndex = 6
End Sub

¿Pouvez vous m´aider?

Merci d avance

Eric

 

[eric]

bah alors personne n´a de réponse :ermm:

 

[dg62]

Bonjour Eric et Bonne Fête


Il faut parfois être patient !






Gérard à parfaitement compris le problème.

Message édité par: DG62, à: 19/05/2005 08:40

 

[Gérard DEZAMIS]

Bonjour DG62 et Eric

D'après ce que j'ai compris


@+ GD [file name=EricBouton Bascule_20050519004407.zip size=9313]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/EricBouton Bascule_20050519004407.zip[/file]

 

[Eric]

J´ai pris mon mal en patience et remercie ce forum dementiel
Merci pour votre aide

Eric