Макрос excel заполнение пустых ячеек

Заполнение пустых ячеек значениями из соседних ячеек

Как известно, для полноценной работы с данными (фильтрации, сортировки, подведения итогов и т.д.) нужен непрерывный список, т.е. таблица без разрывов (пустых строк и ячеек — по возможности). На практике же часто мы имеем как раз таблицы с пропущенными пустыми ячейками — например после копирования результатов сводных таблиц или выгрузок в Excel из внешних программ. Таким образом, возникает необходимость заполнить пустые ячейки таблицы значениями из верхних ячеек, то бишь…

В общем случае, может возникнуть необходимость делать такое заполнение не только вниз, но и вверх, вправо и т.д. Давайте рассмотрим несколько способов реализовать такое.

Способ 1. Без макросов

Выделяем диапазон ячеек в первом столбце, который надо заполнить (в нашем примере, это A1:A12).

Нажимаем клавишу F5 и затем кнопку Выделить (Special) и в появившемся окне выбираем Выделить пустые ячейки (Blanks):

Не снимая выделения, вводим в первую ячейку знак «равно» и щелкаем по предыдущей ячейке или жмём стрелку вверх (т.е. создаем ссылку на предыдущую ячейку, другими словами):

И, наконец, чтобы ввести эту формулу сразу во все выделенные (пустые) ячейки нажимаем Ctrl + Enter вместо обычного Enter. И все! Просто и красиво.

В качестве завершающего мазка я советовал бы заменить все созданные формулы на значения, ибо при сортировке или добавлении/удалении строк корректность формул может быть нарушена. Выделите все ячейки в первом столбце, скопируйте и тут же вставьте обратно с помощью Специальной вставки (Paste Special) в контекстом меню, выбрав параметр Значения (Values). Так будет совсем хорошо.

Способ 2. Заполнение пустых ячеек макросом

Если подобную операцию вам приходится делать часто, то имеем смысл сделать для неё отдельный макрос, чтобы не повторять всю вышеперечисленную цепочку действий вручную. Для этого жмём Alt+F11 или кнопку Visual Basic на вкладке Разработчик (Developer), чтобы открыть редактор VBA, затем вставляем туда новый пустой модуль через меню Insert — Module и копируем или вводим туда вот такой короткий код:

Sub Fill_Blanks()
    For Each cell In Selection
        If IsEmpty(cell) Then cell.Value = cell.Offset(-1, 0).Value
    Next cell
End Sub

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

Для удобства, можно назначить этому макросу сочетание клавиш или даже поместить его в Личную Книгу Макросов (Personal Macro Workbook), чтобы этот макрос был доступен при работе в любом вашем файле Excel.

Способ 3. Power Query

Power Query — это очень мощная бесплатная надстройка для Excel от Microsoft, которая может делать с данными почти всё, что угодно — в том числе, легко может решить и нашу задачу по заполнению пустых ячеек в таблице. У этого способа два основных преимущества:

• Если данных много, то ручной способ с формулами или макросы могут заметно тормозить. Power Query сделает всё гораздо шустрее.
• При изменении исходных данных достаточно будет просто обновить запрос Power Query. В случае использования первых двух способов — всё делать заново.

Для загрузки нашего диапазона с данными в Power Query ему нужно либо дать имя (через вкладку Формулы — Диспетчер имен), либо превратить в «умную» таблицу командой Главная — Форматировать как таблицу (Home — Format as Table) или сочетанием клавиш Ctrl+T:

После этого на вкладке Данные (Data) нажмем на кнопку Из таблицы / диапазона (From Table/Range). Если у вас Excel 2010-2013 и Power Query установлена как отдельная надстройка, то вкладка будет называться, соответственно, Power Query.

В открывшемся редакторе запросов выделим столбец (или несколько столбцов, удерживая Ctrl) и на вкладке Преобразование выберем команду Заполнить — Заполнить вниз (Transform — Fill — Fill Down):

Вот и всё Осталось готовую таблицу выгрузить обратно на лист Excel командой Главная — Закрыть и загрузить — Закрыть и загрузить в… (Home — Close&Load — Close&Load to…)

В дальнейшем, при изменении исходной таблицы, можно просто обновлять запрос правой кнопкой мыши или на вкладке Данные — Обновить всё (Data — Refresh All).

