Bonjour ,
je renseigne depuis un tableau excel 1 des informations dans un autre d'un classeur 2 différent .
Fonctionnement de ma macro : je clique sur une cellule de la colonne "C" et je genere le 2eme classeur avec les tableau qui contient les valeurs de la ligne ou j'ai cliqué .
J'arrive aussi a retrouver 1 seul autres cellule qui contient la même valeur que celle ou j'ai cliqué et je renseigne dans le tableau généré .
Mon Pb : Je veux retrouver toutes les autres valeurs égal a ma cellule ou j'ai cliqué en premier .
Quelle boucle je dois utiliser pour ce test ?
voici mon code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45 With Workbooks("valeurs").Sheets("test") For Each cell In Range("C4:C200") 'la valeurs de ligne ici est donné précedement la cellule ou j'ai cliqué If .Cells(Ligne, 3).Value = cell.Value Then Ligne = cell.Row '''''''infos de la nouvel lignes Quantity = .Cells(Ligne, 8).Value Projectname = .Cells(Ligne, 4).Value With xlapp.Workbooks(1).Worksheets(1) .Cells(14, 3).Value = Projectname .Cells(14, 7).Value = Quantity If Ordernum = "commercial" Then .Cells(14, 9).Value = ordernumb1 Else .Cells(14, 9).Value = ordernumb2 End If End With End If Next cell End With End Sub
Merci pour l'aide![]()
Partager