Функция, возвращающая три значения - Компьютерный форум OSzone.net

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

- Microsoft Office (Word, Excel, Outlook и т.д.) (http://forum.oszone.net/forumdisplay.php?f=115)

- - Функция, возвращающая три значения (http://forum.oszone.net/showthread.php?t=321496)

Invincible

06-12-2016 18:10 2693567

Функция, возвращающая три значения

Всем привет. Может кто-нибудь помочь с написанием функции возвращающей случайным образом с равной вероятностью три
значения – 0, 1 или 2.

Iska	06-12-2016 19:03 2693590

Коллега, образец приведён прямо в справке по функции Rnd.

Вот Вам болванка кода с примером:

Код:

Option Explicit



Function GetRandom(intStart As Integer, intEnd As Integer)

    Randomize Timer

    

    GetRandom = Int((intEnd - intStart + 1) * Rnd() + intStart)

End Function



Sub Sample()

    Dim i As Integer

    

    For i = 1 To 20

        Debug.Print GetRandom(0, 2)

    Next i

End Sub

okshef

06-12-2016 19:13 2693594

Код:

=СЛУЧМЕЖДУ(0;2)

=ОКРУГЛТ(СЛЧИС()*2;1)

Iska	07-12-2016 03:35 2693662

Цитата:

Цитата okshef

Код:

=СЛУЧМЕЖДУ(0;2)

=ОКРУГЛТ(СЛЧИС()*2;1)

Я не был уверен, что речь сугубо про Excel :).

Время: 22:31.