Ссылки по теме

• Объединение двух столбцов с данными
• Быстрое выделение всех ячеек с формулами или константами
• Быстрое заполнение пустых ячеек макросом из надстройки PLEX

Что делать, если необходимо заполнить множество диапазонов пустых ячеек значениями, находящимися перед этими диапазонами? Многократно копировать и вставлять долго и утомительно, использовать формулы тоже не выход, так как их нужно точно также копировать и вставлять.

Макрос для быстрого заполнения пустых ячеек

Заполнение пустых ячеек значениями ячеек, предшествующих пустым, можно быстро осуществить при помощи простой процедуры (макроса). Процедура проверяет значения ячеек в выделенном диапазоне и если встречает пустую ячейку, то заполняет её значением предыдущей ячейки.

Ниже приведен программный код макроса, который сэкономит время, сохранит силы и заполнит пустые ячейки предыдущими значениями. Перед запуском макроса необходимо предварительно выделить диапазон ячеек на рабочем листе книги Excel.

Option Explicit
Sub ZapolneniePustyhYacheek()
 'Процедура заполнения пустых ячеек предыдущим значением в выделенном диапазоне
 Dim r As Long
 Dim c As Long
    c = 2 'номер столбца в котором необходимо заполнить ячейки (здесь необходимо поставить свое значение)
        For r = Selection.Cells(1).Row To Selection.Cells.Count - 1
            If Cells(r + 1, c) = "" Then Cells(r + 1, c).Value = Cells(r, c).Value
        Next r
End Sub

Для того, чтобы перенести этот программный код на свой компьютер, наведите курсор мыши на поле с программным кодом, нажмите на одну из двух кнопкокв правом верхнем углу этого поля, скопируйте программный код и вставьте его в модуль проекта на своем компьютере (подробнее о том, как сохранить программный код макроса).

Надстройка для программного заполнения пустых ячеек

Быстро заполнить пустые ячейки верхними, нижними, правыми или левыми значениями можно также при помощи надстройки для Excel. Надстройка проста в использовании, достаточно лишь выделить диапазон ячеек и способ заполнения пустых ячеек.

 надстройка для быстрого заполнения пустых ячеек 

Зачастую мы имеем таблицу в Excel, в которой присутствуют пустые ячейки. Заполнение таких ячеек вручную займет огромное количество времени. 

Для заполнения пустых ячеек в таких случаях можно использовать способы, перечисленные ниже. 

Способ 1: Заполнение пустых ячеек в Excel с помощью заданного значения

Вы можете заполнить пустые ячейки столбца на листе Excel с помощью указанного значения. Для это можно воспользоваться встроенными возможностями Excel, которые очень легко выполнить. Первая функция  Go To специальной особенностью Excel, а затем заполнить все пустые ячейки с заданным значением. И этот метод настолько прост , что вы можете использовать без каких — либо специальных знаний.

Следующие шаги иллюстрируют, как заполнить пустые ячейки в Excel с помощью указанного значения.

Шаг 1: Откройте нужный лист Excel, на котором необходимо заполнить пустые ячейки.

Шаг 2: Выберите конкретный столбец, содержащий пустые ячейки.

Шаг 3: Теперь найдите кнопку Найти и выделить в меню Главная и выберите Выделить группу ячеек. Появится окно с различными вариантами. Выберите Пустые ячейки.

Шаг 4: После данного выбора все пустые ячейки в указанном диапазоне будут выделены. Теперь, не нажимая ничего, введите необходимо значение, которое нужно поместить во все пустые ячейки и нажмите Ctrl + Enter. Пустые ячейки заполнятся нужным содержимым.

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

Способ 2: Заполнение пустых ячеек в Excel значением, расположенным в ячейке выше

Этот способ пригодится в том случае, если необходимо заполнить пустые ячейки значением, находящимся в ячейке выше пустых. Для того, чтобы заполнить пустые ячейки значением предыдущей ячейки, также можно использовать возможности Excel. 

Шаг 1: Откройте нужный лист Excel, который содержит пустые ячейки.

Шаг 2: Выберите диапазон ячеек, в котором нужно заполнить пустые ячейки.

