Couleur de cellule excel office 365
Résolu/Fermé
A voir également:
- Couleur de cellule excel office 365
- Microsoft office - Guide
- Excel cellule couleur si condition texte - Guide
- Oubliez Microsoft Office ! Cet équivalent totalement gratuit est parfait pour l'école, la maison et le bureau - Guide
- Aller à la ligne dans une cellule excel - Guide
- Liste déroulante excel - Guide
2 réponses
M-12
Messages postés
1331
Date d'inscription
lundi 22 septembre 2008
Statut
Membre
Dernière intervention
8 avril 2023
284
4 févr. 2023 à 18:03
4 févr. 2023 à 18:03
Bonjour,
Teste plutôt comme ceci avec tes couleur sous la forme --> FFFF00 par exemple
Sub coloriage()
Dim i As Long
For i = 2 To 6000
Range("A" & i).Interior.Color = "&H" & Range("G" & i)
Next
End Sub
Le Pingou
Messages postés
12200
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
22 novembre 2024
1 450
4 févr. 2023 à 18:13
4 févr. 2023 à 18:13
Bonjour,
Une possibilité:
Sub coloriage()
Dim i As Long
For i = 2 To 6000
Range("A" & i).Interior.ColorIndex = Range("G" & i).Interior.ColorIndex
Next
End Sub
5 févr. 2023 à 17:44
Merci le code fonctionne parfaitement il faut juste que je corrige les valeur Hexa en enlevent le # qui et devant mais avec un droit (G &"i";6)dans le classeur tout fonctionne merci beaucoup.