=СЛУЧМЕЖДУ(;) Как зафиксировать результат?

[all4you]

Ребят привет. Подскажите, пожалуйста, у меня используется формула, =СЛУЧМЕЖДУ(1;20), которая выдает случайным образом значения от 1 до 20. Значения в ячейках при использовании этой формулы меняются произвольно при любом действии на листе или других листах книги. Хотелось бы сделать так: сохранить значения в ячейках полученные при применении формулы, т.е. удалить из ячеек формулу при этом чтобы сохранились значения и в будущем при работе с книгой значения в ячейках не изменялись. Возможно ли сделать такое? Спасибо.

[EducatedFool]

1. Выделяем и копируем диапазон с формулами
2. Правка - Специальная вставка - ставим галочку "только значения"

[all4you]

Спасибо. А возможно еще это каким-нибудь образом сделать? Просто данные до 1000 ячеек доходят и копировать со специально вставкой не так удобно. Что-нибудь типа: убрать формулы, но сохранить значения?

[EducatedFool]

Что вам мешает выделить сразу все 1000 ячеек, и проделать указанную операцию?

[all4you]

В принципе ничего не мешает. Уже попробовал, вполне устраивает предложенный вами способ. Спасибо еще раз!

[dejura]

Прошу прощения, а в дополнение к этой формуле =СЛУЧМЕЖДУ(1;20) можно добавить еще одно условие, что это случайное число кроме того что оно в диапазоне от 1 до 20 еще и не равно например 2, 4, и 8? Помогите, пожалуйста

[Demetros]

Я так делаю:

Sub test()
'удаление указанной формулы с активного листа
    Application.Calculation = xlCalculationManual
        For Each cell In ActiveSheet.Cells.SpecialCells(xlCellTypeFormulas)
        If cell.FormulaLocal = "=СЛУЧМЕЖДУ(1;20)" Then cell.Value = cell.Value
        Next cell
    Application.Calculation = xlCalculationAutomatic
End Sub

[IgorGO]

=ИНДЕКС({1;3;5;6;7;9;10;11;12;13;14;15;16;17;18;19;20};СЛУЧМЕЖДУ(1;17))

[dejura]

Сообщение от IgorGO

=ИНДЕКС({1;3;5;6;7;9;10;11;12;13;14;15;16;17;18;19;20};СЛУЧМЕЖДУ(1;17))

А почему во второй части
СЛУЧМЕЖДУ(1;17) ???
Диапозон же между 1 и 20. Почему у Вас 17.

[IgorGO]

а потому, что случайные между 1 и 20 за исключением 2, 4, 8
связь не улавливаете?