KutoolsforOffice — Une solution unique, cinq outils puissants.Faire plus avec moins d'efforts.Soldes de mars : 20 % de réduction

Comment appliquer aléatoirement une couleur de fond ou une couleur de remplissage aux cellules dans Excel ?

AuteurKelly Date de modification

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 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.

Invite VBA à sélectionner la plage de données

Cellules remplies de couleurs aléatoires différentes

  • 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 xBule est 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.

cliquer sur Trier la plage aléatoirement de Kutools

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.

définir les options dans la boîte de dialogue Trier la plage aléatoirement

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.

remplir les cellules sélectionnées aléatoirement avec une couleur

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 :

Meilleurs outils de productivité Office

🤖Kutools IA Aide: Révolutionnez Analyse des données grâce à :Exécution intelligente   |  Générez du code|  Créez formules personnalisées  |  Analysez des données et générez des graphiques|  Appelez Fonctions améliorées
Fonctionnalités populaires:Rechercher, mettre en surbrillance ou Marquer les doublons   |  Supprimer les lignes vides   |  Combinez les colonnes ou cellules sans perdre de données   |   Arrondi sans utiliser de formule...
Super RECHERCHEV:RechercheValeurs avec critères multiples  |  RechercheValeurs avec valeurs multiples  |   RechercheValeurs dans plusieurs feuilles   |   Correspondance floue....
Liste déroulante avancée:Créez rapidement une liste déroulante   |  Liste déroulante dépendante   |  Liste déroulante à sélection multiple....
Gestionnaire de colonnes:Ajouter un nombre précis de colonnes|Déplacer des colonnes|Basculer la visibilité des colonnes masquées|Comparer des plages et des colonnes...
Fonctionnalités vedettes:Mise au point de la grille   |  Vue de conception   |Barre de formule améliorée   | Gestionnaire de classeurs et de feuilles   |  Bibliothèque de ressources(Texte automatique)|  Sélecteur de date   |  Consolider les feuilles de calcul  |  Chiffrer/Déchiffrer les cellules   | Envoyer des e-mails par liste   |  Super Filtre   |   Filtre spécial(Filtrer les cellules avec une police en gras/italique/barré...) ...
… et bien plus encore… et plus encore:(,)Supprimer des caractères spécifiques, ...)|   50+Typesde graphiques(, ...)|   40+ Formules pratiques(Calculer l'âge en fonction de la date de naissance, ...)|   19 Outils d’insertion(,Insérer une image depuis un chemin , ...)|   de conversion (Convertir en mots,Conversion de devises, ...)|Fusionner et scinder   (Fusion avancée des lignes,Diviser les cellules , ...)|, ...)   |
Utilisez Kutools dans la langue de votre choix – disponible en anglais, espagnol, allemand, français, chinois et 40+ autres langues !

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.

ExcelWordOutlookTabsPowerPoint
  • 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