Comment appliquer aléatoirement une couleur de fond ou une couleur de remplissage aux cellules dans Excel ?
Lorsque vous travaillez avec de grands jeux de données ou présentez des informations dans Excel, vous pouvez parfois souhaiter mettre en valeur visuellement votre feuille de calcul à l’aide de cellules colorées aléatoirement. Par exemple, vous pourriez avoir besoin de séparer visuellement des groupes à des fins d’analyse, de créer des quiz aléatoires ou simplement de rendre votre feuille plus attrayante lors d’un examen ou d’une discussion. Colorier manuellement chaque cellule peut s’avérer chronophage et sujet à erreur. Heureusement, Excel propose des méthodes fiables pour attribuer rapidement et aléatoirement une couleur de fond ou une Couleur de remplissage aux cellules d’une plage spécifique. Dans cet article, nous présenterons deux méthodes efficaces : une solution VBA ou l’utilisation de la complémentaire spécialisée Kutools pour Excel.
➤Ajouter aléatoirement une couleur de fond/une Couleur de remplissage aux cellules avec Kutools pour Excel
Ajouter aléatoirement une couleur de fond/une Couleur de remplissage aux cellules avec VBA
À l’aide de VBA (Visual Basic for Applications), vous pouvez attribuer automatiquement une Couleur de remplissage aléatoire à chaque cellule d’une Sélectionner la plage. Cela est utile lorsque vous souhaitez que chaque cellule ait une couleur différente et que vous devez répéter cette action fréquemment sur différents jeux de données.
1. Appuyez sur Alt + F11 pour ouvrir l’éditeur Microsoft Visual Basic for Applications.
2. Dans l’éditeur VBA, cliquez sur Insertion > Module pour créer un nouveau module.
3.Copiez et collez le code VBA suivant dans la fenêtre du module (ne modifiez pas le code) :
VBA : Ajouter une couleur de fond ou une Couleur de remplissage aléatoire aux cellules
Sub TrimExcessSpaces()
Dim rng As Range
Dim WorkRng As Range
Dim xRed As Byte
Dim xGreen As Byte
Dim xBule As Byte
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each rng In WorkRng
xRed = Application.WorksheetFunction.RandBetween(0, 255)
xGreen = Application.WorksheetFunction.RandBetween(0, 255)
xBule = Application.WorksheetFunction.RandBetween(0, 255)
rng.Pattern = xlSolid
rng.PatternColorIndex = xlAutomatic
rng.Interior.Color = VBA.RGB(xRed, xGreen, xBule)
Next
End Sub 4. Appuyez sur F5 ou cliquez sur le bouton Exécuter pour lancer la macro.
5. À l’invite, sélectionnez la plage de cellules que vous souhaitez remplir de couleurs aléatoires, puis cliquez sur OK.
6.Les cellules sélectionnées seront remplies de couleurs aléatoires. Pour répéter l’opération sur une autre plage, relancez la macro et sélectionnez une nouvelle plage.


- Sécurité des macros : Si un avertissement de sécurité s’affiche, activez les macros pour ce classeur avant d’exécuter le code.
- Aléatoire : Les couleurs sont attribuées de manière purement aléatoire ; des doublons peuvent apparaître, notamment dans de grandes plages.
- Performance : Le traitement de sélections très étendues peut prendre un certain temps.
- Fautes de frappe dans le nommage du code : La variable
xBuleest orthographiée tel que fourni. Elle fonctionne néanmoins de manière cohérente dans cette macro ; ne la modifiez que si vous souhaitez la renommer partout. - Dépannage : Si rien ne se produit, vérifiez que le classeur n’est pas en lecture seule et que le code a bien été collé dans un module standard (et non dans un module de feuille ou ThisWorkbook).
Ajouter aléatoirement une couleur de fond/une Couleur de remplissage aux cellules avec Kutools pour Excel
Dans de nombreux cas pratiques, vous préférerez peut-être sélectionner aléatoirement uniquement un sous-ensemble de cellules plutôt que toute la plage, puis appliquer la Trier aléatoirement couleur de fond de votre choix. Kutools pour Excel propose un utilitaire convivial nommé qui simplifie cette tâche sans nécessiter de VBA ni de formules. Cela est particulièrement utile pour les utilisateurs souhaitant colorer aléatoirement un nombre précis de cellules dans une liste ou un jeu de données — par exemple, pour mettre en évidence des gagnants sélectionnés au hasard, affecter des groupes ou extraire un échantillon de données à tester.
Kutools pour Excel – Doté de plus de 300 outils essentiels pour Excel, il rend vos tâches plus rapides, plus simples et plus efficaces.Téléchargez dès maintenant !
1. Sélectionnez toute la plage de cellules dans laquelle vous souhaitez remplir aléatoirement certaines d’entre elles avec une couleur de fond. Pour de meilleurs résultats, assurez-vous que vos données ne contiennent ni cellules fusionnées ni autre mise en forme susceptible d’affecter la sélection.
2. Accédez à l’onglet Kutools du Ruban, choisissez Plage, puis cliquez sur Trier aléatoirement.

