Sujet Précédent Sujet Suivant

Contenu de A1 dans B1 en cliquant sur C1?

Fermé
bucabuca Messages postés 31 Date d'inscription lundi 28 juillet 2008 Statut Membre Dernière intervention 6 juin 2013 - 24 déc. 2008 à 14:51
lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 - 25 déc. 2008 à 10:16
Bonjour,
Comment récupérer le contenu de la cellule A1 dans la cellule B1 en cliquant sur la cellule c1?

2 réponses

Réponse 1 / 2
lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 191
24 déc. 2008 à 15:03
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 31 Date d'inscription lundi 28 juillet 2008 Statut Membre Dernière intervention 6 juin 2013
24 déc. 2008 à 15:11
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
Réponse 2 / 2
lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 191
25 déc. 2008 à 10:16
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

Discussions similaires

Quel fonction faire en b1 par rapport à a1
Aziz -
Frenchie83 -

1 réponse
=Si la cellule A1 a du texte = B1 devient couleur
jsecours -
huhh -

8 réponses
Message recurent : Un site est en train de lire vos données
marcm_54 -
Gg -

7 réponses
ne pas utiliser la souris mais le clavier
isabela -
thomas-richet -

32 réponses
Si B1=oui A1=jaune
mart2015 -
PapyLuc51 -

2 réponses