Bonsoir,
J'ai un petit problème de programmation.
J'ai réussi à faire une macro qui me permet de calculer automatiquement certaines statistiques que je souhaite obtenir.
Le code est le suivant :
Sub lancesimulation()
Dim Nsimul As Integer, i As Integer
Dim TabResult() As Double
Nsimul = 10
ReDim TabResult(1 To 10, 1 To 4)
For i = 1 To Nsimul
Sheets("Simulations").Calculate
TabResult(i, 1) = Range("N5")
TabResult(i, 2) = Range("N6")
TabResult(i, 3) = Range("N7")
TabResult(i, 4) = Range("N8")
Next i
Sheets("Resultat").Range("A1").Resize(10, 4) = TabResult
End Sub
L'idée est de simuler des données (C13:E263) un grand nombre de fois.
A chaque simulation des statistiques sont calculées automatiquement. J'aimerai avoir ces statistiques pour chaque simulation en faisant en sorte qu'elles se copient/collent dans l'onglet "Resultat".
J'ai testé ma macro avec 10 simulations..
Cependant... ce sont les mêmes valeurs qui se collent...
J'aimerai que chaque ligne correspondent à une simulation différente.
Que dois-je intégrer dans ma macro pour que ce soit possible ?
J'ai mis le fichier en PJ, je ne suis pas sur d'être très compréhensible.
Merci pour votre aide.
J'ai un petit problème de programmation.
J'ai réussi à faire une macro qui me permet de calculer automatiquement certaines statistiques que je souhaite obtenir.
Le code est le suivant :
Sub lancesimulation()
Dim Nsimul As Integer, i As Integer
Dim TabResult() As Double
Nsimul = 10
ReDim TabResult(1 To 10, 1 To 4)
For i = 1 To Nsimul
Sheets("Simulations").Calculate
TabResult(i, 1) = Range("N5")
TabResult(i, 2) = Range("N6")
TabResult(i, 3) = Range("N7")
TabResult(i, 4) = Range("N8")
Next i
Sheets("Resultat").Range("A1").Resize(10, 4) = TabResult
End Sub
L'idée est de simuler des données (C13:E263) un grand nombre de fois.
A chaque simulation des statistiques sont calculées automatiquement. J'aimerai avoir ces statistiques pour chaque simulation en faisant en sorte qu'elles se copient/collent dans l'onglet "Resultat".
J'ai testé ma macro avec 10 simulations..
Cependant... ce sont les mêmes valeurs qui se collent...
J'aimerai que chaque ligne correspondent à une simulation différente.
Que dois-je intégrer dans ma macro pour que ce soit possible ?
J'ai mis le fichier en PJ, je ne suis pas sur d'être très compréhensible.
Merci pour votre aide.