1樓：綠衣人敲門
對於刪除重複資料，excel 2007中有一個功能可以刪除，不需要vba程式設計。
方法：選中重複資料出現的單元格區域→「選單」欄→「資料」→「刪除重複項」→點選「確定」即可如圖：
2樓：匿名使用者
在excel開啟控制元件工具箱，在excel中新增一個button（commandbutton1）。
然後在button上滑鼠右鍵->檢視**，在vba編輯介面中，將下面的**拷貝進去。
private sub commandbutton1_click()dim cell
for each cell in sheets("sheet1").range("a1:a40") //->"a1:a40"這裡換成你需要清除資料的單元格編號就可以了
dim content
content = cell.value
content = 空值
cell.value = content
next
end sub
3樓：匿名使用者
'任選 一句**
sub test()
'刪除a列內容
columns("a:a").clearcontents'刪除a列
columns("a:a").delete shift:=xltoleft
end sub
4樓：匿名使用者
sub test()
for i = 1 to 65535
worksheets(1).range（"a" & i & "）.select
selection.clearcontentsnext i
end sub
vba中怎麼清空工作表中的資料
5樓：匿名使用者
比如你要清空a1：b16單元格資料，用 range("a1:b16").clearcontents
比如你要清空整個工作表資料用 cells.clearcontents
既要清空資料，又要清除格式 把 clearcontents 改成 clear
6樓：匿名使用者
1,用vba刪除a1:h18內的內容：
sub 清除內容()
range("a1:h18").clearend sub
2，刪除整行內容：
range("a1").entirerow.clear3,刪除整列內容：
range("a1").entirecolumn.clear4，刪除活動工作表的所有內容：
activesheet.cells.clear
在excel表中，如何使用vba編碼，將一列的值進行清空
7樓：匿名使用者
清空列：
sheets(表名稱).columns(輔助列的數值).clear如表名稱：tab1 輔助列在d列
sheets(「tab1」).columns(4).clear剩下的就是建立兩個變數陣列 然後賦值輸出到輔助列的簡單問題了。
8樓：匿名使用者
假設a1是設定了資料有效性的單元格，輔助列在g列，要把a1的值放在g1可用下面**： private sub worksheet_change(byval target as range)
if target.column = 1 then [g1] = [a1] '裡面加粗的1表示第一列即a列，指設定了有效性的所在列
end sub
在當前工作表名稱處點右鍵，檢視**，然後貼上上面**就ok了。只要a1的值改變g1就會跟著改變，如有問題請追問。
9樓：**小六
range("g1:g10").select
selection.clearcontents
10樓：姓王的
這個比較簡單，但你的表述不是很清楚，我理解的話就用不著vba了。能不能舉例描述？
在excel表中如何使用vba程式自動篩選出符合條件的資料並刪除
11樓：匿名使用者
一般採用倒序的方式：例如，將d列中為「否」的整行刪除：
sub test()
for i = cells(rows.count, 4).end(xltoup).row to 1
if range("d" & i) = "否" thenrange("d" & i).entirerow.deleteend if
next
end sub
12樓：匿名使用者
假定你刪選的條件是單元格資料》10
sub test（）
set a=thisworkbook.sheets("sheet1")
dim mycell as range
for each mycell in a.usedrangeif mycell>10 then
mycell.clear
end if
next
end sub
vba,如何清理某個工作表範圍內的資料
13樓：善良的豬頭
with sheets(1) '1 表示第一工作表，可以改成你需要的
.range("a1:g37").clear '清除range("a1:g37").所有內容
end with
.range("a1:g37").clearcontents '清除range("a1:g37")的內容，但保留其格式設定
14樓：姜年尚
1,如圖，用vba刪除a1:h18內的內容：
sub 清除內容()
range("a1:h18").clearend sub
2，刪除整行內容：
range("a1").entirerow.clear3,刪除整列內容：
range("a1").entirecolumn.clear4，刪除活動工作表的所有內容：
activesheet.cells.clear
vba 刪除excel中指定單元格
15樓：我是來嚇寶寶的
點選**輸入如下**即可
sub aa()
dim rng as range
for each rng in range("a2403:b2450")
if rng = 0 then rng = ""
next rng
end sub
16樓：q城裡城外
刪除單元格內容：vba中輸入：range("a1").clearcontents，可清除單元格內容
刪除單元格，下面的單元格向上：range("a1").delete shift:=xlup
17樓：
回答開啟含有格式的excel資料表
2/5按下alt+f11開啟vba編輯介面，點選左上角資料所在工作表，出現**編輯
3/5輸入**：
sub 魚木混豬()
range("b2").clear
range("b3").clearcontentsrange("b4").clearformatsend sub
**作用：b2全部清除，b3清除內容，b4清除格式，4/5滑鼠點選**中間任意位置，然後點選「執行子程式」按鈕5/5返回excel，就可以看到相應單元格清除後的效果更多18條
18樓：但夏侯波
range(a7:g7)是要刪除的區域；若行號以變數row表示，則寫成range(a&row&:g&row 。
xlup表示刪除指定區域後下方單元格上移。
給你介紹一個獲取vba編碼的一個小方法，就是採用excel的錄製巨集的功能。依次選擇 工具-巨集-錄製新巨集，這個時候就出現一個小圖示，不要關閉他，在excel的sheet上面進行你想要進行的操作，操作完畢後，點選那個小圖示上的停止錄製按鈕。然後再依次選擇工具-巨集-巨集-選擇剛才的巨集的名字，然後點選編輯按鈕，就可以看到你剛才所做操作的所有的vba**，你可以對你的程式進行參考。
excel 怎麼用vba刪除含有某個數值的行
19樓：匿名使用者
find某個值,獲得這個值的行號,刪除某行.
或者dictionary讀入某個值所在的行,然後dic.exit(某個值),如果存在這個值得,刪除此行.
20樓：受梅昌陶宜
刪除很是很慢的，如果刪除後剩餘資料量不是太巨大，可以把要的資料取到陣列中，清空內容後輸出；如果刪除的資料較少、剩下的資料巨大，可以增加輔助列，掃描時候更新輔助列數值，然後按照輔助列排序，可以把需要刪除的部分排到末尾，然後一次性刪除行或者清除內容。
EXCEL資料問題用VBA處理
終於弄明白你的意思了。修改一個通用的 sub 一次的數 dim arr dim ir x y i dim k t t1 set d createobject scripting.dictionary ir range a65536 end xlup rowarr range a1 a ir valu...
請問如何用VBA將EXCEL檔案中的資料複製到別EXCEL檔案相同的位置
sheet1的區域a1 c3拷貝到sheet2的區域a1 c3 sheet1.range a1 c3 copy sheet2.range a1 c3 丙雅弘雨凝 sub aaa dim sh1 as worksheet dim sh2 as worksheet set sh1 workbooks 1...
Excel表中通過VBa對比資料的語句
你給的資訊太少。比如具體哪些部分出問題了。另，你這麼寫肯定是有問題的，巢狀太多了。一般來說3層，最多4層巢狀是規範。你這個完全可以用lookup，或者find來實現。檢查下是否沒核對出來的資料中包含空格或換行等，可以去掉空白字元後再比較。如何將excel工作表的資料與access的資料做比較，檢視是...