VBA copier coller de Collonne selon critère

B

Bens7

XLDnaute Impliqué

• 1 Juillet 2013

• #16

Re : VBA copier coller de Collonne selon critère

voila la structure des dossiers SOURCE ya que les documents 15620 qui passent

 

Pièces jointes

• Sans titre.jpg

  54.2 KB · Affichages: 45
• Sans titre.jpg

  54.2 KB · Affichages: 46

Vote positif 0 Vote négatif

Y

Yaloo

XLDnaute Barbatruc

• 1 Juillet 2013

• #17

Re : VBA copier coller de Collonne selon critère

Re,

Pour répondre à ta question du post#14, il sait qu'il faut chercher dans la Feuil2 avec With Feuil2, dès que tu mes un point (.) devant Cells, il fait comme s'il y avait Feuil2.Cells(..... Feuil2 étant le CodeName de la Feuille "ACTIF", c'est le nom à gauche de ACTIF dans Visual Basic.

Pour ton dernier problème, c'est trop petit je ne vois rien. Il est étonnant qu'il n'y ai qu'un seul fichier de créé puisque ce que je t'ai fais rajouter est en dernier dans ta macro.

A+

Martial

PS : Essaie de mettre un peu plus d'exemple dans ton fichier, avec quelques fichier bidon.

 

Vote positif 0 Vote négatif

B

Bens7

XLDnaute Impliqué

• 1 Juillet 2013

• #18

Re : VBA copier coller de Collonne selon critère

Voici en pieces jointes la capture d'ecran
en fait si ya une erreur bah ya que le dernier dossier qui passe

 

Pièces jointes

• Sans titre.jpg

  54.2 KB · Affichages: 35
• Sans titre.jpg

  54.2 KB · Affichages: 38
• Sans titre.jpg

  54.2 KB · Affichages: 29

Vote positif 0 Vote négatif

B

Bens7

XLDnaute Impliqué

• 1 Juillet 2013

• #19

Re : VBA copier coller de Collonne selon critère

Ne bouge pas je te fais un zip tout de suite

 

Vote positif 0 Vote négatif

B

Bens7

XLDnaute Impliqué

• 1 Juillet 2013

• #20

Re : VBA copier coller de Collonne selon critère

exemple dossier FACTURE (source)
15616.xlsx
15617.xlsx
15618.xlsx
15619.xlsx
15620.xlsx

dossier FACTURE/PDF (source)
15616.pdf
15617.pdf
15618.pdf
15619.pdf
15620.pdf

dossier CONTRAT (source)
15616.jpg
15616 (2).jpg
15617.jpg
15618.jpg
15619.jpg
15620.jpg

 

Vote positif 0 Vote négatif

B

Bens7

XLDnaute Impliqué

• 1 Juillet 2013

• #21

Re : VBA copier coller de Collonne selon critère

Voila je t'es tout fais propre faut juste modifer le lien CIBLE par apport a ton PC et clik tu va voir ya que le dernier qui passe

 

Pièces jointes

• JOB SA.zip

  805 KB · Affichages: 28

Vote positif 0 Vote négatif

Y

Yaloo

XLDnaute Barbatruc

• 1 Juillet 2013

• #22

Re : VBA copier coller de Collonne selon critère

Re,

Je pense avoir compris, mais n'ai pas pu tester.

Lorsque tu mets

For Each Cel In Range("B" & Rows.Count).End(xlUp)

Cliquez pour agrandir...

Tu indiques "pour toutes les cellules qui se trouvent dans B(dernière ligne) donc uniquement la dernière ligne de ta colonne B.
Dans ton cas, soit il faut définir une plage de B2 à B(dernière ligne) et utiliser For Each Cel in (Le nom de ta plage)

Ou alors passer par une boucle pour toutes tes cellules de la colonne B.

A+

Martial

Oups : on s'est croisé

 

Vote positif 0 Vote négatif

B

Bens7

XLDnaute Impliqué

• 1 Juillet 2013

• #23

Re : VBA copier coller de Collonne selon critère

ha je prefere la boucle sans mettre de plage en gros je voulais dire :
" tous les dossiers de la collonne B sans compter la premiere ligne "
tu peux me mettre la syntaxe du code ? stp ?

 

Vote positif 0 Vote négatif

B

Bens7

XLDnaute Impliqué

• 1 Juillet 2013

• #24

Re : VBA copier coller de Collonne selon critère

ha je prefere la boucle sans mettre de plage en gros je voulais dire :
" tous les dossiers de la collonne B sans compter la premiere ligne "
tu peux me mettre la syntaxe du code ? stp ?

For Each Cel in ("B:B") ?

 

Vote positif 0 Vote négatif

Y

Yaloo

XLDnaute Barbatruc

• 1 Juillet 2013

• #25

Re : VBA copier coller de Collonne selon critère

Bon j'ai ouvert ton zip, c'est bien ce que j'ai mis au post#20, cela ne prend que la dernière ligne.

Il faut remplacer

For Each Cel In Range("B" & Rows.Count).End(xlUp)

Cliquez pour agrandir...

par

For Each Cel In Range("B2:B" & Range("B" & Rows.Count).End(xlUp).Row)

Cliquez pour agrandir...

Vois le fichier ci-dessous, j'ai réduit ta macro afin de gagner du temps, il n'y a qu'une boucle.

A+

Martial

Décidement on ne fait que de se croiser

 

Pièces jointes

• Transfere #4.xlsm

  30.9 KB · Affichages: 33
• Transfere #4.xlsm

  30.9 KB · Affichages: 40
• Transfere #4.xlsm

  30.9 KB · Affichages: 48

Vote positif 0 Vote négatif

B

Bens7

XLDnaute Impliqué

• 1 Juillet 2013

• #26

Re : VBA copier coller de Collonne selon critère

C'EST GENIAL !!!
Merci encore j;en apprend tous les jours avec toi ! c'est incrpyable tous ce qu;on peut faire avnt je passer par un fichier .bat un enfer !

Merci encore Yaloo
a demain surement pour nouvelles aventures !

 

Vote positif 0 Vote négatif

Y

Yaloo

XLDnaute Barbatruc

• 1 Juillet 2013

• #27

Re : VBA copier coller de Collonne selon critère

A demain, si besoin

 

Vote positif 0 Vote négatif