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