Discussion :

[tony847]

j'ai mon programme qui marche cependant je voudrai copié seulement les colonne que je veux et non toutes les colonnes.

J'ai un code enregistré à partir d'une macro qui à cette gueul

Code :

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

1
2
3
4
5
6
Sheets("Feuil4").Select
                            Rows(i).Select
                            Selection.Copy
                            Sheets("Feuil2").Select
                            Rows(j).Select
                            ActiveSheet.Paste

[fring]

Jette un oeil ICI

[alsimbad]

c'est marrant.
Bien que non concerné, mais tout de même solidaire, j'ai eu l'idée d'aller voir les autres messages que tu as eu sur ce forum. il me semble qu'il y ai un mot qui fais furieusement défaut.
cordialement

[Abed_H]

Bonsoir à toi aussi tony847

voici un code qui te conviens.

Code :

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

1
2
3
4
5
Sub test_H2()
 Dim c As Integer
    c = InputBox("Indiquer la colonne à recopier..!")
    Feuil1.Columns(c).Copy Destination:=Feuil2.Columns(c)
End Sub

Bonne soirée