3. Dans la boîte de dialogue, accédez à l’onglet Sélectionner. Saisissez le nombre de cellules que vous souhaitez sélectionner aléatoirement dans le champ Nombre de cellules à sélectionner, cochez l’option Cellule, puis cliquez sur OK pour confirmer.

4. Le nombre spécifié de cellules sera mis en surbrillance (sélectionné). Pour appliquer une couleur de remplissage, rendez-vous dans l’onglet Accueil, cliquez sur la flèche située à côté de Couleur de remplissage, puis choisissez une teinte. Les cellules sélectionnées seront immédiatement colorées.

Kutools pour Excel– Boostez Excel avec plus de 300 outils essentiels, pour gagner en rapidité et en simplicité, et profitez des fonctionnalités d’intelligence artificielle pour un traitement de données plus intelligent et une productivité accrue.Obtenez-le dès maintenant
Cette méthode est idéale si vous souhaitez contrôler le nombre de cellules colorées aléatoirement et choisir vous-même votre Couleur de remplissage. L’approche proposée par Kutools évite d’avoir à écrire du code ou à utiliser des formules, rendant ainsi le processus accessible même aux utilisateurs moins familiers avec les fonctionnalités avancées d’Excel. La principale limitation est qu’elle n’applique qu’une seule couleur choisie à la fois ; pour une coloration entièrement aléatoire de toutes les cellules, la solution VBA décrite précédemment peut être plus adaptée. Si vous devez resélectionner ou modifier les cellules aléatoires, il suffit de répéter le processus de sélection à l’aide de Trier aléatoirement, puis d’appliquer une nouvelle couleur selon vos besoins.
- Intégrité de la sélection : Évitez les cellules fusionnées ; elles peuvent perturber la sélection aléatoire.
- Annulation compatible : Vous pouvez annuler l’action à l’aide de Ctrl+Z si la sélection ou la couleur ne correspond pas à ce que vous souhaitiez.
- Une seule couleur par passage : L’outil applique une seule couleur à la fois. Répétez l’opération avec une nouvelle sélection ou une nouvelle teinte si nécessaire.
- Conseil de performance : Le traitement de très grandes plages peut prendre plus de temps ; réduisez la sélection si nécessaire.
Démo : Ajouter aléatoirement une couleur de fond/une Couleur de remplissage aux cellules avec Kutools pour Excel
Articles associés :
Trier aléatoirement des cellules dans une colonne ou une plage
Meilleurs outils de productivité Office
Boostez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée.Kutools pour Excel propose plus de 300 fonctionnalités avancées pour améliorer votre productivité et Gagner du temps.Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et rend votre travail bien plus facile
- Activez l’édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50 % et vous fait économiser des centaines de clics de souris chaque jour !
Tous les compléments Kutools. Un seul installateur
Kutools for Office regroupe les compléments pour Excel, Word, Outlook et PowerPoint, ainsi que Office Tab Pro, ce qui en fait le choix idéal pour les équipes travaillant à travers les applications Office.
- Suite tout-en-un— Compléments Excel, Word, Outlook et PowerPoint + Office Tab Pro
- Un seul installateur, une seule licence— installation en quelques minutes (compatible MSI)
- Fonctionne mieux ensemble— productivité optimisée dans toutes les applications Office
- Essai gratuit de 30 jours avec toutes les fonctionnalités— aucune inscription, aucune carte bancaire
- Meilleur rapport qualité-prix— économisez par rapport à l’achat de compléments individuels