Copier des valeurs

[Pat]

Bonjour le forum
Est-il possible de copier les valeurs qui sont signalées par les couleurs dans mon tableau A et qu'elles soient reportées dans mon tableau B
Les valeurs de la mise en forme conditionnelle du tableau A peut varier.
Un grand merci [file name=Essai Mef_20050525112912.zip size=1557]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Essai Mef_20050525112912.zip[/file]

 

[mortimer]

heu, je pense que c'est possible :
il suffirait de recopier les formules du format conditionnel dans le tableau B, genre :

si(valeur_de_cellule_tableau_A compris entre .. et .. ; mettre valeur dans tableau B ; )

si tu emballes le tout dans une macro, tu peux facilement aussi modifier (dans le cas ou la condition est 'vraie' les caractéristiques des cellules du tableua B (couleur, police etc)

j'espere que ca t'a un peu aidé.

(;-)

mortimer

 

[Pat]

Bonjour

Merci Mortimer mais ca n'est pas tout a fait comme ca que je pensais l'affaire
Fichier joint avec qq explications
Merci et bonne journée à tous [file name=Essai Mef1_20050526112139.zip size=2202]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Essai Mef1_20050526112139.zip[/file]

 

[Moa]

Salut Pat !

Sub RecopVal()
Dim Cell As Range
For Each Cell In Range('C5:E14')
If Cell.Interior.ColorIndex <> xlNone Then
Cell.Offset(0, 4) = Cell.Value
End If
Next Cell
End Sub

Ou si tu veux selon ta couleur actuelle :

Changer :

If Cell.Interior.ColorIndex <> xlNone Then

Par :

If Cell.Interior.ColorIndex = 34

Mais attention, si tes cellules sont coloriées avec une MFC, cette macro ne fonctionnera pas.

Ton fichier en pièce jointe

@ +++

Moa [file name=EssaiMefPat.zip size=9451]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/EssaiMefPat.zip[/file]

Message édité par: Moa, à: 26/05/2005 13:52

 

[Pat]

Bonjour
Un grand merci de moi à Moa
Ca fonctionne bien sur très bien
Bonne journée à tous