Excel VBA : Déplacer des colonnes de couleur

Bonjour,

Je débute sur VBA et je me retrouve confronter à un problème sur lequel je sèche complètement.

Voici la situation, j'ai un tableau, avec en ligne des catégories et en colonnes des dates. Des valeurs viennent s'enregistrer automatiquement sur une nouvelle colonne pour chaque nouvel enregistrement.
Il ne peut y avoir qu'une ligne avec une valeur pour chaque colonne. Le reste de la colonne étant vide.

Et je cherche à mettre en couleur les 5 dernières colonnes d'un tableau à chaque nouvel enregistrement. Mais faire en sorte qu'il y est toujours seulement les 5 dernières colonnes du tableau en couleur.

Sachant de plus qu'il faudrait que les 5 colonnes est des couleurs différentes.

Actuellement j'ai réussi à faire ceci :

Range("XFD3").End(xlToLeft).Interior.ColorIndex = 3

Mais cela ne permet que de faire apparaître une couleur sur la 3éme case de la dernière colonne à chaque enregistrement.


D'avance merci.