Excel макрос поиск пустой ячейки в excel

	Подскажите как при помощи VBA определить наличие пустой ячейки (не заполненной = «»  в диапазоне (например А1:С300) или ячейки с значением = 0 ?

Юрий М Модератор Сообщений: 60570 Регистрация: 14.09.2012 Контакты см. в профиле	Нашли, дальше что? Перебрать диапазон/массив и при нахождении пустой/нулевой выйти из цикла с сообщением.

Антон Пользователь Сообщений: 617 Регистрация: 01.01.1970	#3 28.01.2014 01:20:21 посредством перебора каждого значения массива и сравнением ) Код 'перебираем строки For i=1 to 300 'перебираем столбцы For y=1 to 3 If cells(i,y).Value="" then Msgbox("пустая ячейка") Exit for End if If cells(i,y).Value=0 then Msgbox("нуль.")   Exit for End if     Next y   Next i Изменено: Антон — 28.01.2014 01:25:02

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

Юрий М Модератор Сообщений: 60570 Регистрация: 14.09.2012 Контакты см. в профиле	#5 28.01.2014 01:28:51 Код Sub Test() Dim Rng As Range, rCell As Range     Set Rng = Range("A1:C300")     For Each rCell In Rng         If IsEmpty(rCell) Or rCell = 0 Then             MsgBox "Найдено в ячейке " & rCell.Address(0, 0), 64, "Для сведения"             Exit For         End If     Next End Sub

Юрий М Модератор Сообщений: 60570 Регистрация: 14.09.2012 Контакты см. в профиле	#7 28.01.2014 02:01:36 Без цикла, но и без адресов: Код Sub Test2() Dim Rng As Range     Set Rng = Range("A1:C300")     x = Application.WorksheetFunction.CountA(Rng)     y = Application.WorksheetFunction.CountIf(Rng, 0)     If Rng.Cells.Count <> x Then MsgBox "Есть пустые."     If y > 0 Then MsgBox "Есть нули." End Sub

KuklP Пользователь Сообщений: 14868 Регистрация: 21.12.2012 E-mail и реквизиты в профиле.	Я сам — дурнее всякого примера! …

Max.il Пользователь Сообщений: 64 Регистрация: 05.12.2018	Юрий М, Юрий, добрый вечер. Развивая тему, если нужно проверить несколько ячеек, к примеру А3, Т16 и Т22, если они пустые — залить эту ячейку красным цветом. Если в ней есть что-то , пропустить. Если во всех ячейках есть данные, то просто прекратить выполнение макроса без вывода сообщения. Спасибо

Юрий М Модератор Сообщений: 60570 Регистрация: 14.09.2012 Контакты см. в профиле

Max.il Пользователь Сообщений: 64 Регистрация: 05.12.2018	Юрий М,Нет, т.к. проверка должна осуществляться после макроса.

Юрий М Модератор Сообщений: 60570 Регистрация: 14.09.2012 Контакты см. в профиле	УФ сработает и после макроса. А макрос написать не смогу: нет у меня файла, где имеются перечисленные Вами ячейки )) Вы бы уточнили: три ячейки — это только для примера? А по факту? И как макрос должен понять, какие именно ячейки проверять? Где-то есть список этих ячеек?

Юрий М Модератор Сообщений: 60570 Регистрация: 14.09.2012 Контакты см. в профиле	#13 27.05.2019 23:32:23 Нет ответа… Код Dim rCell As Range     For Each rCell In Range("A3, T16, T22")         If rCell = "" Then             rCell.Interior.ColorIndex = 3         Else             rCell.Interior.ColorIndex = xlNone         End If     Next

RAN Пользователь Сообщений: 7091 Регистрация: 21.12.2012	#14 27.05.2019 23:39:10 Цитата Max.il написал: к примеру Код Sub qq()     Dim r As Range     Set r = [a1:c3]     On Error Resume Next     r.SpecialCells(4).Interior.ColorIndex = 3 End Sub

Max.il Пользователь Сообщений: 64 Регистрация: 05.12.2018	RAN,  Юрий М, Мужчины, спасибо, что помогаете . Искренняя благодарность.

Николай Китаев Пользователь Сообщений: 2 Регистрация: 01.01.1970

