Только при условии ввода всех данных
С помощью условного форматирования легко обеспечить, чтобы содержимое ячеек с результатами отображалось только при вводе всех данных. Например, необходимо найти сумму двух чисел, вводимых в ячейки В1 и В2. Результаты с пояснительными надписями отображаются в ячейках С2 и С1 только в случае, если оба слагаемых введены. Для этого достаточно диапазону С1:С2 назначить условное форматирование при помощи следующей формулы, причем установить цвет шрифта совпадающим с фоновым цветом.
=СЧЕТЗ($В$1:$В$2)<>2
Проверка вводимых значений
Для того чтобы задать тип данных, допустимых для диапазона, надо:
1. Выделить диапазон.
2. Выбрать команду Дата ► Проверка.
3. На вкладке Параметры окна Проверка вводимых значений в списке Тип данных указать тип допустимых данных. В списке Тип данных имеются следующие элементы:
· Любое значение — удаляет существующее правило проверки значений;
· Целое число — пользователь может вводить целые числа. Диапазон допустимых значений задается при помощи раскрывающихся списков Значение , Минимум и Максимум . Например, можно ограничить ввод целыми числами от 1до 100;
· Действительное — пользователь может вводить действительные числа. Диапазон допустимых значений задается при помощи раскрывающихся списков Значение , Минимум и Максимум . Например, можно ограничить ввод действительными числами из интервала [0; 1];
· Список — пользователь может выбрать значение из данного списка. Список задается в поле Источник , в котором указывается ссылка на диапазон с исходными данными;
|
|
|
· Дата — пользователь может вводить дату. Диапазон допустимых дат задается при помощи раскрывающихся списков Значение , Минимум и Максимум ;
· Время — пользователь может вводить время. Диапазон допустимых времен задается при помощи раскрывающихся списков Значение , Минимум и Максимум ;
· Длина текста — пользователь может вводить строки со специфицированными ограничениями по длине;
· Другой — возвращает логическое значение, определяющее соответствуют ли введенные значения ограничениям, которые задаются формулой. Ссылка на ячейку с формулой задается в поле Формула .
4. На вкладке Сообщение для ввода установить заголовок и текст всплывающей подсказки, отображаемой при расположении указателя мыши над ячейкой данного диапазона.
5. На вкладке Сообщение об ошибке задать значок, кнопки, заголовок и сообщение окна, отображаемого при попытке ввода некорректных данных.
Наиболее интересным применением проверки типа данных является использование формулы для задания ограничений. Данный режим проверки устанавливается выбором элемента Другой из списка Тип данных . В этом случае в поле Формула надо ввести формулу проверки данных в относительном формате с привязкой к левой верхней ячейке данного диапазона.
|
|
|
Например, данные содержатся в диапазоне В2:В10 .
r Если в ячейки этого диапазона надо вводить только строки текста, начинающиеся с буквы А, то воспользуйтесь формулой =ЛЕВСИМВ(В2)="А"
r Если в ячейки этого диапазона надо вводить только строки текста, состоящие из трех символов и начинающиеся с буквы А, то воспользуйтесь формулой
=ЛЕВСИМВ(В2, "А??")=1
r Если надо вводить только строки, состоящие из трех символов, то используйте формулу =ДЛСТР(В2)=3
r Если можно вводить только неповторяющиеся данные, то воспользуйтесь формулой
=СЧЕТЕСЛИ($В$2:$В$10;В2)=1
Автоматический ввод данных
В верхнем регистре данного диапазона
При помощи обработки события Change объекта Worksheet можно не только переформатировать данные, но и блокировать действия пользователя. Например, код листинга 5.38 из модуля рабочего листа обеспечит вывод данных в первом столбце рабочего листа только в верхнем регистре.
Листинг 5.38. Автоматический ввод данных в верхнем регистре данного диапазона.
Модуль рабочего листа
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Not Application.Intersect(Target, Range("A:A")) Is Nothing Then
Target.Value = UCase(Target.Value)
End If
Application.EnableEvents = True
End Sub
Дата добавления: 2019-02-12; просмотров: 191; Мы поможем в написании вашей работы! |
Мы поможем в написании ваших работ!