在設計學(xué)生學(xué)號和成績(jì)表的Excel中，有的時(shí)侯要求數據是不能重復的，如學(xué)號、電話(huà)號碼等，但是我們在輸入的時(shí)候經(jīng)常出現錄入重復的情況，特別是個(gè)別不認真的班主任，造成我們在期末發(fā)布成績(jì)的時(shí)候出現很多問(wèn)題，同一個(gè)學(xué)號居然對應幾個(gè)學(xué)生，怎樣檢查數據的唯一性并將重復數據刪除呢。研究后找了三個(gè)方法。
方法一
假如在A(yíng)1至A25單元格區域內有學(xué)號，為檢查有沒(méi)有重復的學(xué)號，則在B2單元格內輸入公式“=countif(A:A,A2)”，然后選定B2單元格，向下拖動(dòng)，直到B25為止，在B列，則出現了左側學(xué)號出現的次數，將重復數據手工刪除即可。
方法二
選定A2至A25區域，單擊“格式”-“條件格式”，在條件1欄內選擇“公式”，在公式欄內輸入“countif(A:A,A2)>1”。然后，在單元格格式內選定“圖案”，將圖案顏色設置成紅色，點(diǎn)擊“確定”后，則有重復學(xué)號的單元格顯示為紅色。手工刪除重復數據即可。
方法三
喜歡用VBA編程的朋友可以采用編寫(xiě)VBA代碼的方法，讓計算機自動(dòng)找出重復數據并自動(dòng)刪除重復行。具體過(guò)程不一一敘述，代碼如下：
Private Sub tj()
Dim i As Integer //定義I為整型變量
Dim j As Integer //定義J為整型變量
Sheets("Sheet1").Select //選定“sheet1”工作表
i = 2 //給i賦初值，即從第二行開(kāi)始
Do While Cells(i, 1) <> "" //當單元格為空時(shí)退出循環(huán)
j = i + 1
Do While Cells(j, 1) <> "" //當單元格為空時(shí)退出循環(huán)
