Bonjour,
je possede deux versions d'un meme modele (ci apres nommé "old model" et "ancien modele") et j'aimerai voir un peu la différence de résultat.
le résultat (en D33) dépend de deux variable stockées en B5 et B13.
j'ai lié les cellules B5 et B13 de "ancien modèle" au cellules B5 et B13 de "old model".
et apres je lance cette macro : (le fichier différence étant là ou je veux stocké mes différence de résultat)
______________________________________________________________________________
Sub Macro()
For i = 3 To 4
For j = 0 To 6
Windows("old Model TL V4.xls").Activate
Cells(5, 2).Value = i * 10
Cells(13, 2).Value = 32 + j * 3
Windows("differences.xls").Activate
Cells(i, j + 3).Select
ActiveCell.FormulaR1C1 = _
"='[old Model TL V4.xls]Assum - Results'!R33C4-'[ancien modele.xls]Assum - Results'!R33C4"
Windows("differences.xls").Activate
Cells(i, j + 3).Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Next j
Next i
End Sub
______________________________________________________________
ok alors apres réflexion un peu plus posée il a suffit d'utiliser Activatesheet.cells
au lieu de cells
...
-->Message édité par peyro le 18/01/2008 14:55:52<--
-------
they peed on my rug!
|