Шаг 3: Теперь найдите кнопку Найти и выделить в меню Главная и выберите Выделить группу ячеек. Появится окно с различными вариантами. Выберите Пустые ячейки.

Шаг 4: В строке формул наберите знак «=» и укажите ячейку, содержимым которой необходимо заполнить пустые ячейки. Далее нажмите Ctrl + Enter. Вы увидите, что все пустые ячейки заполнились значением ячейки выше. Смотрите скриншоты ниже.

Таким образом вы можете легко заполнить все пустые ячейки в листе Excel со значением над ними.

Способ 3: Заполнение пустых ячеек Excel со значением выше с помощью макроса VBA

Использование макросов сводит выполнение какой-либо команды до одного нажатия клавиши. Для заполнения пустых ячеек значением предыдущей ячейки также можно задать через макрос. Кроме того, этот макрос автоматически определяет используемый диапазон на листе, а затем он заполняет все пустые ячейки со значением над ними.

Шаг 1: Откройте рабочий лист , в котором вы хотите , чтобы заполнить все пустые ячейки со значением над ними.

Шаг 2: Теперь откройте редактор VBA, нажав Alt + F11.

Шаг 3: Щелкните правой кнопкой мыши на любом проекте и перейдите к Insert > Module. После этого вставьте следующий код VBA.

Sub FillBlankCells()

Static rngUR As Range: Set rngUR = ActiveWorkbook.ActiveSheet.UsedRange

Dim rngBlank As Range: Set rngBlank = rngUR.Find(«»)

While Not rngBlank Is Nothing

rngBlank.Value = rngBlank.Offset(-1, 0).Value

Set rngBlank = rngUR.Find(«», rngBlank)

Wend

End Sub

