Besoin d'un coup de main pour une macro :)

  • Initiateur de la discussion Initiateur de la discussion Pino12
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Pino12

XLDnaute Junior
Bonjour à tous,

Je souhaite appliquer une macro à un tableau afin d'extraire des données hebdomadaires. Ainsi pour une semaine S23 ma macro récupérerait des données d'un fichier "Jeunesse S23.xlsx", pour la semaine semaine S24 de "Jeunesse S24.xlsx" etc..
Pour le moment j'arrive à faire marcher cette macro mais seulement pour une semaine donnée. Par exemple pour S23 j'applique :

Sub Ventes_et_stocks_test()

' Test Macro Ventes et Stocks

Range("E7").Select
ActiveCell.FormulaR1C1 = _
"=VLOOKUP(RC[-4],'[Jeunesse S23.xlsx]Ventes et Stocks Magasins'!R4C1:R20000C22,21,FALSE)"
Range("E7").Select
Selection.AutoFill Destination:=Range("E7:E102"), Type:=xlFillDefault

Range("F7").Select
ActiveCell.FormulaR1C1 = _
"=VLOOKUP(RC[-5],'[Jeunesse S23.xlsx]Ventes et Stocks Magasins'!R4C1:R20000C22,22,FALSE)"
Range("F7").Select
Selection.AutoFill Destination:=Range("F7:F102"), Type:=xlFillDefault

End Sub

J'aimerai pouvoir effectuer cette commande en remplissant toute les semaines d'un coup mais c'est un vrai casse-tête 😕 Quelqu'un aurait-il une idée de comment s'y prendre ?

En PJ vous trouverez le fichier supposé recevoir les données extraites 🙂 Merci d'avance !
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
Microsoft 365 Formules
Réponses
2
Affichages
693
Réponses
22
Affichages
3 K
Réponses
13
Affichages
2 K
Réponses
13
Affichages
2 K
Réponses
2
Affichages
864
Retour