[VBA] PB macro : changement couleur cellule

Dede -  
pou pouille Messages postés 207 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

j'essaye de réaliser une macro (sur feuille de préférence "Microsoft Excel] Objects") me permettant d'ajouter une ligne puis de changer la couleur d'une case la ligne en fonction de la ligne du dessous.

Mon but final étant qu'appyer sur le bouton rajoute une ligne sur le haut de mon tableau à deux couleur (une ligne sur deux).

Malheureusement, cela ne marche pas et lorsque ça marche pour une ligne, ça ne marche pas pour la suivante...

Pourriez vous m'aidez s'il vous plait ?

Voici ma macro actuelle :
____________________________________

Private Sub Test_Click()

Cells(7, 1).EntireRow.Insert

If Range("D8").Interior.Color = RGB (250, 250, 250) Then
Range("D7").Interior.Color = RGB (0, 0, 0)
Else
Range("D7").Interior.Color = RGB (250, 250, 250)
End If

End Sub

____________________________________

Merci d'avance !
A voir également:

3 réponses

Réponse 1 / 3
pou pouille Messages postés 207 Date d'inscription   Statut Membre Dernière intervention   31
 
bonjour,
j'ai essayer de chercher, voila ce que j'ai j'ai modifier: premièrement je fais le teste, ensuite on change la couleur puis on insère la ligne, ca fonctionne avec l'alternance des couleurs rouge et noir ( 255 et 0) à changer suivant les couleurs souhaitées. 
Sub Test_Click()
If Range("D8").Interior.Color = 255 Then
Range("D7").Interior.Color = 0
Else
Range("D7").Interior.Color = 250
End If
Cells(7, 1).EntireRow.Insert
End Sub
0
Réponse 2 / 3
Dede
 
Merci pour votre réponse aussi rapide.

J'ai utilisé votre macro et effectivement ça marche. Mais, malheureusment, ça ne marche qu'avec ces couleurs...

Je peux modifier le noir, mais pas le rouge...

D'autre part, je ne comprends pas le 255 et le 250. Pourquoi sont-il différents ?

Merci aux personnes qui pourront m'apporter leur éclairage (le rouge est un peu trop rouge :D)
0
Réponse 3 / 3
pou pouille Messages postés 207 Date d'inscription   Statut Membre Dernière intervention   31
 
je ne sais pas non plus pourquoi , mais lorsque que j'affecte le 250 à la couleur de cellule, au test suivant la valeur est de 255, je ne sais pas d'ou cela peut-il provenir, sinon pour les couleur des cellules:5 et 6 peuvent faire bleu et rouge... à regarder de ce coté pour les couleurs : https://silkyroad.developpez.com/VBA/ConversionCodesCouleurs/
0

Discussions similaires

"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

2 réponses
Transformer un chiffre en lettres dans excel sans macro
vincentphilippos -
tontong -

6 réponses
Erreur d'exécution 13 Incompatibilité de type
grace -
pijaku -

5 réponses
Arrêt d'exécution d'un code vba
amiro2017 -
amiro2017 -

6 réponses
recup couleur de cellule sans macro
magouero -
JvDo -

7 réponses