copie automatique M en forme

[Dany]

J'ai mis en place une fonction recherche qui fonctionne parfaitement pour me copier le texte. Mais je voudrais aussi quelle me copie la mise en forme ou le style que j'ai crée pour chaque lignes de mon tableaux annexe. Comment faire, sachant que je ne pas faire de mise en forme conditionnel (j'aurais au moins 9 conditions différentes) Quelqu'un peut-il m'aider, Merci d'avance.

 

[Marc]

Salut
essaie ceci

Plus de 3 formes conditionnelles par cellule (à coller dans this workbook)
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Range('A1') = 28 Then
Range('A1').Select
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
End If
End Sub

courage

 

[Dany]

Merci Marc

le souci, c'est que je ne suis pas une bête de macro! Ton texte je dois l'écrire où?
Je réexplique mon cas
j'ai un 1er tableau, en tapant 1 par exemple, dans la cellule d'à côté s'affiche un texte (grâce à une fonction recherche tout simple) Le texte pas de souci, il s'affiche mais pas la mise en forme de ce texte.
:huh: