Домашняя страница Undo Do Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Готовые решения

МЕНЮ САЙТА
  • 1
  • 2
  • 3

КАТЕГОРИИ РАЗДЕЛА

ОПРОСЫ
Какой версией Excel Вы пользуетесь?
Всего ответов: 35774
Главная » Готовые решения » VBA » Процедуры

Генерация случайных чисел
23.07.2013, 14:08

В примере, в диапазон A1:A10 выводятся случайные числа от 1 до 1000
Sub RandomNumbers()
 Dim Rand As Range
 Randomize
 For Each Rand In Range("A1:A10")
 Rand = (Int(1 + (Rnd() * 1000)))
 Next Rand
End Sub
Добавил: Serge_007 | | Теги: генерация случайных чисел, random_numbers, VBA, ГСЧ, макросы excel, ВБА
Просмотров: 12493 | Рейтинг: 5.0/2
Всего комментариев: 2
0   Спам
1    alex53   (09.12.2013 09:32)
   Добрый день.
Можно добиться такого же результата, если в надстройках Excel актировать "пакет анализа", после этого написать формулу для генерации числа в интервале от 0 до 1000.
=СЛУЧМЕЖДУ(0;1000).
Аналогичный пример при генерации букв.

0   Спам
2    VDVENTURE   (30.04.2016 11:36)
   Нужная процедура

Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
Яндекс цитирования
© 2010-2016 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!