Bonjour,
Voici le pb qui m'occupe:
Avec une macro evenementielle declench=E9e par double click sur Feuil1
dans la colonne A, je souhaiterais avoir l'action suivante:
Copie de toute la ligne correspodante =E0 la cellule selectionn=E9e et
collage vers la Feuil2 (range A2 par ex.)
A chaque double click sur une des cellules de la colonneA en Feuil1,
les lignes
correspodantes doivent se coller =E0 la suite sur le Feuil2.
Merci d'avance pour votre aide.
SD
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Boisgontier
Bonjour,
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Column = 1 Then Rows(Target.Row).Copy Sheets(2).[A65000].End(xlUp).Offset(1, 0) Cancel = True End If End Sub
Bonjour, Voici le pb qui m'occupe: Avec une macro evenementielle declenchée par double click sur Feuil1 dans la colonne A, je souhaiterais avoir l'action suivante: Copie de toute la ligne correspodante à la cellule selectionnée et collage vers la Feuil2 (range A2 par ex.) A chaque double click sur une des cellules de la colonneA en Feuil1, les lignes correspodantes doivent se coller à la suite sur le Feuil2. Merci d'avance pour votre aide. SD
Bonjour,
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If Target.Column = 1 Then
Rows(Target.Row).Copy Sheets(2).[A65000].End(xlUp).Offset(1, 0)
Cancel = True
End If
End Sub
JB
http://boisgontierjacques.free.fr/
<stef.dubois@club-internet.fr> a écrit dans le message de news:
1190434917.178450.186910@50g2000hsm.googlegroups.com...
Bonjour,
Voici le pb qui m'occupe:
Avec une macro evenementielle declenchée par double click sur Feuil1
dans la colonne A, je souhaiterais avoir l'action suivante:
Copie de toute la ligne correspodante à la cellule selectionnée et
collage vers la Feuil2 (range A2 par ex.)
A chaque double click sur une des cellules de la colonneA en Feuil1,
les lignes
correspodantes doivent se coller à la suite sur le Feuil2.
Merci d'avance pour votre aide.
SD
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Column = 1 Then Rows(Target.Row).Copy Sheets(2).[A65000].End(xlUp).Offset(1, 0) Cancel = True End If End Sub
Bonjour, Voici le pb qui m'occupe: Avec une macro evenementielle declenchée par double click sur Feuil1 dans la colonne A, je souhaiterais avoir l'action suivante: Copie de toute la ligne correspodante à la cellule selectionnée et collage vers la Feuil2 (range A2 par ex.) A chaque double click sur une des cellules de la colonneA en Feuil1, les lignes correspodantes doivent se coller à la suite sur le Feuil2. Merci d'avance pour votre aide. SD
JB
Bonjour,
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Column = 1 Then Rows(Target.Row).Copy Sheets(2).[A65000].End(xlUp).Offset(1, 0) Cancel = True End If End Sub
Bonjour, Voici le pb qui m'occupe: Avec une macro evenementielle declenchée par double click sur Feuil1 dans la colonne A, je souhaiterais avoir l'action suivante: Copie de toute la ligne correspodante à la cellule selectionnée et collage vers la Feuil2 (range A2 par ex.) A chaque double click sur une des cellules de la colonneA en Feuil1, les lignes correspodantes doivent se coller à la suite sur le Feuil2. Merci d'avance pour votre aide. SD
Bonjour,
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)
If Target.Column = 1 Then
Rows(Target.Row).Copy Sheets(2).[A65000].End(xlUp).Offset(1, 0)
Cancel = True
End If
End Sub
JB
http://boisgontierjacques.free.fr
On 22 sep, 06:21, stef.dub...@club-internet.fr wrote:
Bonjour,
Voici le pb qui m'occupe:
Avec une macro evenementielle declenchée par double click sur Feuil1
dans la colonne A, je souhaiterais avoir l'action suivante:
Copie de toute la ligne correspodante à la cellule selectionnée et
collage vers la Feuil2 (range A2 par ex.)
A chaque double click sur une des cellules de la colonneA en Feuil1,
les lignes
correspodantes doivent se coller à la suite sur le Feuil2.
Merci d'avance pour votre aide.
SD
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Column = 1 Then Rows(Target.Row).Copy Sheets(2).[A65000].End(xlUp).Offset(1, 0) Cancel = True End If End Sub
Bonjour, Voici le pb qui m'occupe: Avec une macro evenementielle declenchée par double click sur Feuil1 dans la colonne A, je souhaiterais avoir l'action suivante: Copie de toute la ligne correspodante à la cellule selectionnée et collage vers la Feuil2 (range A2 par ex.) A chaque double click sur une des cellules de la colonneA en Feuil1, les lignes correspodantes doivent se coller à la suite sur le Feuil2. Merci d'avance pour votre aide. SD