#16 17.12.2021 13:26:01 Цитата написал: Подскажите как при помощи VBA определить наличие пустой ячейки Такая конструкция не работает: If cells(i,y).Value=»» then…. А так — должно работать: If IsEmpty(cells(i,y).Value) = True Then ……., где К — переменная содержащая или несодержащая значение, или переменная, содержащая адрес ячейки Cell, которую проверяем. Изменено: Николай Китаев — 17.12.2021 14:07:17

Jack Famous Пользователь Сообщений: 10846 Регистрация: 07.11.2014 OS: Win 8.1 Корп. x64 | Excel 2016 x64: | Browser: Chrome	Николай Китаев, с момента создания темы прошло почти 8 лет, а ТС был последний раз почти 2 года назад — в курсе?   Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄

	Ничего страшного. Можно считать, что памятка для себя. Тем более проверка вида cells(i,y).Value=»» не работает.

БМВ Модератор Сообщений: 21376 Регистрация: 28.12.2016 Excel 2013, 2016	#19 17.12.2021 14:19:40 Цитата Николай Китаев написал: Тем более проверка вида cells(i,y).Value=»» не работает. докажите. По вопросам из тем форума, личку не читаю.

Jack Famous Пользователь Сообщений: 10846 Регистрация: 07.11.2014 OS: Win 8.1 Корп. x64 | Excel 2016 x64: | Browser: Chrome

Если вас что-то не устраивает, то не нужно поднимать со дна старую тему, тем более, что спросить автора не получится — создайте свою и там всё подробно опишите и/или спросите И тут гляньте: VBA. UDF. Функция для проверки значения на строку нулевой длины «=»»» Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄

vikttur Пользователь Сообщений: 47199 Регистрация: 15.09.2012	#21 17.12.2021 23:29:31 Цитата Николай Китаев написал: If IsEmpty(cells(i,y).Value) = True Then ……., где К — переменная И где К? )

Be it for troubleshooting formula errors or data integrity, you might find yourself trying to identify those cells going through the entire workbook. In this article we’re going to show to find in Excel if cell is blank using VBA and automate this process.

How to find in Excel if cell is blank using VBA

VBA has some predefined types for the cells that contains special values. These can be accessed with the SpecialCells method. The SpecialCells method uses two arguments to specify the cells; Type and Value. Using a combination of these two arguments you can easily access the cell or range type you desired. Below is a list of values both arguments can get.

Type

• xlCellTypeAllFormatConditions. Cells of any format
• xlCellTypeAllValidation. Cells having validation criteria
• xlCellTypeBlanks. Empty cells
• xlCellTypeComments. Cells containing comments
• xlCellTypeConstants. Cells containing constants
• xlCellTypeFormulas. Cells containing formulas
• xlCellTypeLastCell. The last cell in the selected range. Note that this will include empty cells that have had any cells that changed from their default format.
• xlCellTypeSameFormatConditions. Cells having the same format
• xlCellTypeSameValidation. Cells having the same validation criteria
• xlCellTypeVisible. All visible cells

Value

• xlErrors
• xlLogical
• xlNumbers
• xlTextValues

To find the blank cells using VBA, using xlCellTypeBlanks constant for the type argument is enough. The value argument can be omitted.

An important point in here is that the Selection.SpecialCells(xlCellTypeBlanks).Cells returns an array of cells. So, before returning any information, we need to step through each cell in the array. A For Each…Loop is perfect for arrays consisting of objects. We designed our code to return the address of all blank cells in a Message Box.

To be able to run codes, you need to add a module into the workbook or the add-in file. Copy and paste the code into the module to run it. The main advantage of the module method is that it allows saving the code in the file, so that it can be used again later. Furthermore, the subroutines in modules can be used by icons in the menu ribbons or keyboard shortcuts. Remember to save your file in either XLSM or XLAM format to save your VBA code.

Find blank cells

Sub FindBlankCells()

    Dim rng As Range, message As String

    For Each rng In Selection.SpecialCells(xlCellTypeBlanks).Cells

        message = message & Chr(10) & rng.Address 'Chr(10) is for new line

    Next

    MsgBox message, vbOKOnly, "Empty Cells" 'vbOKOnly is the type of the message box

End Sub

Перейти к содержимому

Поиск первой пустой ячейки в строке

