Changer des formules d'une ligne à l'autre et d'un tableur à l'autre.

[Aquhydro]

Bonjour,
J'ai un tableau d'entrée pour un logiciel de simulation, qui utilise excel, le tableau se compose de differentes données type :
1 : -100
2: 450
3 : 1500
4: (1*3)/2 etc...

Or, je dois réaliser 700 simulations et j'ai près de 11 paramètres à changer à chaque fois, 7700, ça fait beaucoup.
J'ai crée un second tableau dans lequel j'ai toutes mes valeurs, et j'ai relié chaque données à la première valeur avec ce genre d'opération
=[Classeur2]Feuil1!$A2
Ou encore
=ARRONDI.SUP((((((E18*[Classeur2]Feuil1!$J2)/F33))/2143)*1300);0)

et une personne de l'entreprise m'as déjà aidé à faire une boucle du style : si y'a 700 pages, faire jouer la simulation pour chacune de ces pages, les une après les autres. Je ne maitrise pas du tout le code en question, mais je peu vous le copier coller :

"Sub Lefichier()
'
' Runs the executable unfichier.exe, which is the
' Graphic version of the program
' Macro written '

'
Set Base = ActiveWorkbook



For n = 1 To Sheets.Count
Sheets(n).Select
workingdir = Range("h24")
ChDir (workingdir)
Range("J12:Q19").Select
Selection.Copy
Set newbook = Workbooks.Add
Selection.PasteSpecial Paste:=xlPasteValues
Selection.End(xlDown).Offset(1, 0).Select
Base.Activate
If Range("e13").Value > 0 Then
Range("b27").Select
Range(ActiveCell, ActiveCell.Offset(Range("e13").Value - 1, 7)).Select
Selection.Copy
newbook.Activate
Selection.PasteSpecial Paste:=xlPasteValues
Selection.End(xlDown).Offset(1, 0).Select
Base.Activate
End If

Range("B33:I33").Select
Range(Selection, Selection.End(xlDown)).Select
Application.CutCopyMode = False
Selection.Copy
newbook.Activate
Selection.PasteSpecial Paste:=xlPasteValues
ActiveWorkbook.SaveAs Filename:="unfichier.csv", FileFormat:= _
xlCSV
ActiveWorkbook.Close SaveChanges:=False
Base.Activate
Range("a1").Select
Shell ("gcontrol.bat")

Next

End Sub
"

J'ai donc besoin de ces 700 pages, et pour cela, j'aurais besoin de savoir quoi écrire pour dupliquer la page, y coller le tableau, et décaler d'une ligne vers le bas toutes mes valeurs prises dans le second tableur [Classeur2]Feuil1...

Est-ce possible?


Merci de vos réponses!

Aquhydro