aide pour adapter une macro

[LE MATIN]

bonsoir à tous

j'ai trouvé ce petit code sur le forum, que j'ai essayé d' adapter à mes besoins 🙁

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Plage As Range, Cellule As Range, i As Long

With Worksheets("feuil1")
Set Plage = .Range("D9", .Range("A65536").End(xlUp))

For Each Cellule In Plage
i = Cellule.Row

If .Cells(i, 4).Value = 1 Then
.Cells(i, 3).Copy
ActiveSheet.Paste Destination:=Worksheets("feuil2").Cells(i, 1)

Application.CutCopyMode = False
End If
Next Cellule
End With

je souhaite que les cellules copiées soient collées à partir de la cellule c13 de la feuille 2 et a la suite les une des autres.
et je n'y arrive pas 😕 je crois en fait que je ne comprends pas le fonctionnement de la variable i 😱
quelqu'un pourrait il me donner la solution.
merci par avance

 

[pierrejean]

Re : aide pour adapter une macro

bonsoir LE MATIN

a tester:

.......................
[COLOR=red]ligne=13[/COLOR]
For Each Cellule In Plage
.....................................
If .Cells(i, 4).Value = 1 Then
.Cells(i, 3).Copy
ActiveSheet.Paste Destination:=Worksheets("feuil2").Cells([COLOR=red]ligne, 3[/COLOR])
[COLOR=red]ligne=ligne+1[/COLOR]
Application.CutCopyMode = False
End If
...............

 

[Banzai64]

Re : aide pour adapter une macro

bonjour LE MATIN , pierrejean

Une solution ?

Changement du fichier

erreur

 

[LE MATIN]

Re : aide pour adapter une macro

Bonsoir, pierrejean,Banzai64, le forum

merci tout d'abord de vos réponses.
je viens de tester vos propositions et ça fonctionne très bien 🙂

j'ai adapté celle de pierrejean sur mon fichier et c'est ok!

je poursuis mon projet pour lequel je reviendrais probablement sur le forum car il est un peu complexe enfin... compte tenu de mon très petit niveau de connaissance d'excel et surtout VBA
merci encore

 

[LE MATIN]

Re : aide pour adapter une macro

Bonjour,

je reviens vers vous, pour une autre petite aide pour mon projet.

je joins un fichier exemple avec des explications

merci par avance 🙂

 

[pierrejean]

Re : aide pour adapter une macro

bonjour LE MATIN

le fichier n'est pas passé !

 

[LE MATIN]

Re : aide pour adapter une macro

meme compresse le fichier est encore trop lourd 142ko 🙁
je modifie et je reviens 😉

 

[LE MATIN]

Re : aide pour adapter une macro

bonjour,

malgré plusieurs essai, pour le reduire et le compresser, mon fichier, reste trop lourd
puis-je le mettre sur c-joint,
merci de votre reponse
désolé pour ce contre-temps

 

[LE MATIN]

Re : aide pour adapter une macro

bonjour,

je viens d'éditer le post precedent
merci de votre réponse

 

[LE MATIN]

Re : aide pour adapter une macro

bonjour,

je viens d'éditer le post precedent

Merci de votre réponse

 

[pierrejean]

Re : aide pour adapter une macro

bonjour LE MATIN

pas de probleme pour un fichier sur cjoint

 

[LE MATIN]

Re : aide pour adapter une macro

le fichier

http://cjoint.com/?ljmghSqYdR
merci

 

[LE MATIN]

Re : aide pour adapter une macro

Bonsoir,

juste un petit up
merci