Re:Я Дата: Пятница, 24.06.2016, 14:49 | Сообщение № 1 Группа: Пользователи Ранг: Новичок Сообщений: 26 Репутация: 0 ± Замечаний: 0% ± Excel 2010 Добрый день. Второй день не могу найти подходящую тему на форуме. Прошу помощи. Задача — вставить в действующий макрос (ВПР, так назову) еще один макрос, который ищет на Листе БМП в 3-й строке первую не пустую ячейку. Смысл такой. Поступил заказ от клиента, кладу его в Лист заказ БМП. ВПРю. Поступает следующий заказ. «ИЩУ ПУСТУЮ ЯЧЕЙКУ в 3-й строке на Листе БМП и вновь вставляю значение заказа. И если не сложно, то бонусом, подтянуть наименование клиента. Заранее БЛАГОДАРЮ. К сообщению приложен файл: 1282540.xlsm (54.2 Kb)   Ответить

китин Дата: Пятница, 24.06.2016, 14:51 | Сообщение № 2 Группа: Модераторы Ранг: Экселист Сообщений: 6973 Репутация: 1063 ± Замечаний: 0% ± Excel 2007;2010;2016 Не судите очень строго:я пытаюсь научиться ЯД 41001877306852   Ответить

Re:Я Дата: Пятница, 24.06.2016, 15:23 | Сообщение № 3 Группа: Пользователи Ранг: Новичок Сообщений: 26 Репутация: 0 ± Замечаний: 0% ± Excel 2010 китин: Посмотрел…..и не понял. Мне наверняка вот это подойдет. [vba] Код lLastRow = Cells(Rows.Count,2).End(xlUp).Row [/vba] Но как ее интегрировать в «мой» макрос? Что бы нашел первую пустую и начал ВПРить?   Ответить

китин Дата: Пятница, 24.06.2016, 15:45 | Сообщение № 4 Группа: Модераторы Ранг: Экселист Сообщений: 6973 Репутация: 1063 ± Замечаний: 0% ± Excel 2007;2010;2016 а это ждите макрописцев Не судите очень строго:я пытаюсь научиться ЯД 41001877306852   Ответить

Udik Дата: Пятница, 24.06.2016, 15:59 | Сообщение № 5 Группа: Друзья Ранг: Старожил Сообщений: 1588 Репутация: 192 ± Замечаний: 0% ± Excel 2016 х 64 Без привязки к макросу [vba] Код Public Sub test() Dim rng1 As Range With ActiveSheet Set rng1 = .Range(«A3:O3»).Find(«») ‘замените на свой  диапазон ‘Debug.Print rng1.Address End With End Sub [/vba] К сообщению приложен файл: 0t.xlsm (19.1 Kb) вот вам барабан яд 41001231307558 wm R419131876897 udik1968@gmail.com   Ответить

_Boroda_ Дата: Пятница, 24.06.2016, 18:47 | Сообщение № 6 Группа: Модераторы Ранг: Местный житель Сообщений: 16618 Репутация: 6465 ± Замечаний: 0% ± 2003; 2007; 2010; 2013 RUS Мне наверняка вот это подойдет. lLastRow = Cells(Rows.Count,2).End(xlUp).Row Не, это ищет последнюю заполненную СТРОКУ в столбце 2, а Вам нужно последний заполненный СТОЛБЕЦ в строке 3 (кстати, вопрос — Вам нужно первую пустую или последнюю? — это разные вещи) Вот так можно найти последнюю [vba] Код c1_ = Cells(3, Columns.Count).End(xlToLeft).Column + 1 [/vba] а вот так первую [vba] Код Range(«B3»).End(xlToRight).column [/vba] А по поводу как ее интегрировать в «мой» макрос? — что-то я макроса действующий макрос (ВПР, так назову) в Вашем файле не обнаружил. Скажи мне, кудесник, любимец ба’гов… Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995   Ответить

