1樓:
僅變這道題而言,直接使用 excel 自身的刪除重複項段公升功能會更簡握數老單:
選擇這塊去除重複的區域;
主選單中選擇「資料」→「刪除重複項」;
根據提示,預設「資料包含標題」選中,畢迅點選「確定」按鈕即可。
2樓:網友
這個問題雖然已經完結了,不過我還是說兩句吧。
你這個問題其實不必用字典,有更簡單的方法。
就是刪除重複項那個辦法,你錄個巨集,讓**自動實現刪除重複項的動作。
兩旅汪伏句**搞定。
sub shishi()
range("a1:d7").copy range("g1")range("g1:
j7").removeduplicates columns:=array(1, 2, 3, 4), header:
xlyesend sub
這段**的意思是:
把a1:d7複製並貼上到g1
把g1:j7刪除重複項。
就這麼簡單。
注意有可能修改的引數:
header:=xlyes,表示這個區域包含一行標題。如果沒拆攜有標題就改成header:=xlno
array(1, 2, 3, 4),表示這個陵閉區域的列數的陣列,共有幾列就是1至幾。
3樓:帳號已登出
可以啊,用字典來處理把abcd作為關鍵字。
excel (求助)用vba自動提取不重複姓名
4樓:網友
舉例說明。
要求將a列姓名取出後去除重複值,然後輸出到c列。
第一步:點選開發工具-visual basic。選擇sheet1,輸入**如下:
sub 姓名去重()
dim jgarr(1 to 100)
zz = 0
sheets("sheet1").activateset zd = createobject("")hh = 2
do while cells(hh, 1) <""
if not , 1).text) thencells(hh, 1).text, zzzz = zz + 1
jgarr(zz) = cells(hh, 1).textend if
hh = hh + 1
loop輸出結果。
range("c2:c100000").clearcontentsfor i = 1 to zz
cells(2 + i - 1, 3) = jgarr(i)next i
end sub
vba判斷某一列是否有重複值
5樓:明佳妙明
excel怎樣快速提取不重複資料個數。
個數大於1有重複。
sql怎麼不重複記錄,sql 怎麼查詢不重複資料
alter table table a add purchase price number a表沒有purchase price列 首先給表a加一列。insert into table a purchase price select purchase price from select table ...
EXCEL中用VBA提取符合條件的數
寫好了,測試通過了 option explicit sub dim arr,arr1,arr2,arr3 dim i,j arr1 array 1,0,3,6,9 arr2 array 1,4,7 arr3 array 2,5,8 i j65536 end xlup row j i while i ...
如何在excel數不重複的名字
見截圖a2 a10中不重複名字的個數在c3 c3輸入 sumproduct 1 countif a2 a10,a2 a10 製作baiexcel 有時輸入excel單元格 du時要求輸入數值的唯一zhi性dao,我們可以通過 專 資料有效性 來防止重複輸屬入,如身份證號碼的輸入 選中需要輸入身份證號...