Excel - aktualizace dat

Ahoj,
mam mensi problem s testem, ktery nechavam generovat v excelu. Drive bohate stacilo pouzivat pro aktualizaci dat klavesu F9 a to tak dlouho, dokud nebyly splneny nejake podminky. Bohuzel se test zacal rozsirovat a zacaly pribyvat dalsi a dalsi podminky, takze je ted strasne slozite vygenerovat test s neopakujicimi se otazkami. Mohl by mi tedy nekdo poradit, zda a pripadne jak by sla naprogramovat nejaka klavesa/button, ktera by generovala test tak dlouho, dokud by vsechny podminky nebyly splneny?
Diky moc,
Aja

a co nejaky makro, pripadne programek ve VB?

Prave makra a programovani v excelu nejsou mou silnou parketou. Bylo by mozne jen nastinit :) jak by vypadala funkce, ktera by proste aktualizova data tak dlouho, dokud by nebyly splneny podminky 1-x?

Diky moc,
Aja

Citace:

---

Původně odeslal aja

Prave makra a programovani v excelu nejsou mou silnou parketou. Bylo by mozne jen nastinit :) jak by vypadala funkce, ktera by proste aktualizova data tak dlouho, dokud by nebyly splneny podminky 1-x?

Diky moc,
Aja

---

bylo... hod sem nejak priklad dat, jak ten soubor vypada a vyrobime nastin ;)
jinak vlastni aktivite se meze nekladou.. tudiz muzes zkusit cestu pres nahravac maker (soucast excelu) a naklikat si tam dany test... trebas ti z toho vyleze, co potrebujes...

Zkousel jsem ten nahravac maker a uz je to na dobre ceste. Jen bych jeste potreboval prikaz, ktery provede toto:

repeat
...
until (hodnota[A1]=hodnota[B1]=hodnota[C1])

Bohuzel netusim, jak tuto funkci zapsat v excelu (VBA).
Diky za pomoc,
Aja

Citace:

---

Původně odeslal aja

Zkousel jsem ten nahravac maker a uz je to na dobre ceste. Jen bych jeste potreboval prikaz, ktery provede toto:

repeat
...
until (hodnota[A1]=hodnota[B1]=hodnota[C1])

Bohuzel netusim, jak tuto funkci zapsat v excelu (VBA).
Diky za pomoc,
Aja

---

VBA nepoužívám, ale vygooglil jsem tohle:

Kód:

---

Sub Loop1()
    Do
        //nejaky_kod
    Loop Until //Podminka
End Sub

---

snad to pomůže :)

aja
Kombinací ALT+F11 otevři VBA (v excelovém sešitě) a v helpu si najdi přesnou syntakxi. To co napsal Kaltas je jen informativní.

pro cyklus while napr:

Kód:

---

Do
retezec_1 = inputString
' jakykoliv
' dalsi
' kod
Loop Until ActiveSheet.Cells(x, y).Value = ActiveSheet.Cells(x, y).Value

---

staci?

Diky za pomoc, uz to funguje tak, jak ma.