Re:Я Дата: Понедельник, 27.06.2016, 10:43 | Сообщение № 7 Группа: Пользователи Ранг: Новичок Сообщений: 26 Репутация: 0 ± Замечаний: 0% ± Excel 2010 _Boroda_ — Вы как всегда меня выручаете. Благодарю. Теперь по макросу Вашему. Мне надо найти именно ПЕРВУЮ. Вопрос почему ищем с ячейки В3? В третье строке могут быть пустые ячейки в поле сводной таблицы. Мне туду ни чего не надо вставлять. А вот строка два всегда будет в раках сводной таблицы заполнена и за пределами таблицы мне и надо найти ячейку первую пустую и вставить туда значение макровса ВПР. М.б. мне заново положить файл с примером? Хотя сейчас его скачал и он там есть по номером 7. На всякий случай выложу сам макрос. И суть всего действия такова. Найти первую пустую ячейку в строке 2 и следом запустить макрос ВПР.( так его назвал) И если возможно, бонусом, что бы не создавать новую тему, привязать НАЗВАНИЕ клиента. В данном примере: Нашел первую пустую ячейку К2. Вставил название клиента из ЛИСТА ЗАКАЗ БМП С4 (постоянная, всегда там будет название клиента), и вставить значение из ВПР. Вот. Если это конечно не сильно нарушает ПРАВИЛА. Сам макрос ВПР, к которому надо все привязать. [vba] Код Sub Макрос7()     Dim a, b, c, d, e, iLastrow As Long, i As Long, ii As Long        ‘1. данные в два массива     With Лист2    ‘используется кодовое имя         iLastrow = .Cells(Rows.Count, 3).End(xlUp).Row         a = Range(.[c3], .Range(«C» & iLastrow)).Value     End With     With Лист3    ‘используется кодовое имя         iLastrow = .Cells(Rows.Count, 1).End(xlUp).Row         b = Range(.[k19], .Range(«C» & iLastrow)).Value     End With     ‘2.пустой массив для результата     ReDim c(1 To UBound(a), 1 To 9)     With CreateObject(«Scripting.Dictionary»)             ‘3.в словарь уникальные и номер строки из массива         For i = 1 To UBound(b)             .Item(b(i, 1)) = i         Next         ‘4.по словарю из массива b в массив c         For i = 1 To UBound(a)             If .exists(a(i, 1)) Then                 c(i, 1) = b(.Item(a(i, 1)), 9)             End If         Next     End With     ‘5. выгрузка всего массива     With Лист2    ‘используется кодовое имя         .[K3].Resize(UBound(c), 1) = c         .Activate     End With End Sub [/vba]   Ответить

Re:Я Дата: Понедельник, 27.06.2016, 11:07 | Сообщение № 8 Группа: Пользователи Ранг: Новичок Сообщений: 26 Репутация: 0 ± Замечаний: 0% ± Excel 2010 ай-яй…. сам напортачил. Сам же просид 3-ю. теперь задаю вопрос почему 3-ю… Прошу прощения. Исправляюсь. во 2-й строке.   Ответить

Re:Я Дата: Вторник, 05.07.2016, 09:50 | Сообщение № 9 Группа: Пользователи Ранг: Новичок Сообщений: 26 Репутация: 0 ± Замечаний: 0% ± Excel 2010 С Вашего позволения ап… Прошу помощи.   Ответить

китин Дата: Вторник, 05.07.2016, 10:03 | Сообщение № 10 Группа: Модераторы Ранг: Экселист Сообщений: 6973 Репутация: 1063 ± Замечаний: 0% ± Excel 2007;2010;2016 Рискну ответить.в качестве предположения,может неправильно. А что если попробовать исправить вот тут [vba] Код iLastrow = .Cells(Rows.Count, 3).End(xlUp).Row         a = Range(.[c3], .Range(«C» & iLastrow)).Value [/vba] 3 на 2 (обе тройки) Не судите очень строго:я пытаюсь научиться ЯД 41001877306852 Сообщение отредактировал китин — Вторник, 05.07.2016, 10:03   Ответить

Re:Я Дата: Вторник, 05.07.2016, 10:20 | Сообщение № 11 Группа: Пользователи Ранг: Новичок Сообщений: 26 Репутация: 0 ± Замечаний: 0% ± Excel 2010 китин — благодарю за ответ. саму малость понимаю в макросах. 3 на 2 это не проблема для меня. Проблема это как внедрить поиск первой пустой строки в мой макрос? _Boroda_ — написал, что не видит в примере макроса. Это для меня не большое удивление. Почему его не видно в примере. Я его, макрос. выложил отдельно. Сама процедура. 1. Поиск первой пустой строки в «2» 2. ВПРить и вставлять со К3 значения . (это все работает как положено) Так же с помощью _Boroda_ доделал его. Тема в другой ветке была. [moder]Тема продублирована во ФРИЛАНСе. Эту закрываю[/moder] Сообщение отредактировал Pelena — Вторник, 05.07.2016, 14:02   Ответить

На чтение 4 мин. Просмотров 11k.

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

Содержание

