excel的vlookup數據表有篩選?
在EXC
vba怎么判斷單元格內容重復?
方法/步驟
首先創建一個空白的EXCEL2003文檔,然后點擊視圖-工具欄-表單,方便使用命令按鈕操作宏。
第二,拖出命令按鈕。點擊表單工具欄上的選擇命令按鈕——在EXCEL表格上畫一個框命令按鈕就出來了。
第三,重命名命令按鈕。為了便于操作,命令按鈕是根據其用途來命名的。點擊命令按鈕的文本框-刪除原文-回車:確定重復數據。所以它改名了。
四、打開命令按鈕代碼編輯窗口:右鍵單擊命令按鈕——指定宏——創建——會彈出代碼編輯窗口。
第五,在代碼編輯窗口中,您可以更改sub開頭的宏名,修改易于理解的宏,或者您不不需要修改它-然后在中間輸入下面的代碼:
Dimarr,brr()
DimI為整數,j為整數
DimDict作賓語
出錯時繼續下一步
設置字典CreateObject(scripting.dictionary)
帶活動表
數組相交(。使用范圍,。列(1))
從I1到UBound(arr)
如果字典存在(arr(I,1)),那么
(arr(I,1))1
其他
(arr(I,1))1
如果…就會結束
接下來我
從I1到UBound(arr)
jj1
ReDim保留brr(1到j)
Brr(j)IIf((arr(I,1))1,唯一,重復)
接下來我
(2).清除內容
。范圍(b1)。調整大小(UBound(brr),1)(brr)
以…結尾
第六,編輯后關閉退出V。BA編輯器-在A列輸入數據-輸入完成后,點擊命令按鈕確定重復數據,則副本會顯示在b列,如果是唯一的,則顯示。