[wykoptomka]

Mirki, mam problem z excelem
Mam sobie model (symulacje monte carlo) w jednej kolumnie, powiedzmy E. Liczy sie przez 121 okresow, na dole wylicza CAGR, wiec razem jest w kolumnie E, zaczyna sie w wierszu 10, konczy w 132.
Chcialbym napisac makro, w ktorym ten model (output) byl kopiowany na wartosciach do kolumn obok, zaczynajac od F, konczac na F+1000
Nie wiem jak pokonac problem, by wklejal w kazdej kolejnej kolumnie, a nie ciagle do tej obok modelu
Po kazdym wklejeniu model musi sie odswiezyc, by wyliczyc nowe wyniki symulacji
Ktos jest w stanie pomoc?
#vba #excel #programowanie #makro #gielda #pytanie #pomocy #informatyka #finanse

[szcz33pan]

A nie wystarczy w kolumnie F napisać =E10 i potem przeciągnąć? To chyba najprostsze lub nie zrozumiałem jaki chcesz efekt.

[wykoptomka]

@szcz33pan: Nie, bo bede mial jeden i ten sam model podpiety, z tymi samymi wynikami, a chodzi o to, by bylo 1000 roznych obserwacji- stad koniecznosc odswiezenia po kazdym razie

[szcz33pan]

@wykoptomka: W F1 napisz =E10, potem w F2 napisz =E11. Jak będziesz przeciągać to powinno się inkrementować E12, E13 etc.

[wykoptomka]

@szcz33pan: tak jak napisalem, nie dziala- odwolanie do komorki nie powoduje zmiany wyliczen
Tutaj bez makra na takiej ilosci sie nie da

[wykoptomka]

@wykoptomka:
Jakbym chcial to rozpisac:
1.kopiuj model
2.wklej specjalnie (wartosci) kolumna obok
3.odswiez arkusz (model sie przelicza)
4. Kopiuj model (znowu z k. E)
5. Wklej specjalnie (wartosci) do kolejnej kolumny (G- bo to jest przy kazdym wklejaniu i+1)
I tak 1000 razy

Chodzi o takie makro, nie wiem jak dodac komende by wklejal do kolejnej kolumny, a nie ciagle tej samej

[Septiusz]

@wykoptomka próbowałeś nagrać makro? Potrzebujesz tylko modyfikacji z pętlą for i użyć funkcji range.offset() do przesuwania obszaru wklejenia. To tak najprościej

[wykoptomka]

@Septiusz: na tym polega moj problem ze nie wiem jak tego offseta zalaczyc- nie wiem jak tego uzyc;p
Przy nagraniu on zapisuje konretne komorki, to nie jest problem?

[Septiusz]

@wykoptomka to nie jest problem jeśli potrzebujesz tego jednorazowo i nie zależy Ci na prędkości działania. Jak wyciągnę lapka to rzucę okiem.

[Septiusz]

@wykoptomka możesz też w uproszczeniu narysować co chcesz osiągnąć? To mają być tak jakby schodki?

[wykoptomka]

@Septiusz: cos takiego
Chodzi o to, by po kazdym wklejeniu modelu do kolejnej kolumny arkusz zostal przeladowany, by wlasciwy model sie przeladowal i dal inny wynik
No i wklejanie musi byc na wartosciach;)

Z gory wielkie dzieki!;)

[Septiusz]

@wykoptomka: OK, zaraz rzucę okiem. Model jest w jakieś tabeli przestawnej, w tabeli, czy może w zwykłym zakresie formuły? Co ma się odświeżać?

[Septiusz]

@wykoptomka:

Sub ModelCopy()
Application.ScreenUpdating = False
For i = 1 To 1000
ActiveSheet.Range("E10:E132").Copy
Range("E10:E132").Offset(0, i).Select
Selection.PasteSpecial Paste:=xlPasteValues

'tutaj trzeba oswiezyc model

Next i
Application.ScreenUpdating = True
End Sub

[wykoptomka]

@Septiusz: niedlugo sprawdze:)
Model normalnie w komorkach

Dzieki wielkie!

[Septiusz]

@wykoptomka trzeba tylko jakoś umieścić w kodzie odświeżanie modelu, tylko nie wiem do końca co tam masz.

[Septiusz]

@wykoptomka: i co, udało się?

[wykoptomka]

@Septiusz: aj wybacz, wydawalo mi sie, ze wysylalem odpowiedz;)

Tak, makro super dziala, jedynie co mnie ograniczylo, to maksymalna liczba serii jakie mozna dodac do wykresu w excelu- nie moge wrzucic danych na wykres, ale to nic, wazne ze z 10 000 prob moge wyciagnac statystyki;)
Wielkie dzięki za pomoc

[Septiusz]

@wykoptomka cieszę się że działa. Jakby co, to z prostymi rzeczami mogę pomóc.