1. Как макрос работает
2. Код макроса
3. Как этот код работает
4. Код макроса
5. Как этот код работает
6. Как использовать

Как макрос работает

Эти макросы используют элемент Cells и свойство Offset в качестве ключевых инструментов навигации.
Элемент Cells принадлежит объекту Range. Это дает нам чрезвычайно удобный способ выбора диапазонов с помощью кода. Для этого требуется только относительные строки и столбцы в качестве параметров. Cells(5,4) приводит к строке 5, столбцу 4 (или ячейке D5). Cells(16, 4) приводит к строке 16, столбцу 4 (или ячейке D16).
Помимо передачи жестких чисел в элемент Cells, вы также можете передавать выражения.
Cells(Rows.Count, 1) то же самое, что выбрать последнюю строку и первый столбец в таблице. В Excel 2010 переводит к ячейке A1048576.
Cells(1,Columns.Count) выбирает первую строку и последний столбец в таблице. В Excel 2010 приводит к ячейке XFD1.
Объединение оператора Cells со свойством End позволяет перейти к последней использованной строке или столбцу. Это утверждение эквивалентно переходит к ячейке A1048576 и нажав Ctrl + Shift + стрелка вверх на клавиатуре. Excel автоматически переходит к последней использованной строки в столбце A.

Cells(Rows.Count, 1).End(xlUp).Select

Переходит к ячейке XFD1 и нажав Ctrl + Shift + стрелка влево на клавиатуре. Это переводит вас к последней использованной колонке в строке 1.

Cells(1, Columns.Count).End(xlToLeft).Select

Когда вы дойдете до последней строки или столбца, вы сможете использовать свойство Offset для перемещения вниз или к следующей пустой строке или столбцу.
Свойство Offset использует индекс строки и столбца, чтобы указать изменяющуюся базовую точку.Например, оператор выбирает ячейку А2, так как индекс строки в Offset перемещения строки базовой точки на единицу:

Range("A1").Offset(1, 0).Select

Этот оператор выбирает ячейку С4, и перемещает базовую точку на три строки и два столбца:

Range("A1").Offset(3, 2).Select

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

Код макроса

Sub PervayaPustayaStroka()
'Шаг 1: Объявляем переменные
Dim LastRow As Long
'Шаг 2: Захват последнего использованного номера строки
LastRow = Cells(Rows.Count, 1).End(xlUp).Row
'Шаг 3: Выбираем следующую строку вниз
Cells(LastRow, 1).Offset(1, 0).Select
End Sub

Как этот код работает

1. Шаг 1 первый объявляет переменную Long Integer под названием LastRow — держатель номера строки последней использованной строки.
2. На шаге 2 мы фиксируем последнюю использованную строку, начиная с самой последней строки в листе и используя свойство End, чтобы перейти к первой непустой ячейке (переход к ячейке A1048576 нажатием Ctrl + Shift + стрелка вверх на клавиатуре).
3. На этом этапе мы используем свойство Offset для перемещения на одну строку вниз и выбираем первую пустую ячейку в столбце A.

Код макроса

Sub PerviiPustoiStolbec()
'Шаг 1: Объявляем переменные
Dim LastColumn As Long
'Шаг 2: захват последнего использованного номера столбца
LastColumn = Cells(5, Columns.Count).End(xlToLeft).Column
'шаг 3: выбираем следующий пустой столбец
Cells(5, LastColumn).Offset(0, 1).Select
End Sub

Как этот код работает

1. Сначала мы объявляем переменную Long Integer под названием LastColumn —  держатель номера столбца последнего используемого столбца.
2. На шаге 2 мы фиксируем последний используемый столбец, начиная с самого последнего столбца в листе и используя свойство End, чтобы перейти к первой непустой колонке
   (эквивалент перейти к ячейке XFD5, нажав Ctrl + Shift + стрелка влево на клавиатуре).
3. На этом этапе мы используем свойство Offset для перемещения на одну колонку и выбираем первый пустой столбец в строке 5.

Как использовать

Вы можете реализовать эти макросы, вставив их в стандартный модуль:

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

Если пользователь использует таблицу Excel с небольшим количеством данных, то проблем с не возникает с поиском пустых ячеек. Но когда информации очень много, хорошо было бы автоматизировать этот процесс. Ведь вручную просматривать тысячи ячеек занимает очень много времени, которое можно было бы использовать для других рабочих задач или отдыха. Особенно это важно при работе с документами, где большая часть данных – числовые. Там и без того важно не запутаться.

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

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

