На листе Кэрол имеет ячейку, отформатированную как «Бухгалтерский учет». Если кто-то случайно вводит дату (мм/дд/гг) в эту ячейку, Excel автоматически изменяет форматирование ячейки для правильного отображения даты. Однако, если она попытается снова ввести сумму в долларах в эту ячейку, она не вернется к формату «Бухгалтерский учет»; ячейка остается в формате даты. Это нормально, если пользователь видит ошибку и исправляет ее, но часто это происходит в шаблоне с «стандартным» текстом, и шаблон защищен без доступа к форматированию ячеек. Кэрол задается вопросом, есть ли у кого-нибудь идеи, почему это происходит и как это исправить.
Если вам нужен быстрый способ предотвратить изменение форматирования на простых листах, выполните следующие действия:
- Отобразить диалоговое окно “Параметры Excel”. (В Excel 2007 нажмите кнопку «Office», а затем – «Параметры Excel. В Excel 2010 или более поздней версии откройте вкладку« Файл »на ленте, а затем нажмите кнопку« Параметры ».)
- В левой части диалогового окна. нажмите “Дополнительно”.
- Прокрутите до самого низа расширенных параметров. (См. Рис. 1.)
- Убедитесь, что выбран параметр “Ввод формулы перехода”.
- Нажмите “ОК”.
Рис. 1. Расширенные параметры в диалоговом окне “Параметры Excel”.
Этот конкретный параметр заставляет Excel оценивать (анализировать) введенную информацию так же, как это делал Lotus 1-2-3. Это означает, что даты больше не анализируются как даты, а как формула. Таким образом, если кто-то вводит 11-16-13 в ячейку, то он анализируется как «одиннадцать минус шестнадцать минус тринадцать» и отображается в ячейке как -18. Поскольку он не был проанализирован как дата, формат учета остается связанным с ячейкой по желанию.
Однако у этого подхода есть недостатки. Поскольку Excel впоследствии анализирует любые записи в соответствии с правилами Lotus, ваши пользователи могут сделать вывод, что ваш рабочий лист не работает должным образом, поскольку он не соответствует тем же правилам, что и другие рабочие листы Excel. Вот почему я упомянул, что этот подход может быть приемлемым для простых листов; вам нужно будет определить, соответствует ли ваш рабочий лист требованиям.
Если вы не хотите изменять способ выполнения синтаксического анализа, лучшим подходом может быть добавление обработчиков событий на ваш рабочий лист. Например, вы можете включить обработчик событий, который проверяет, куда были введены данные, и гарантирует, что любые изменения в этих ячейках сохраняют желаемое форматирование.
Private Sub Worksheet_Change (ByVal Target As Range) Dim rngToCheck As Диапазон Установить rngToCheck = Range («E2») Если Intersect (Target, rngToCheck) Тогда rngToCheck.NumberFormat = _ «_ ($ * #, ## 0.00 _); _ ($ * (#, ## 0.00); _ ( $ * «» — «» ?? _); _ (@_) «End IfEnd Sub
В этом примере ячейка, в которой вы хотите сохранить формат учета, – это E2, как назначено в переменную rngToCheck. Если вы хотите принудительно применить формат к другому диапазону ячеек, просто измените строку назначения.
Если вы хотите немного большей гибкости, вы можете использовать другой набор обработчиков событий. Например, в следующих примерах используются события SelectionChange и Change объекта Worksheet. Они приводят к чему-то, что не так сильно влияет на конкретный формат, но предотвращает изменение форматирования ячейки по сравнению с тем, что было раньше. Таким образом, этот подход защищает любое форматирование, а не только принудительное применение формата учета.
Dim nFormat As StringPrivate Sub Worksheet_Change (ByVal Target As Range) Dim rngToCheck As Range Set rngToCheck = Range («E2») If Intersect (Target, rngToCheck) Затем rngToCheck.NumberFormat = nFormat End IfEnd Sub Private Sub Worksheet_SelectionChange (ByVal Target As Range) nFormat = Target.NumberFormatEnd Sub
The SelectionChange обработчик событий запускается первым, устанавливая существующий формат в переменную nFormat. Затем срабатывает обработчик события Change и устанавливает исходное форматирование.
Другой подход, который вы можете попробовать, – использовать проверку данных. Этот подход не требует никаких макросов и поэтому подходит, если ваша книга будет использоваться людьми, у которых могут быть отключены макросы в их системе. Выполните следующие общие шаги:
- Выберите ячейку или ячейки, форматирование которых вы хотите применить.
- Отобразите вкладку «Данные» на ленте.
- Щелкните инструмент «Проверка данных» в группе «Инструменты для работы с данными». Excel отображает диалоговое окно «Проверка данных».
- В раскрывающемся списке «Разрешить» выберите «Пользовательский». (См. Рис. 2.)
- В поле Формула введите следующее: = CELL (“format”, B2) = “C2”
- Задайте любые другие параметры проверки данных по своему усмотрению.
- Нажмите ОК.
Рис. 2. Диалоговое окно «Проверка данных».
Формула (шаг 5) проверяет форматирование ячейки и разрешает или запрещает ввод в зависимости от этого форматирования. В приведенной формуле формат C2 – это внутреннее имя формата учета. Вы можете легко изменить коды в формуле на другой формат, такой как «, 2», «C2», «C0», «C2-» или «C0-» в зависимости от ваших предпочтений. Самый простой способ определить, какой формат следует использовать, – это отформатировать ячейку по своему усмотрению перед применением правила проверки данных. (Например, допустим, вы применяете форматирование к ячейке L13.) Затем вы можете использовать эту формулу в другой ячейке, чтобы узнать, какой формат, по мнению Excel, вы применили:
= CELL («format «, L13)
Источник: