Discussion :

[fmorretton]

Bonjour,

Débutant en VBA, j'ai trouve beaucoup de réponses à mes problèmes en recherchant dans le forum.
J'ai néanmoins un problème dont je n'arrive pas à trouver la solution.

Je dispose de plusieurs feuilles années dont les noms sont Année1970, Annéee1971...;

Je souhaite recopier certaines des cellules de ces fiches années dans une autre feuille.

Code :

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

Macellule.Formula = "=Année1970!E4"

Cela marche très bien.

Je souhaiterais automatiser le fonctionnement en bouclant sur les différentes fiches.
J'ai essayé ceci mais la concaténation ne semble pas marcher.

Code :

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

Macellule.Formula = "="Année"&i!E4" ' (avec i correspondant à l'année)

Auriez-vous une idée??


merci

[ouskel'n'or]

Essaie

Code :

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

Macellule.Formula = "=Année" & i & "!E4" (avec i correspondant à l'année)

Sinon, passe par une variable

Code :

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

1
2
3
LaVar = "=Année" & i & "!E4"
Macellule.Formula = LaVar
Application.calculate

Il peut y avoir un pb de mise à jour mais je ne me souviens plus si c'est Formula qui le provoque (ou formulaLocal ou ... ?)
Tu peux tester pour nous ?

[fmorretton]

Merci beaucoup ca a marché.

J'ai testé ca fonctionne aussi avec formulalocal.
Mais je me souviens d'un autre post où le problème de mise à jour venait avec formulalocal

Merci encore