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

Вход

Регистрация

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

 

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

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

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

ОПРОСЫ
Какой версией Excel Вы пользуетесь?
Всего ответов: 57567
Главная » Готовые решения » 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, ВБА
Просмотров: 20790 | Рейтинг: 3.7/3
Всего комментариев: 2
Спам-сообщение скрыто. Показать
+1   Спам
1    alex53   (09.12.2013 09:32) [ Материал]
   Добрый день.
Можно добиться такого же результата, если в надстройках Excel актировать "пакет анализа", после этого написать формулу для генерации числа в интервале от 0 до 1000.
=СЛУЧМЕЖДУ(0;1000).
Аналогичный пример при генерации букв.

0   Спам
2    VDVENTURE   (30.04.2016 11:36) [ Материал]
   Нужная процедура

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