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

Code pour récupérer format cellule

2 réponses
Avatar
guy boily
Bonjour à toutes et à tous,
Voici mon talon d'achille: J'ai une feuille dont certaines cellules sont
formatées en couleur par du code ; exemple pour cellule (3,2) dans la feuille
'chic' :
If Cells(i, 38) < Cells(i, 42) Then
Cells(i, 27).Interior.ColorIndex = 3
End If

Je voudrais à l'aide de code récupérer la couleur de fond qui a été
appliquée à cette cellule et l'appliquer à la cellule (4,3) de la feuille
'laBaie'

Pourriez-vous m'aider s.v.p.? et merci.

--boily_SLSJ

2 réponses

Avatar
FFO
Salut à toi

Je ne sais pas si j'ai bien compris mais je te propose ceci :

Sheets("laBaie").Cells(4, 3).Interior.ColorIndex = Sheets("chic").Cells(3,
2).Interior.ColorIndex

Celà devrait convenir

Dis moi !!!!!
Avatar
guy boily
Salut à toi FFO,

Merci boucoup ça fonctionne à merveille
--
boily_SLSJ


"FFO" a écrit :

Salut à toi

Je ne sais pas si j'ai bien compris mais je te propose ceci :

Sheets("laBaie").Cells(4, 3).Interior.ColorIndex = Sheets("chic").Cells(3,
2).Interior.ColorIndex

Celà devrait convenir

Dis moi !!!!!