Bonjour au forum,
Dans un Userform, je cherche à faire un récapitulatif de Feuil23 vers Feuil26 mais en gardant uniquement les infos des colonnes A, B, I, K et N
Avec ce codej'arrive à afficher dans la Feuil26 les colonnes A à E mais ce n'est pas ce que je veux (voir plus haut).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Private Sub CommandButton1_Click() Dim X As Long, y As Integer, z As Long With Feuil19 .Range("A2:E65536").ClearContents For X = 0 To appel.ListCount - 1 z = appel.List(X, 4) For y = 0 To 13 .Cells(X + 2, y + 1) = Feuil17.Cells(z, y + 1) Next Next End With End Sub
Avez-vous une idée ?
Pour info : appel est le nom de la listbox dans l'userform
Merci
Stephanie
Partager