Как определить, пустая ячейка или нет (способы)

Это можно сделать с помощью функции ЕПУСТО, которая может использоваться для данных самых разных типов, включая не только числа и текст, но даже логические функции. Давайте более подробно рассмотрим особенности работы с этой формулой.

Эта функция имеет очень простую схему использования. Если в конкретной ячейке нет никакой информации, то возвращается ИСТИНА. Если же в ней содержится определенная информация, то, соответственно, значение оказывается ЛОЖЬ.

Есть и другие способы определения, есть ли информация во всех ячейках определенного диапазона или в конкретной ячейке. Также в некоторых ситуациях разумно применять обычную функцию ЕСЛИ, знакомую почти каждому активному пользователю. Давайте разберем также и правила их использования. 

Процедуры VBA

VBA – это язык программирования, который используется для написания макросов. Это маленькие исполняемые модули, которые выполняют определенную последовательность действий, в том числе, и осуществляют проверку, есть ли внутри ячейки какая-то информация, или нет.

Код для конкретной ячейки

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

Sub example()  

 If IsEmpty(Range(«A1»)) = True Then  

 MsgBox «Ячейка пустая»  

 Else  

 MsgBox «Ячейка не пустая»  

 End If  

End Sub  

Этот фрагмент кода проверяет ячейку А1 на предмет того, содержатся ли в ней какие-то данные. И результат выводит в соответствующее окошко.

Код для активной ячейки

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

Sub example()  

 If IsEmpty(ActiveCell) = True Then  

 MsgBox «Ячейка пустая»  

 Else  

 MsgBox «Ячейка не пустая»  

 End If  

End Sub 

Функция ЕПУСТО для проверки пустых ячеек

Как мы уже поняли, функция ЕПУСТО дает возможность определить, пустая ли определенная ячейка. Давайте разберем некоторые практические аспекты использования этой функции.

Примеры использования функции ЕПУСТО

Давайте опишем некоторые способы применения функции ЕПУСТО на практике. Допустим, вы работаете преподавателем и у вас открыта таблица с оценками учеников по последнему тесту. При этом некоторые из баллов не записаны, поскольку ряд студентов плохо сдали его и пошли на пересдачу. И допустим, перед нами стоит задача написать в третьей колонке список тех, кто сдал экзамен с первого раза.

Чтобы реализовать поставленные задачи, нам нужно ввести следующую формулу после выделения диапазона C3:C18.

=ЕСЛИ(ИЛИ(ЕПУСТО(B3);B3=2);»На пересдачу»;»Сдал»)

Если пользователь хоть немного понимает, как устроена работа с формулами, то он, основываясь на синтаксисе приведенной выше строки, поймет, что если в ячейке есть балл, то в ячейку будет записано «Сдал». Если же оценки нет, то появится результат «На пересдачу».

После того, как мы введем эту формулу, результат будет следующим:

Далее давайте попробуем сделать особое форматирование в зависимости от того, есть ли оценка у человека или нет. Для этого нужно найти параметр «Стили» на вкладке «Главная». Там находится пункт «Условное форматирование». После того, как мы его выберем, нужно нажать кнопку «Создать правило».

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

После этого нам нужно нажать на кнопку «Формат» и выбрать красный цвет фона. Действия подтверждаются путем нажатия кнопки «ОК». Теперь у нас все ячейки с надписью «На пересдачу» выделяются красным цветом.

Почему следует использовать функцию ЕПУСТО при проверке пустых ячеек?

Тот человек, который уже немного разбирается в Excel, может задать вопрос: почему нельзя использовать банальную функцию ЕСЛИ для этой цели? Да, можно. Достаточно просто записать такую формулу:

=ЕСЛИ(ИЛИ(B3=»»;B3=2);»На пересдачу»;»Сдал»)

Видим, что мы здесь использовали кавычки для определения ячеек без никаких значений. И в описанном выше случае эта формула также бы работала. Но не во всех случаях это возможно. Если содержатся определенные типы значений, этот трюк работать не будет. Давайте обратим внимание на этот скриншот.