Шаг 4: Теперь сохраните модуль с помощью клавиши Ctrl + S, появившееся диалоговое окно с предупреждением просто проигнорируйте, нажав на кнопку Нет. Теперь вы можете задать сочетание клавиш для выполнения макроса. (меню Разработчик Макросы выберите нужный макрос Параметры Сочетание клавиш (укажите букву).

Шаг 5: На этом этапе макрокоманда готова к использованию. Чтобы использовать ее, нажмите клавишу быстрого доступа, назначенную для нее, и вы увидите результат в мгновение ока.

Таким образом вы можете легко заполнить пустые ячейки в Excel с помощью этого макроса. Тем не менее, существует недостаток использования макросов: невозможно отменить внесенные с помощью макроса изменения кнопкой Отменить ввод.

Поделиться:

Оставьте свой комментарий!

После заполнения таблицы Excel определенными значениями (чаще всего при добавлении массива информации) очень часто остаются свободные места. Они не будут мешать рассмотрению самого рабочего файла, однако будут усложнять функции сортировки, вычисления данных, фильтрации определенных чисел, формул, функций. Чтобы программа работала без затруднений, необходимо научиться заполнять пустоты значениями из соседних клеток.

Как выделить пустые клетки в рабочей таблице

Перед тем, как начинать рассматривать способы заполнения пустых клеток в рабочей таблице Excel, необходимо нужно научиться выделять их. Это просто сделать только в том случае, если таблица небольшая. Однако, если документ включает в себя огромное количество клеток, пустые места могут быть расположены в произвольных местах. Ручное выделение отдельных клеток займет много времени, при этом некоторые пустые места можно пропустить. Чтобы сэкономить время, рекомендуется автоматизировать данный процесс через встроенные инструменты программы:

1. В первую очередь нужно отметить все ячейки рабочей таблицы. Для этого можно использовать только мышку или добавить клавиши SHIFT, CTRL для выделения.
2. После этого нажать комбинацию клавиш на клавиатуре CTRL+G (еще один способ – F5).
3. На экране должно появиться небольшое окошко под названием Go To.
4. Нажать на кнопку “Выделить”.

Для того чтобы отмечать клетки в таблице, на основной панели с инструментами необходимо найти функцию “Найти и выделить”. После этого появится контекстное меню, из которого нужно выбрать выделение определенных значений – формулы, ячейки, константы, примечания, свободные клетки. Выбрать функцию “Выделить группу ячеек. Далее откроется окно настройки, в котором необходимо поставить галочку напротив параметра “Пустые ячейки”. Чтобы сохранить настройки, нужно нажать кнопку “ОК”.

Способ заполнения пустых ячеек вручную

Самый простой способ наполнения пустых клеток рабочей таблицы значениями из верхних ячеек – через функцию “Заполнить пустые ячейки”, которая находится на панели XLTools. Порядок действий:

1. Нажать на кнопку активация функции “Заполнить пустые ячейки”.
2. Должно открыться окно с настройками. После этого необходимо отметить диапазон ячеек, среди которых необходимо заполнить пустые места.
3. Определиться со способом заполнения – из доступных вариантов нужно выбрать: влево, вправо, вверх, вниз.
4. Поставить флажок напротив пункта “Отменить объединение ячеек”.

Останется нажать кнопку “ОК” чтобы пустые клетки заполнились требуемой информацией.

Важно! Одна из полезных особенностей данной функции – сохранение выставленных значений. Благодаря этому можно будет повторить действие со следующим диапазоном ячеек без перенастройки функции.

Доступные значения для заполнения пустых клеток

Существует несколько вариантов заполнения пустых клеток в рабочей таблице Excel:

1. Заполнение влево. После активирования данной функции, пустые ячейки будут заполнены данными из клеток справа.
2. Заполнение вправо. После нажатия на данного значение пустые клетки будут заполнены информацией из клеток слева.
3. Заполнение вверх. Ячейки, расположенные сверху, будут заполнены данными из клеток, которые находится снизу.
4. Заполнение вниз. Наиболее популярный вариант заполнения пустых клеток. Информация из ячеек сверху переносится в клетки таблицы, расположенные внизу.

Функция “Заполнить пустые ячейки” точно копирует те значения (числовые, буквенные), которые расположены в заполненных клетках. При этом здесь есть некоторые особенности:

1. Даже при сокрытии или блокировке заполненной клетки, информация из нее будет перенесена в свободную ячейку после активации данной функции.
2. Очень часто случаются ситуации, что значением для переноса является функция, формула, ссылка на другие клетки в рабочей таблице. В этом случае пустая клетка будет заполнена выбранным значением без его изменения.

Важно! Прежде чем активировать функцию “Заполнить пустые ячейки”, необходимо зайти в настройки рабочего листа, посмотреть наличие защиты. Если она активирована, информация перенесена не будет.

Заполнение пустых ячеек через формулу

Более простой и быстрый способ заполнения ячеек в таблице данных из соседних клеток – через использование специальной формулы. Порядок действий:

1. Отметить все пустые ячейки способом, который был описан выше.
2. Выбрать строку для ввода формул ЛКМ или нажать на кнопку F
3. Ввести символ “=”.

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

Последним действием нажать комбинацию клавиш “CTRL+Enter”, чтобы формула сработала для всех свободных клеток.

Важно! Нельзя забывать о том, что после применения данного способа все свободные ранее ячейки будут заполнены формулами. Чтобы порядок в таблице сохранился, рекомендуется заменить их на числовые значения.

Заполнение пустых ячеек с помощью макроса

В том случае, если приходится регулярно заполнять пустые ячейки в рабочих таблицах, рекомендуется добавить макрос в программу, использовать его в дальнейшем для автоматизации процесса выделения, заполнения пустых клеток. Код заполнения для макроса:

Sub Fill_Blanks()

    For Each cell In Selection

        If IsEmpty(cell) Then cell.Value = cell.Offset(-1, 0).Value

    Next cell

End Sub

Для добавления макроса нужно выполнить несколько действий:

1. Нажать комбинацию клавиш ALT+F
2. После этого откроется редактор VBA. В свободное окно нужно вставить представленный выше код.

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

Заключение

Среди описанных выше способов нужно выбрать тот, который подходит лучше всего для определенной ситуации. Ручной способ добавления данных в свободные места рабочей таблицы подойдет для общего ознакомления, разового применения. В дальнейшем рекомендуется освоить формулу или же прописать макрос (при очень частом выполнении одной и той же процедуры).

Предположим, у вас есть большой рабочий лист, заполненный сотнями пустых ячеек, и теперь вы хотите заполнить пустые ячейки определенным значением, которое вам нравится, например, числом 0. Конечно, вы можете заполнить их вручную или скопировать и вставляйте одну за другой, но это не лучший выбор для заполнения больших пустых ячеек. Сегодня я расскажу вам несколько быстрых приемов решения этой проблемы.

Заполните пустые ячейки 0 или другим конкретным значением с помощью функции Перейти к специальной

Заполните пустые ячейки 0 или другим конкретным значением с кодом VBA

Быстро заполните пустые ячейки 0 или другим конкретным значением с помощью Kutools for Excel

Заполните пустые ячейки значением выше/ниже/справа/слева с Kutools for Excel

Заполните пустые ячейки 0 или другим конкретным значением с помощью функции Перейти к специальной

Работы С Нами Перейти к специальному вы можете заполнить пустые ячейки любыми значениями.

1. Выберите диапазон, в котором вы хотите заполнить пустые ячейки.

2. Нажмите Главная > Найти и выбрать > Перейти к Speciaл … чтобы открыть Перейти к специальному диалоговое окно. Тогда выбирай Пробелы вариант из Выберите раздел. Смотрите скриншот:

3. Затем нажмите OK. Будут выделены все пустые ячейки. Пожалуйста, ничего не делайте, просто введите номер или текст, который вы хотите, а затем нажмите Ctrl + Enter вместе, и все пустые ячейки заполнены текстом «null». Смотрите скриншоты:

Конечно, вы также можете заполнить эти выбранные пустые ячейки числом 0.

Заполните пустые ячейки 0 или другим конкретным значением с кодом VBA

Также вы можете применить следующий код VBA для заполнения пустых ячеек определенным значением. Пожалуйста, сделайте следующее:

1. Выделите диапазон, содержащий несколько пустых ячеек.

2. Нажмите Застройщик > Визуальный Бейсик, Новый Microsoft Visual Basic для приложений появится окно, щелкните Вставить > Модули, затем скопируйте и вставьте в модуль следующий код:

Sub FillEmptyBlankCellWithValue()
Dim cell As Range
Dim InputValue As String
On Error Resume Next
InputValue = InputBox("Enter value that will fill empty cells in selection", _
"Fill Empty Cells")
For Each cell In Selection
If IsEmpty(cell) Then
cell.Value = InputValue
End If
Next
End Sub

3. Нажмите кнопку, чтобы запустить код, и появится окно подсказки. Вы можете ввести любое значение в пустое поле, которое вам нужно. Смотрите скриншот:

Советы: Если вам нужно заполнить пустые ячейки числом 0, вам нужно ввести 0 в это диалоговое окно.

4, Затем нажмите OK чтобы завершить эту процедуру. И указанное значение было сразу вставлено в пустые ячейки.

Быстро заполните пустые ячейки 0 или другим конкретным значением с помощью Kutools for Excel

Если вы установили Kutools for Excel, Его Заполнить пустые ячейки… Функция может помочь вам быстро и удобно заполнить пустые ячейки значениями, линейными значениями или фиксированным значением.

После установки Kutools for Excel, пожалуйста, сделайте следующее:

1. Нажмите Кутулс > Вставить > Заполнить пустые ячейки, см. снимок экрана:

2. Выберите диапазон, которым вы хотите заполнить пустые ячейки, и в Заполнить пустые ячейки диалоговое окно, отметьте Фиксированная стоимость из Заполнить вариант и введите конкретное значение или текст в поле Заполненное значение box, см. снимок экрана:

3. Затем нажмите OK or Применить. Все пустые ячейки заполнены указанным значением. см. скриншоты:

Нажмите, чтобы загрузить и бесплатную пробную версию Kutools for Excel от Yhao сейчас!

Заполните пустые ячейки значением выше/ниже/справа/слева с Kutools for Excel

Если вы хотите заполнить пустые ячейки значением выше или ниже, Kutools for ExcelАвтора Заполнить пустые ячейки также могу оказать вам услугу. Пожалуйста, сделайте следующее:

1. Выберите диапазон данных, который вы хотите заполнить значением выше, и включите Заполнить пустые ячейки функцию.

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

3, Затем нажмите Ok or Применить кнопку, а пустые ячейки заполнены данными выше, см. скриншоты:

Нажмите, чтобы загрузить и бесплатную пробную версию Kutools for Excel от Yhao сейчас!

С этой Заполнить пустые ячейки утилита, вы также можете заполнить пустые ячейки линейными значениями, Нажмите здесь, чтобы узнать больше.

Заполните пустые ячейки значением выше / линейными значениями / конкретным значением

Статьи по теме:

Заполните пустые ячейки линейными значениями

Заполните пустые ячейки значением выше

Часто пользователи оставляют ячейки пустыми, если данные в этих ячейках такие же, как и в ячейках выше. Это упрощает чтение списков, но ухудшает структуру данных. При помощи трюков этого раздела можно быстро и просто заполнить все пустые ячейки в списке.

Многие функции Excel 2010 предназначены для работы со списками. Чтобы обеспечить правильную работу большинства из них, списки не должны содержать пустые ячейки, а форматирование заголовков столбцов должно отличаться от форматирования данных в списке. При настройке данных в Excel полезно убеждаться, что заняты все ячейки в списке. Однако часто списки задаются, как показано на рис. 6.3.

Хотя в столбце Цена цены повторяются, виды фруктов в столбце Fruits — нет. Как упоминалось, такая организация данных создаст много проблем при использовании таких средств, как промежуточные итоги (Subtotals) и сводные таблицы (PivotTables). В большинстве случаев Excel ожидает, что связанные данные помещены в непрерывный список или таблицу без пустых ячеек. Есть два способа заполнения пустых ячеек в списке: при помощи формулы и при помощи макроса.

Способ 1. Заполнение пустых ячеек при помощи формулы

Предположим, есть список записей в столбце А, например, как в предыдущем примере, и в этом списке есть пустые ячейки. Вот как быстро и просто можно заполнить эти ячейки значениями из ячеек над ними. Выделите все данные в столбце А, выберите команду Правка → Перейти (Edit → Go То) (сочетание клавиш Ctrl+G) и щелкните кнопку Выделить (Special). Установите переключатель-флажок Пустые ячейки (Blanks) и щелкните кнопку ОК. Теперь в списке выделены только пустые ячейки. Нажмите клавишу = (клавишу знака равенства), а затем стрелку вверх. Удерживая клавишу Ctrl, нажмите клавишу Enter.

Можно быстро преобразовать формулы в значения, выделив столбец А целиком. Выберите команду Правка → Копировать (Edit → Copy) (сочетание клавиш Ctrl+C), затем выберите команду Правка → Специальная вставка (Edit → Paste Special), установите переключатель Значения (Values) и щелкните на кнопке ОК.

Способ 2. Заполнение пустых ячеек при помощи макроса

Если вам часто приходится заполнять пустые ячейки, лучше делать это при помощи макроса. Чтобы создать его, выберите команду Разработчик → Редактор Visual Basic (Developer → Visual Basic Editor) (сочетание клавиш Alt/Option+Fll), затем выберите команду Insert → Module и введите код из листинга 6.1.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31

// Листинг 6.1
Sub FillBlanks()
Dim rRangel As Range. rRange2 As Range
Dim IReply As Integer
	If Selection.Cells.Count = 1 Then
		MsgBox "нужно выделить лист и включить пустые ячейки",
		vblnformation, "Excel2010.ru"
		Exit Sub
	Elself Selection.Columns.Count → 1 Then
		MsgBox "нужно выделить только один столбец".
		vblnformation, "Excel2010.ru"
		Exit Sub
	End If
 
	Set rRangel = Selection
 
	On Error Resume Next
	Set rRange2 = rRangel.SpecialCells(xlCellTypeBlanks)
	On Error GoTo 0
 
	If rRange2 Is Nothing Then
		MsgBox "пустые ячейки не найдены",
			vblnformation. "Excel2010.ru"
		Exit Sub
	End If
 
	rRange2.FormulaRlCl = "=R[-1]C"
 
	IReply = MsgBox("преобразовать в значения", vbYesNo + vbQuestion."Excel2010.ru")
	If IReply = vbYes Then rRangel = rRangel.Value
End Sub

Закончив, закройте окно, чтобы вернуться в Excel, и сохраните рабочую книгу. Теперь выберите команду Разработчик → Макрос → Макросы (Developer → Macro → Macros) (сочетание клавиш Alt/Option+F8), выберите Fill Blanks и щелкните кнопку Выполнить (Run), чтобы выполнить макрос, или кнопку Параметры (Options), чтобы назначить клавишное сочетание.