Для скрытия сообщений об ошибках можно использовать режим условного форматирования. Для этого нужно выделить те ячейки с формулами, результаты вычислений которых не должны отображаться в случае возникновения ошибок, затем в режиме Главная → Стили → Условное форматирование определить формулу вида =ЕОШИБКА (ссылка_на_ячейку), где ссылка_на_ячейку – это ссылка на активную ячейку выделенного диапазона. После этого для данной формулы следует установить белый цвет отображения.
После выполненных действий результаты вычислений с ошибками будут выводиться белым цветом и поэтому не будут видны на экране.
Разработка и применение полезных пользовательских функций
Наряду с формулами функции также являются одним из основных инструментов Microsoft Excel. Функции могут быть как системными (то есть изначально заложенными в программу), так и пользовательскими (пользовательская функция – это функция, созданная пользователем с применением языка VBA).
Далее мы познакомимся с несколькими полезными пользовательскими функциями. При описании применения функций подразумевается, что они выбираются в окне Мастер функций (Формулы → Вставить функцию), однако их можно вводить и в строку формул по обычным правилам Excel.
Объединение данных диапазона
Функция Couple предназначена для объединения всех данных, которые расположены в указанном диапазоне, с добавлением пробелов между ними. Код данной функции выглядит следующим образом (листинг 2.43).
Function Couple(Diapazon)
' Объединение данных, содержащихся в ячейках диапазона _
Diapazon (разделитель между значениями – пробел)
' iCell – текущая ячейка
For Each iCell In Diapazon
' Сцепляются данные только заполненных ячеек
If IsEmpty(iCell) <> True Then
' Добавление значения ячейки в выходную строку
If Couple = "" Then
Couple = iCell
Else
Couple = Couple & " " & iCell
End If
End If
Next
End Function
Как обычно, на первом этапе в окне Мастер функций нужно выделить данную функцию и нажать кнопку ОК. На втором этапе следует указать диапазон ячеек, содержимое которых необходимо объединить, и вновь нажать ОК – результат отобразится в ячейке, в которой установлен курсор.
Функция Couple выгодно отличается от стандартной функции СЦЕПИТЬ тем, что легко можно указать произвольный диапазон, а также тем, что объединенные данные разделяются пробелом.
Объединение данных с учетом форматов
Функция CoupleFormat работает аналогично функции Couple с той разницей, что она объединяет данные указанного диапазона с соблюдением форматов. Код функции представлен в листинге 2.44.
Function CoupleFormat(Diapazon)
' Объединение текстовых данных, содержащихся в ячейках _
диапазона Diapazon (разделитель между значениями – пробел)
' iCell – текущая ячейка
For Each iCell In Diapazon
' Сцепляются данные только заполненных ячеек
If IsEmpty(iCell) <> True Then
' Добавление текста ячейки в выходную строку
If CoupleFormat = "" Then
CoupleFormat = iCell.Text
Else
CoupleFormat = CoupleFormat & " " & iCell.Text
End If
End If
Next
End Function
После выбора функции следует указать требуемый диапазон данных и нажать кнопку ОК – результат отобразится в ячейке, в которой установлен курсор.