Как да разреша само формат на дата в конкретни клетки?
Как можете да ограничите списък с клетки, така че да позволява само въвеждане на формат на дата в работен лист на Excel? В тази статия ще говоря за някои интересни трикове за справяне с тази работа.
Разрешаване само на формат на дата в конкретни клетки с функцията за проверка на данните
Разрешаване само на формат на дата в конкретни клетки с VBA код
Разрешаване само на формат на дата в конкретни клетки с функцията за проверка на данните
В Excel, Потвърждаване на данните е мощна функция, която може да ви помогне да създадете падащ списък, да предотвратите дублиращи се записи и т.н. Тя също така може да ви помогне да предотвратите въвеждането на друг формат на данни, а само формат на дата в определени клетки. Моля, направете следните стъпки:
1. Щракнете Дата > Потвърждаване на данните > Потвърждаване на данните, вижте екранна снимка:
2. В Потвърждаване на данните кликнете върху Настройки и след това изберете Custom от Позволете падащ списък, след което въведете тази формула: =И(ISNUMBER(B2),LEFT(CELL("format",B2),1)="D") в Формула текстово поле, вижте екранна снимка:
Забележка: В горната формула, B2 е първата клетка от колоната, за която искате да ограничите формата на данните.
3. След това продължете да щраквате Предупреждение за грешка раздел в диалоговия прозорец, моля, направете следните операции:
(1.) Проверка Показване на предупреждение за грешка след въвеждане на невалидни данни опция;
(2.) Под Стил падащо меню, моля изберете Спиране опция;
(3.) Въведете Заглавие намлява Съобщение за грешка които искате да покажете в полето за подкана.
4. След като завършите настройките, щракнете OK и сега, когато въведете данните, които не са реален формат на датата, ще изскочи поле за подкана, за да ви напомни, както е показано на следната екранна снимка:
Разрешаване само на формат на дата в конкретни клетки с VBA код
Вторият метод, ще ви представя VBA код.
1. Активирайте работния лист, който искате да използвате.
2. След това щракнете с десния бутон върху раздела на листа и изберете Преглед на кода от контекстното меню вижте екранната снимка:
3. В показаното Microsoft Visual Basic за приложения прозорец, копирайте и поставете кода по-долу в Модули, вижте екранна снимка:
VBA код: Разрешете само въвеждане на формат на дата в определени клетки:
Private Sub Worksheet_Change(ByVal Target As Range)
'updateby Extendoffice
Set w = ActiveSheet.Range("B2:B12")
For Each c In w
If c.Value <> "" And Not IsDate(c) Then
c.ClearContents
MsgBox "Only a date format is permitted in this cell."
End If
Next c
End Sub
4. След това запазете рекламата, затворете кода, сега, когато въведете стойността, която не е формат на датата в диапазон B2: B12, ще изскочи поле за подкана, за да ви напомни, и стойността на клетката ще бъде изчистена едновременно, вижте екранната снимка:
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!