mno, zatím mám tohle
Sub ZadaniCisel()
Dim Cislo As Byte
For Cislo = 1 To InputBox("Zadejte pocet cisel", "Formulár")
Cells(Cislo, 1) = InputBox("Zadejte císlo " & Cislo, "Formulár")
Next
End Sub
Teď bych potřeboval vědět, co s tou minimální hodnotou, maximální hodnotou a průměrem, teda konkrétně, jak napsat ten příkaz, aby se ty hodnoty vypsaly do nějakého sloupce.