Si vous souhaitez copier une cellule mise en forme particulière ou des cellules colorées d’une colonne à la colonne suivante, cet article est pour vous. Dans cet article, nous allons apprendre à copier des cellules colorées à l’aide du code VBA.

Voici un aperçu des données que nous avons, c’est-à-dire que la colonne A contient des données avec quelques cellules de couleur jaune.

Pour extraire les données mises en surbrillance en jaune uniquement; nous devons créer un UDF pour afficher les cellules colorées uniquement dans la colonne B

img1

  • Pour créer une fonction définie par l’utilisateur, nous suivrons les étapes ci-dessous:

Cliquez sur l’onglet Développeur Dans le groupe Code, sélectionnez Visual Basic

img2

  • Nous devons copier le code ci-dessous dans le module standard

Fonction IsYellow (ByRef r As Range)

Si r.Interior.ColorIndex = 6 Alors

IsYellow = r.Value

Sinon

IsYellow = vbNullString

Fin si

Fonction de fin

img3

===

Dans la cellule B1, la formule sera * = IsYellow (A1)

img4

Le code ci-dessus correspond spécifiquement à la couleur # 6 qui est uniquement destinée à la couleur jaune. Par conséquent, le fichier udf extraira uniquement les valeurs contenant la couleur n ° 6.

Si nous voulons extraire les cellules de couleur rouge, nous devons vérifier le numéro de couleur désigné et simplement le remplacer par le numéro de couleur jaune.

De cette façon, nous pouvons récupérer les cellules de couleur de la police jaune en utilisant le code vba.

image 4