Discussion :

[mimic50]

Bonjour,
J'ai un petit souci avec ce code ...

Code :

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

1
2
3
4
5
For i = 1 To 15
        sourceSheet = "=CALCULS!R" & i & "C3"
        ActiveWorkbook.Sheets(sourceSheet).Activate
        ...
Next i

Mon souci est que "sourceSheet" contient une string de la formule et non pas l'évaluation de cette formule.

Merci

[Invité]

Peut être comme ça :

Code :

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

1
2
 
sourceSheet = Workbooks("CALCULS").Sheets("R" & i).Range("C3").Value

Voilà

[mimic50]

Merci bcp,
C'est tellement plus simple quand on maitrise le langage ...