...vyskytol sa mi dalsi problem s jednym cyklom:

Dim zadaj, i, ppocet, spolu As Integer
.........
prompt = "zadaj poziciu od 1 do " & ppocet
Do
zadaj = InputBox(prompt, Title, 2)
Loop Until (zadaj > 1) And (zadaj < ppocet)

Nevie mi niekto poradit s touto podmienkou? Vzdy sa to zacykli a neviem preco a nefunguje to ani ked zadam cislo z pozadovaneho intervalu.
Ked tam dam ale iba jednu podmienku, tak to funguje, lenze ja potrebuje obidve.
dik za rady.