Recuperer des donnees

C

Catrice

XLDnaute Barbatruc

• 9 Septembre 2008

• #2

Re : Recuperer des donnees

Bonjour,

Une solution dans le fichier joint

 

Pièces jointes

• Timetable.xls

  15 KB · Affichages: 63
• Timetable.xls

  15 KB · Affichages: 56
• Timetable.xls

  15 KB · Affichages: 55

Vote positif 0 Vote négatif

T

Tom32

XLDnaute Occasionnel

• 9 Septembre 2008

• #3

Re : Recuperer des donnees

Non, ce n'est pas bon,

premierement parce que je ne veux pas que la recherche ait besoin de la date et deuxiemement parce que je veux que le nombre 800 aille dans la cellule juste en dessous la version 8, le nombre 800 est actuellement une cellule trop bas.

Je te remercie quand meme, je vais essayer d'approfondir ton idee.

 

Vote positif 0 Vote négatif

C

Catrice

XLDnaute Barbatruc

• 9 Septembre 2008

• #4

Re : Recuperer des donnees

Re,

Ci-joint une solution Macro

 

Pièces jointes

• Timetable.xls

  25 KB · Affichages: 65
• Timetable.xls

  25 KB · Affichages: 62
• Timetable.xls

  25 KB · Affichages: 62

Dernière édition: 9 Septembre 2008

Vote positif 0 Vote négatif

T

Tom32

XLDnaute Occasionnel

• 9 Septembre 2008

• #5

Re : Recuperer des donnees

Merci c,est ce qu'il me faut je pense.
Qu'est ce que je dois changer dans le code si je compte mettre le tableau de resultat sur une autre feuille ?

Je te remercie

 

Vote positif 0 Vote négatif

C

Catrice

XLDnaute Barbatruc

• 9 Septembre 2008

• #6

Re : Recuperer des donnees

Re,

Les départ et arrivée sont paramétrés dans la macro.
voir le fichier joint

 

Pièces jointes

• Timetable.xls

  28.5 KB · Affichages: 64
• Timetable.xls

  28.5 KB · Affichages: 66
• Timetable.xls

  28.5 KB · Affichages: 64

Vote positif 0 Vote négatif

T

Tom32

XLDnaute Occasionnel

• 9 Septembre 2008

• #7

Re : Recuperer des donnees

Ok merci bien, je pense que j'ai ce qu'il faut !

Encore merci

 

Vote positif 0 Vote négatif

T

Tom32

XLDnaute Occasionnel

• 11 Septembre 2008

• #8

Re : Recuperer des donnees

Re-bonjour,

J'ai juste fait une modification a mon fichier de depart : j'ai rajouter une colonne et plus rien ne marche (ceci dit, ca parait normal), j'ai essaye de changer certains parametres dans la macro, mais comme je comprends rien a la formule ecrite, je n'arrive pas a trouver la solution.

Quelqu'un peut-il me la donner ?

 

Pièces jointes

• Timetable.xls

  30.5 KB · Affichages: 48
• Timetable.xls

  30.5 KB · Affichages: 47
• Timetable.xls

  30.5 KB · Affichages: 48

Vote positif 0 Vote négatif

T

Tom32

XLDnaute Occasionnel

• 16 Septembre 2008

• #9

Re : Recuperer des donnees

Personne ne voit comment faire ? je pense qu'il y a une juste un numero dans le code a changer, mais je ne vois pas lequel !!

Merci

 

Vote positif 0 Vote négatif

J

JHA

XLDnaute Barbatruc

• 16 Septembre 2008

• #10

Re : Recuperer des donnees

Bonjour Tom32, le forum,

modif de la plage:

Sub Test()
Range("D4:K60").ClearContents
Depart = "Sheet1"
Arrivee = "Sheet2"
ZoneArrivee = "D3:K3"
i = 1
For Each X In Sheets(Depart).Range("E3:" & Sheets(Depart).Range("E65536").End(xlUp).Address)
If X <> "" Then
MaVar = Application.Match(X, Sheets(Arrivee).Range(ZoneArrivee), 0)
Sheets(Arrivee).Range(ZoneArrivee).Offset(i, MaVar - 1).Resize(1, 1) = X.Offset(0, 1)
Else
i = i + 1
End If
Next
End Sub


JHA

 

Pièces jointes

• Copie de Timetable(1).zip

  9.5 KB · Affichages: 26

Dernière édition: 16 Septembre 2008

Vote positif 0 Vote négatif

T

Tom32

XLDnaute Occasionnel

• 16 Septembre 2008

• #11

Re : Recuperer des donnees

impec, merci bien

 

Vote positif 0 Vote négatif