Ако искате да избегнете въвеждането на дублиращи се стойности в колона в Excel, можете да се обърнете към тази статия. Тук ще ви споделим 2 прости подхода.
Понякога, когато редактирате работен лист на Excel, може да искате да се уверите, че данните в колона са уникални, а именно предотвратяване на дублиращи се стойности в колона. Изисква Excel да ви предупреждава автоматично всеки път, когато въвеждате дублирани стойности в колона. По-нататък ще ви споделим 2 бързи начина да го получите.
Метод 1: Предотвратяване чрез „Проверка на данни“
- Първо, изберете всички клетки в конкретна колона, например „Колона A“.
- След това се обърнете към раздела „Данни“ и кликнете върху бутона „Проверка на данните“ в групата „Инструменти за данни“.
- След това, в изскачащия диалогов прозорец, в раздела „Настройки“ изберете опцията „Потребителски“ от падащия списък на „Разрешаване“.
- След това въведете следната формула в полето „Формула“.
= COUNTIF ($ A $ 1: $ A $ 20, A1) = 1
- По-късно превключете към раздела „Error Alert“ в текущия диалогов прозорец.
- Впоследствие можете да персонализирате съобщение за грешка според вашите нужди, като например да посочите „Дублиращи се стойности“ като заглавие на грешката и „Стойността е въведена в същата колона!“ като съобщение за грешка.
- Накрая щракнете върху „OK“.
- Сега можете да опитате.
- Първо, въведете стойност в клетка A1.
- След това въведете същата стойност в клетка A2.
- Веднага ще получите съобщение за грешка, като следната екранна снимка.
Метод 2: Предотвратяване с Excel VBA
- Като начало задействайте редактора на Excel VBA с препратка към „Как да стартирате VBA код във вашия Excel".
- След това поставете следния код в проект на лист, като „Лист 1 (Лист 1)“
Частен подправен лист_Промяна (ByVal Tarвземете As Range) Dim strTargetColumn As String Dim nTargetRow As Integer Dim nLastRow As Integer Dim dim strMsg As String strTargetColumn = Разделяне (Target.Address (, False), "$") (0) nTargetRow = разделяне (Target.Address (, False), "$") (1) nLastRow = ActiveSheet.Range (strTargetColumn & ActiveSheet.Rows.Count) .End (xlUp) .Row For nRow = 1 To nLastRow If nRow <> nTargetRow Тогава ако ActiveSheet.Range (strTargetColumn & nRow) .Value = Target.Value Тогава strMsg = "Стойността е въведена в същата колона!" MsgBox strMsg, vbExclamation + vbOKOnly, "Дублирани стойности"
Target.Изберете Exit For End If End If End Next Sub
- Оттогава всеки път, когато въвеждате стойност в произволни клетки, без значение в колони, макросът автоматично ще проверява останалите стойности в същата колона. Ако намери същите стойности, ще получите предупреждение, както е показано на следващата фигура.
сравнение
| Предимства | Недостатъци | |
| Метод 1 | Лесен за работа | Може само да наблюдава и работи за данните в конкретната колона |
| Метод 2 | Може да наблюдава и работи за данните във всички колони | Увеличете рисковете от вирусни или злонамерени атаки |
Върнете скъпи данни на Excel
Excel трябва да е склонен към срив. И всеки път, когато се срине, отвореният в момента файл на Excel може да се повреди като бриз. Следователно, за да избегнете загубата на ценни данни в Excel, не само трябва да ги архивирате редовно, но и трябва да се сдобиете със забележителна xls възстановяване инструмент, като DataNumen Excel Repair. Ще бъде полезен в случай на сериозна повреда на данните в Excel.
Въведение на автора:
Шърли Джанг е експерт по възстановяване на данни в DataNumen, Inc., която е световен лидер в технологиите за възстановяване на данни, включително повреден mdf и outlook софтуерни продукти за ремонт. За повече информация посетете WWW.datanumen.com