Réupéré donnée cellule de plusieurs feuilles sur une feuille

Bonjour Tous le monde

Je suis novice dans la matière ; je vous prie de bien vouloir m’aidé sur mon problème sur Excel

J’ai un fichier Excel qui comporte plusieurs feuilles (+ de 100) ; les feuilles sont renommés au nom des personnes

Toutes les feuilles ont le même modèle

Je veux récupérer la Cellule A1 (Nom de la personne) et T68 (Total) sur une feuille "Résumé"

Feuille 1 : A1 sur résumé A1 ; T68 sur résumé A2

Feuille 2 : A1 sur résumé B1 ; T68 sur résumé B2

Etc.

Merci beaucoup de votre aide

Bonjour,

Essaye ceci

Sub test()

Set res = Sheets("résumé")
Dim ws As Worksheet
c = 1
l = 1

For Each ws In Worksheets
    If ws.Name <> "résumé" Then
        res.Cells(l, c) = ws.Range("A1")
        res.Cells(l + 1, c) = ws.Range("T68")

        c = c + 1
    End If
Next
End Sub

Bonjour

Merci beaucoup de votre réponse ; je vais essayer

Merci encore

Merci beaucoup de votre aide très précieuse

ça marche à merveille

je vous réitère mes vifs remerciements