Как преобразовать все формулы в диапазоне в значения в Excel

Этот макрос помогает преобразовать все формулы в заданном диапазоне в значения.

В этом макросе, мы используем две переменные объекта Range. Одна из переменных содержит объем данных, с которым мы работаем, другая использует диапазон для хранения каждой отдельной ячейки. Каждый раз, когда активируется ячейка, мы проверяем, содержит ли она формулу. Если это так - мы заменим формулу значением, которое отображается в ячейке. 

1. Шаг 1 объявляет две переменные объекта Range. 

3. Здесь мы вызываем окно сообщения, которое спрашивает, хотим ли мы сохранить книгу. Затем он дает нам три варианта: Да, Нет и Отмена. Выбор Да сохраняет книгу и продолжает макрос. Нажатие кнопки Отмена выходит из процедуры без запуска макроса. Нажатие Нет запускает макрос без сохранения рабочей книги. 

4. Шаг 4 заполняет переменную MyRange с целевым диапазоном. В этом примере мы используем выбранный диапазон — диапазон, который был выбран в электронной таблице. Вы можете легко установить переменную MyRange в определенном диапазоне, таком как Range («A1:Z100»). Кроме того, если ваш целевой диапазон является именованным диапазоном, вы можете просто ввести его имя: Range («MyNamedRange»).

5. Этот этап запускает цикл по каждой ячейке в целевом диапазоне. После того, как ячейка активируется, макрос использует свойство HasFormula, чтобы проверить, содержит ли ячейка формулу. Если содержит, мы устанавливаем ячейку равную значению, которое отображается в ячейке. 

6. Шаг 6 повторяет цикл, чтобы получить следующую ячейку. После просмотра всех ячеек в целевом диапазоне макрос заканчивается. 

Для реализации этого макроса, вы можете скопировать и вставить его в стандартный модуль:

1. Активируйте редактор Visual Basic, нажав ALT + F11. 
2. Щелкните правой кнопкой мыши имя проекта / рабочей книги в окне проекта. 
3. Выберите Insert➜Module. 
4. Введите или вставьте код во вновь созданном модуле.