Contenu de A1 dans B1 en cliquant sur C1?

bucabuca Messages postés 38 Statut Membre -  
lermite222 Messages postés 9042 Statut Contributeur -
Bonjour,
Comment récupérer le contenu de la cellule A1 dans la cellule B1 en cliquant sur la cellule c1?

2 réponses

lermite222 Messages postés 9042 Statut Contributeur 1 191
 
Bonjour,
Avec...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = "$C$1" Then
        Range("B1") = Range("A1")
    End If
End Sub

A+
0
bucabuca Messages postés 38 Statut Membre
 
en fait je voudrais chaque fois une cellule est sélectionnée (par ex A1) le contenu da la cellule voisine (B1) sera mettre dans une cellule fixe(c1) et insi de suite
0
lermite222 Messages postés 9042 Statut Contributeur 1 191
 
Il faut adapter les adrresses suivant ce que tu veux...
Const ColClic = 1
Const ColCopie = 2
Const ColColle = 3
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = ColClic Then
        Cells(Target.Row, ColColle) = Cells(Target.Row, ColCopie)
    End If
End Sub


A+
0