Страницы: 1
RSS
Выставка в ячейку - адреса случайной ячейки из диапазона
 
Добрый вечер, уважаемые признанные мастера ВБА.

Подскажите с решением проблемы по - рандомной операции. Как вставить я ячейку случайное число - я знаю. А вот как выбрать случайное нечисловое значение класса Range - непонятно.

Есть на листе диапазон C4:I23
Как в ячейку K4 вставить адрес случайной ячейки из этого диапазона ?
 
Код
Sub K4Sub()
  [K4] = Cells(4 + Rnd * 19, 3 + Rnd * 7).Address(False, False)
End Sub
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
 
Ігор Гончаренко, скажите, а как вместо чисел - задать в макросе диапазон - просто адресами ячеек C4:I23 ?
Просто при числовом задании диапазона -  неудобно высчитывать количество столбцов и строк и их расположение на листе - если диапазон - где-то в глубине листа находится.
 
Код
Sub K4sub()
  [K4] = Cells([c3:j23].Row + Rnd * [c3:j23].Rows.Count, [c3:j23].Column + Rnd * [c3:j23].Columns.Count).Address(False, False)
End Sub
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
 
Ігор Гончаренко, спасибо большое.
Так намного понятнее.
Страницы: 1
Наверх