[Løst] Få Excel til å huske verdier

[Jod-R]

Har et problem, har fått en excel fil som simulerer og jeg trenger excel til å huske verdiene mellom hver iterasjon.

 

I bildet under så forandrer det jeg har merket i rødt mellom hver iterasjon, men jeg trenger å beregne gjennomsnitts verdien på de. Så hvordan får jeg enten Excel til å skrive ned alle verdiene i en kolonne eller til å beregne gjennomsnittsverdien undervis.

 

 

 

Legger også med filen sånn at noen guder kan hjelpe meg Var vistnok ikke lov å legge .xls filen direkte med så jeg har zippet den.

Excel_Help_2.zip

Endret 21. mai 2016 av Jod-R

[ExcelGuru]

Hei på deg.

Jeg har skrevet en liten snutt som kopierer rad 3 til 8 i G-kolonnen til første ledige kolonne til høyre for hver kjøring.

 

Håper det er til hjelp.

 

Vennlig hilsen Ketil

Excel_Help_2-ExcelGuru.zip

[Jod-R]

Var ikke helt det jeg var ute etter. Jeg trenger enten å få lagt sammen alle tallene som kommer opp iløpet av simuleringen eller få skrevet hvert tall i en egen celle sånn at jeg kan legge de sammen selv etter simuleringen.

 

For eksempel på den første så vil den bli 1 eller 0 og jeg trenger å få summert de sammen sånn jeg kan dele på antall iterasjoner for å finne gjennomsnittsverdien.

[Jod-R]

Går det an å lage noe som kopierer hvert tall ifra G4 (altså hver iterasjon) til foreksempel J kolonnen sånn at hver nye iterasjon skriver inn tallet under det forrige. Hvis det går så skal det ikke være noe problem å greie å beregne gjennomsnitts verdien.

[Jod-R]

Jeg har skrevet en liten snutt som kopierer rad 3 til 8 i G-kolonnen til første ledige kolonne til høyre for hver kjøring.

 

Fant scriptet ditt og har prøvd å modifisere det sånn at det gjør slik jeg vil. Slik det er nå så virker det ikke helt ønsket. Som celle B4 viser så er det i dette tilfellet 1000 iterasjoner som kjøres og det kommer bare 1 tall ut.

 

Slik det er nå så stemmer heller ikke tallene overens med hverandre, hvis det er over null på en plass så skal det være over null begge plassene. Det som er det største problemet er at i dette tilfelle så vil jeg ha 1000 tall nedover hver kolonne. Har vist hvordan tallene skal ordne seg i bildet og legger ved det modifiserte scriptet.

 

 

Sub RunMacSimul()

pRiskAvg ("pRiskIC")

'Ta vare på verdiene

Huske

End Sub

 

Sub Huske()

 Dim Kol As Long

 Dim x As Long

 

 With Sheets("RunSimul")

 

 x = 1: While .Cells(x, 10) <> "": x = x + 1: Wend

 Kol = x

 

  .Cells(x, 10) = .Cells(4, 7)

  .Cells(x, 11) = .Cells(5, 7)

 

 End With

End Sub

 

Endret 21. mai 2016 av Jod-R

[ExcelGuru]

Artig...

 

I denne versjonen kaller jeg opp Huske(0) før start. Med parameter 0 slettes tidligere verdier.

Huske kalles opp under kjøringen etter hver Iterasjon (Antall i B4) i Modul Simengine, funksjon pRiskAvg:

 

'ExcelGuru

Call Huske(i)

 

Next

 

Huske() skriver i linje Iterasjon+2 i stedet for å lete etter ledig linje - da går det kjappere.

 

Sub Huske(Iterasjon As Integer)

 

 With Sheets("RunSimul")

 

 'Tømmer I og J før første kjøring

 If Iterasjon = 0 Then

  .Range("I3:I50000").ClearContents

  .Range("J3:J50000").ClearContents

  Exit Sub

 End If

 

  .Cells(Iterasjon + 2, 9) = .Cells(4, 7)

  .Cells(Iterasjon + 2, 10) = .Cells(5, 7)

 

 End With

End Sub

 

 

Excel_Help_2-ExcelGuru.zip

[Jod-R]

 

Artig...

 

 

Nå begynner det å ligne på noe

 

Det eneste som ikke er helt bra er at verdiene ikke stemmer helt overens med hverandre. Hvis vi ser på bildet jeg la med så er det 9 ganger verdier over 0 på I-kollonen, mens det bare er 5 verdier over null på J-kolonnen. Disse tallene skal stemme overens med hverandre. De skal også komme samtidig, slik jeg har merket med grønt i bildet under. Det de tallene forteller er om Tallet er over 30 og hvor mye det er over 30, så det gir ikke så mye mening med de radene jeg har merket med rødt og gult.

Endret 22. mai 2016 av Jod-R

[Jod-R]

Fant ut av det på en måte. Antallet i I-kolonnen var rett, men ikke i J-kolonnen. Men siden jeg fant ut av hvor du hentet iterasjons telleren så greide jeg å reverse engineere (få tak i tallene jeg var interessert i) hvordan jeg skulle regne det direkte i "SimEngine".

 

Tusen takk for hjelpen