XL 2016 Coller la couleur d'une cellule avec mise en forme conditionnelle

teosmi

XLDnaute Nouveau
Bonsoir,
J'aimerai copier et coller un tableau avec des cellules avec une mise en forme conditionnelle et garder le résultat des cellules et leur couleur seulement
Soient :
A1 = 1
B1 = 2
C1 = A1+A2 (soit 3)
C1 à une mise en forme conditionnelle couleur verte si =3
J'aimerai copier C1 et la coller en D1 avec le chiffre 3 et le couleur seulement sans mise en forme conditionnelle.
Soit D1 verte avec le chiffre 3 (pas la formule)
Je ne sais pas comment faire .
Merci pour votre aide
 

Fred0o

XLDnaute Barbatruc
Bonjour teosmi

Voici une macro qui fonctionne pour ton exemple, a adapter sur ton fichier reel :

VB:
Sub Copier()
    [D1] = [C1].Value
    If [C1] = [C1].FormatConditions(1).Operator Then
        [D1].Interior.Color = [C1].FormatConditions(1).Interior.Color
    Else
        [D1].Interior.Pattern = xlNone
    End If
End Sub
 

teosmi

XLDnaute Nouveau
Merci à vous.
La solution de Fred0o fonctionne tant que la condition est appliquée "uniquement aux cellules qui contiennent".
Si dans la condition je passe à "utiliser une formule pour déterminer pour quelle cellule le format sera appliqué" , j'ai l'erreur d'exécution 9
Je m'explique:
E1=10
C1 à une mise en forme conditionnelle couleur verte si E1 =10
Je vais essayer aussi la solution de patricktoulon mais j'ai un souci de synthaxe.
 

GALOUGALOU

XLDnaute Accro
bonjour teorsmi bonjour le forum bonjour patricktoulon, bonjour fredoo
une solution pour copier coller une cellule à la fois
une formule détermine le code index color de la mfc
dans une colonne (dans le classeur colonne N) identifier le n° color index
se positionner sur la cellule a copier et sur le clavier ctrl+maj+c (appel de la macro copier avec couleur)
se positionner sur la cellule à coller et sur le clavier crtl+maj+v (appel de la macro coller avec couleur)
si patricktoulon peut jeter un coup d'oeil sur la fonction couleur pour l'appliquer à la police ça serait top (je ne sais pas faire)
cordialement
galougalou
 

Pièces jointes

  • copier_coller_valeur_couleur.xlsm
    21.1 KB · Affichages: 5

Discussions similaires

Statistiques des forums

Discussions
292 869
Messages
1 926 874
Membres
183 295
dernier inscrit
nikodème