Видим, что в первой ячейке содержится знак ‘. Этот символ не отображается в листе, и он также не может быть обнаружен функцией ЕСЛИ. Все потому, что это специальный символ Excel, который необходим для того, чтобы показывать текстовую информацию, если ячейка находится в числовом формате, например. Это часто используется, если необходимо в ячейку вставить плюс. Если не использовать одинарную кавычку, программа будет думать, что это мы собираемся вводить формулу. В этом основное отличие. 

Если использовать функцию ЕПУСТО для этой цели, пользователь получает возможность узнать реальную картину, какие ячейки действительно пустые, а не только отображаются, как пустые. 

Пример проверки на пустую ячейку

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

Чтобы понять, есть ли пустые ячейки, нужно использовать именно формулу массива. Ее основное отличие в том, что она работает одновременно с большим количеством данных. Чтобы сделать формулу массива, нужно нажать комбинацию Ctrl + Shift + Enter после того, как формула будет введена в соответствующую строку.

=ЕСЛИ(СУММ(—ЕПУСТО(B3:B17));ИСТИНА;ЛОЖЬ)

В примере, которое описывается нами сейчас, функция СУММ применяется с целью определения количества всех значений, которые возвращаются функцией ЕПУСТО. Если же после вычисления по этой формуле окажется значение, превышающее ноль, то вернется значение «Истина».

Как следствие, мы получим следующую таблицу.

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

Внимание. Были использованы символы «–-» в формуле, приводимой выше. На это надо обратить особое внимание. Эти символы означают двойное отрицание. В нашем примере его нужно использовать, чтобы превратить логический тип данных в числовой.

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

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

Как подсчитать количество пустых ячеек в Эксель

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

Сама таблица выглядит так.

Чтобы реализовать поставленную задачу, нам нужна такая формула. 

=ЕСЛИ(СУММ(—ЕПУСТО(B3:B12));СЧИТАТЬПУСТОТЫ(B3:B12)&» поля не заполнены»;СРЗНАЧ(B3:B12))

Функция ЕСЛИ дает возможность осуществить проверку набора ячеек на предмет того, есть ли среди них пустые значения (для этого используется функция —ЕПУСТО с соответствующими аргументами). Если в итоге суммирования было возвращено положительное значение, то будет показан текст, в котором записано, сколько ячеек без значения. Для этого используется функция СЧИТАТЬПУСТОТЫ. А с помощью знака & мы соединяем несколько значений. 

Получается такой документ.

При этом нужно помнить про все особенности и ограничения применения функции ЕСЛИ, описанные выше. 

Особенности применения функции ЕПУСТО в Excel

Есть несколько типов функций, и ЕПУСТО принадлежит к категории логических. Простыми словами, она проверяет какое-то выражение на предмет соответствия определенному критерию. Таких функций насчитывается еще огромное количество, и это не только указанная выше ЕСЛИ. Также к таким функциям относятся такие операторы, как ЕССЫЛКА, ЕЧИСЛО и так далее. Все они возвращают одно из двух возможных значений: истинное или ложное. 

Если записать функцию, ее синтаксис будет следующим.

=ЕПУСТО(значение)

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

Есть ряд особенностей, которые берутся в учет, когда пользователь собирается работать с этой функцией:

1. Нельзя указывать конкретное значение, как параметр, поскольку тогда будет автоматически возвращено значение «ЛОЖЬ». Все дело в том, что такое значение априори не может содержат никаких значений. 
2. Если перед нами стоит задача сделать так, чтобы было возвращена «ИСТИНА» в случае заполненности ячейки любой информацией, то нужно использовать сразу две функции: НЕ и ЕПУСТО. Тогда сначала нужно использовать первую, а потом вторую в качестве аргумента. 
3. Использование функции АДРЕС, как параметр функции ЕПУСТО. бесполезно. Тогда всегда будет возвращаться результат, что критерию значение не соответствует. Все потому, что функцией АДРЕС осуществляется возвращение ссылки, которая сама по себе уже является разновидностью информации даже в том случае, если в ячейке, на которую она ссылается, нет никаких данных. 
4. Значение «ЛОЖЬ» будет в качестве итога даже в той ситуации, когда есть ошибка. Все потому, что какая-то информация содержится в ней в любом случае, пусть даже неверная. А если речь идет об информации про ошибку, то это еще и полезная информация. А ссылка уже может считаться полноценным типом данных. 
5. Очень часто пользователи забывают о формуле массива, чтобы осуществить проверку сразу большого количества ячеек. Иначе значение, возвращаемое функцией, будет неправильным. 

Выводы

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

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