Remplacer lettre par un nom

[Boby71C]

Bonsoir à tous

En colonne B et colonne C j'ai des lettres A à H
Losque j'écrit un nom en colonne F en face du A de la colonne E , je désir que tous les A des colonnes B et C soient remplacés par se même nom.

J'ai éssayé avec le Si mais je n'obtiens pas le résultat que je désir.

Petit fichier joint.
Merci de votre aide.
@+ Robert [file name=eSSAI.zip size=2147]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/eSSAI.zip[/file]

 

[Hellboy]

Bonjour Boby71C

Si tu ajoute ce code dans le Module Feuil1, tu obtiendra par macro se que tu souhaite.

Private Sub Worksheet_Change(ByVal Target As Range)
Dim vrtCell        As Variant
With Target
        If .Column = 6 Then
                For Each vrtCell In Range(Cells(1, 2), Cells(28, 3))
                        If vrtCell.Value = .Offset(0, -1).Value Then
                            vrtCell.Value = .Value
                        End If
                Next vrtCell
        End If
End With
End Sub

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

Message édité par: Hellboy, à: 05/11/2005 20:01

 

[Boby71C]

Bonjour Helboy et le forum

Merci beaucoup pour ton aide qui est trés satisaisante. C'est exactement se que je désirais.
Merci
@+ Robert