Discussion :

[Renter72]

j'ai créé un tableau avec une liste déroulante d'une centaine de noms
après calcul le résultat se retrouve toujours sur la même cellule.
Je dois créer une feuille récapitulative avec tous les noms et les résultats correspondants
Voir pièces jointes

[geogeo70]

Bonjour,

je vous propose une macro qui parcourt tous les noms et qui retourne tous les résultats!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub listnoms()
Dim ligne As Integer, fin As Integer
 
 
fin = Feuil2.Range("A2").End(xlDown).Row
 
For ligne = 2 To fin
   Feuil1.Range("F3") = Feuil2.Cells(ligne, 1)
   Feuil3.Cells(ligne + 3, 1) = Feuil2.Cells(ligne, 1)
   Feuil3.Cells(ligne + 3, 3) = Feuil1.Range("J13")
 
Next ligne
 
End Sub

j'ai ajouté un bouton dans la feuille recap qui met à jour les résultats...

voici le fichier :
recap.xlsm

geogeo70

[Renter72]

Bonsoir Geogeo70
Merci de votre aide. C'est ma 1ière macro
Je vais essayer de la comprendre . Merci encore!