Discussion :

[calvi2002]

bonjour,
je voudrais savoir comment on peut copier une ligne sélectionné dans un autre onglet.
j'ai essayé de faire ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
Sub copie_ligne()
 ActiveCell.EntireRow.Copy
 Range("num_ligne:num_ligne").Select = ActiveCell.EntireRow
 ActiveSheet.Paste Destination:=Sheets("Feuil2").Range("num_ligne:num_ligne")
 Application.CutCopyMode = False
 End Sub

mais ça marche pas.l'idée c'est de copier une ligne séléctionné sur la même ligne mais dans un autre onglet(par ex:a1 de la feuil1 copié sur a1 sur la feuil2).
merci d'avance

[Minick]

Salut,

Comme ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveCell.EntireRow.Copy Destination:=Worksheets("Feuil2").Range("A" & ActiveCell.Row)

++
Minick

[calvi2002]

merci,par contre tu pourrais m'expliquer ce-que ça veut dire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Range("A" & ActiveCell.Row)

[Minick]

Re,

ActiveCell est la cellule selectionnee dans la Feuil1 comme tu veux copier au meme endroit dans la feuil2 on lit sa propriete Row pour savoir ou la copier.

J'ai utiliser la colonne A

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range("A" & ActiveCell.Row)

mais j'aurai egalement pu faire comme ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Rows(ActiveCell.Row)

J'espere que c'est assez clair

++
Minick

[calvi2002]

merci,j'ai compris.