Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

remplacer une couleur par une autre

2 réponses
Avatar
sdellaux
je voudrai pouvoir dans une colonne donn=E9e pouvoir remplacer toutes
les cellules ayant la meme couleur d=E9finie par une autre couleur
cela est il possible en une seule manipulation de la meme fa=E7on que
par la fonction "remplacer" pour un mot par un autre par exemple
je vous en remercie par avance
st=E9phane

2 réponses

Avatar
JB
Bonjour,

Sub couleur()
Set CelluleCoulAnc = Application.InputBox(prompt:="Cliquez sur la
cellule contenant la couleur à modifier", Type:=8)
anc = CelluleCoulAnc.Interior.ColorIndex
Set CelluleCoulNouv = Application.InputBox(prompt:="Cliquez sur la
cellule contenant la nouvelle couleur", Type:=8)
nv = CelluleCoulNouv.Interior.ColorIndex
Set champ = Application.InputBox(prompt:="Champ à modifier",
Type:=8)
For Each c In champ
If c.Interior.ColorIndex = anc Then
c.Interior.ColorIndex = nv
End If
Next c
End Sub

http://cjoint.com/?dlq0lPAIjw

JB


On 11 mar, 14:01, "sdellaux" wrote:
je voudrai pouvoir dans une colonne donnée pouvoir remplacer toutes
les cellules ayant la meme couleur définie par une autre couleur
cela est il possible en une seule manipulation de la meme façon que
par la fonction "remplacer" pour un mot par un autre par exemple
je vous en remercie par avance
stéphane


Avatar
sdellaux
je vous remercie de votre reponse
Mais car hélas il y a un mais
premier point je suis un pietre "exceliste" pour les macros
aussi qd j'ai vu votre piece jointe avec un exemple concret, je me
suis chouette, maitrisant la fonction "copier-coller" je me suis dis
me voilà sauvé....MAIS
en procédant a cela j'ai pour résultat un figeage de mon dossier
personnel sur lequel je veux faire le copier coller
je ne puis l'ouvrir si je l'ai réduit et encore moins le
fermer.....??? obligé de procéder a une déconnection totale pour me
retrouver a mon point de départ.
si j'ai bien compris, étant nul en matière de macro, si j'insère un
"commentaire" dans lequel je recopie la macro que vous donnez, cela
est il déjà un premier pas ?
ensuite comment inserer le bouton "GO"
désolé de toute mon ignorance par avance
cordialement stéphane