Report des données d'une colonne dans une autre ligne par ligne
Résolu
Pamela
-
Pamela -
Pamela -
Bonjour,
D'avance merci pour votre aide. J'ai essayé par moi-même et je n'ai pas trouvé la solution à mon problème.
Je souhaite que quand je double-clique dans la colonne F ligne 2 les données de la colonne B ligne 2 s'affichent, quand je double-clique dans la colonne F ligne 3 les données de la colonne B ligne 3 s'affichent, ainsi de suite.
Voici ce que j'ai fait jusqu'à maintenant en glanant des informations ici et là
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cells(2, 6) = Cells(2, 2)
Cells(3, 6) = Cells(3, 2)
Cells(4, 6) = Cells(4, 2)
Cells(5, 6) = Cells(5, 2)
Cells(6, 6) = Cells(6, 2)
End Sub
Le problème avec ceci est que quand je double-clique, toutes les lignes s'affichent, pas uniquement la ligne 3 par exemple.
Quelqu'un peut-il m'aider? Merci
D'avance merci pour votre aide. J'ai essayé par moi-même et je n'ai pas trouvé la solution à mon problème.
Je souhaite que quand je double-clique dans la colonne F ligne 2 les données de la colonne B ligne 2 s'affichent, quand je double-clique dans la colonne F ligne 3 les données de la colonne B ligne 3 s'affichent, ainsi de suite.
Voici ce que j'ai fait jusqu'à maintenant en glanant des informations ici et là
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cells(2, 6) = Cells(2, 2)
Cells(3, 6) = Cells(3, 2)
Cells(4, 6) = Cells(4, 2)
Cells(5, 6) = Cells(5, 2)
Cells(6, 6) = Cells(6, 2)
End Sub
Le problème avec ceci est que quand je double-clique, toutes les lignes s'affichent, pas uniquement la ligne 3 par exemple.
Quelqu'un peut-il m'aider? Merci
A voir également:
- Report des données d'une colonne dans une autre ligne par ligne
- Partager photos en ligne - Guide
- Déplacer une colonne excel - Guide
- Mètre en ligne - Guide
- Aller à la ligne dans une cellule excel - Guide
- Trier une colonne excel - Guide
2 réponses
Bonjour,
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'prise en compte seulement si double clic colonne F
If Not Intersect(Target, Range("F:F")) Is Nothing Then
'Target= cellule selectionnee, Row=ligne
Range("F" & Target.Row) = Range("B" & Target.Row)
End If
End Sub
