Résolu Argument dans macro de recopie depuis un autre classeur

  • Auteur de la discussion bulgroz_100
  • Date de début

bulgroz_100

Nouveau membre
Bonjour à tous,

Voilà je vous explique mon problème.
J'ai un classeur donc chaque feuille est une semaine (s1 ..... s53 )

Dans chacune de ces feuilles, les valeurs doivent être prises dans un autre classeur dont les feuilles sont également des semaines.
Or pour éviter de répeter l'opération manuellement sur chaque feuille, je voudrais créer une marcro qui le fasse.

Le soucis est que dans la formule suivante :
[cpp]
ActiveCell.FormulaR1C1 = "=[planning_patricia_modifié.xls]s1!R[26]C[-1]"
[/cpp]

Je voudrais transformer le s1 en un argument que je pourrais incrémenter

Si quelqu'un a une idée

Je vous remercie par avance de votre aide.
 

zeb

Modérateur
Meilleure réponse
Bonjour.

Ça ne me semble pas très compliqué.
Partons de ce code.

Code:
Dim semaine As String

semaine = "s1"
ActiveCell.FormulaR1C1 = "=[planning_patricia_modifié.xls]" & semaine & "!R[26]C[-1]"
...
semaine = "s2"
ActiveCell.FormulaR1C1 = "=[planning_patricia_modifié.xls]" & semaine & "!R[26]C[-1]"

C'est difficile à incrémenter. Il faudrait un entier. Ajoutons le :spamafote:


Code:
Dim semaine As Integer

For semaine = 1 To ..
    ...
    ActiveCell.FormulaR1C1 = "=[planning_patricia_modifié.xls]s" & semaine & "!R[26]C[-1]"

Cela répond-il à ton problème ?
 

bulgroz_100

Nouveau membre
Parfait merci beaucoup!!!!!

Je butais sur la syntaxe " & semaine & "

 
Vous devez vous inscrire ou vous connecter pour répondre ici.
Derniers messages publiés
Statistiques globales
Discussions
730 128
Messages
6 717 843
Membres
1 586 372
Dernier membre
Meeithot
Partager cette page
Haut