1樓：網友
**解析：mydelblankrow過程刪除工作表中已使用的區域的所有空行。
a) 第5行**獲得工作表中已使用區域的首行行號，其中使用usedrange屬性返回工作表中已使用的區域。
b) 第6行**獲得工作表中已使用區域的最後一行行號。
c) 第7行到第11行**從最大行數至最小行數迴圈判斷指定行是否為空行，若為空行則刪除該行。
d) 其中第行**使用工作表counta函式判斷當前行已使用單元格的數量，如果為零說明此行是空行則使用delete刪除。
e) usedrange屬性應用於worksheet物件，返回指定工作表中已使用區域的range物件，即返回工作表中已使用的單元格區域。
f) 表示已用單元格第一行的序數； 表示已用單元格第一行的行數；
g) 方法 用於計算非空單元格及引數列表中值的個數。
h) 表示選中rows(i)行的非空單元格的個數。需要注意點是：此處一定要從最大行數至最小行數開始迴圈判斷，因為如果工作表中存在兩行及兩行以上的相鄰空行，從最小行數開始迴圈刪除的話，當第一行空行被刪除後，被刪除行下面的一行會往上移位，而此時for...
next迴圈的計數器已經加1，所以會出現漏刪除的現象。執行mydelblankrow過程工作表區域所示：
2樓：眯住眼串針
for下面那句改為以下。
a:a").specialcells(xlcelltypeblanks).
vba中怎麼清空工作表中的資料？
3樓：惠企百科
首先我們開啟乙個工作樣表作為例子。
excel中使用vba清除工作表內容。
option explicit
sub ddt()
range(,range("a1").clearcontents '清除活動工作表上單元格a1中的內容。
清除選定區域內容。
range("a1:d4").clear
end sub
excel中使用vba清除工作表內容。
前兩句**是選擇有資料內容的單元格，我做了註釋標籤，在**中不執行。這裡我先做乙個簡單的例項。使用range函式並選擇了a1單元格，然後使用clearcontents命令來清除掉a1單元格中的內容。
excel中使用vba清除工作表內容。
第二行**是指選取單元格區域後執行巨集，則清除掉所選區域的內容。
excel中使用vba清除工作表內容。
最後一行**更明晰，首先設定單元格區域為a1：d4，然後使用clear命令清除單元格包括格式在內的所有資料，這也是clear和clearcontents的區別。
excel中使用vba清除工作表內容。
實際操作一下，我現在把單元格中的字型修改為華文琥珀，並將字型大小設定為72，這時候單元格格式發生了變化，我使用clearcontents對單元格進行清除內容並不會更改單元格的格式。
excel中使用vba清除工作表內容。
而使用clear命令清除內容，單元格格式會恢復成預設值。
excel中使用vba清除工作表內容。
excel vba 刪除空白單元格所在的行
4樓：惠企百科
1、首先在開發工具中開啟vba器。
2、在單元格區域當中輸入一些內容。
3、在vba器中插入模組。
4、在模組當中輸入如下**，然後執行sub 清除空白資料行()dim i as longfor i=cells(1048576, 2).end(xlup).row to 3 step-1if cells(i, 3)="then'如果單元格為cells(i,1).
符合條件的都刪除整行end ifnext'檢測下乙個end sub。
5、用快捷鍵。
alt+f8調出執行巨集視窗，然後單擊「執行」按鈕，程式執行後第三列為空白之單元格所在行全部刪除。
excel vba 自動刪除空白行
5樓：信必鑫服務平臺
1、開啟要刪除空白行的文件。
2、alt+f11開啟vb器，右鍵新建乙個模組。
3、新建模組後，輸入。
sub 刪除空行()
dim aa = 1
do while cells(a, "a")if cells(a, "d") thenrows(a).select
shift:=xlup
elsea = a + 1
end if
loopend sub。
4、輸入**後，在工具欄中找到開發工具——巨集，點選執行命令。
5、找到並執行刪除空行的巨集，然後點選執行。
6、執行完成後，就可以把空白行刪除了。
vba中怎麼清空工作表中的資料
6樓：網友
比如你要清空a1：b16單元格資料，用 range("a1:b16").clearcontents
比如你要清空整個工作表資料用。
既要清空資料，又要清除格式 把 clearcontents 改成 clear
7樓：匿名使用者
1,用vba刪除a1:h18內的內容：
sub 清除內容()
range("a1:h18").clearend sub
2，刪除整行內容：
range("a1").
3,刪除整列內容：
range("a1").
4，刪除活動工作表的所有內容：
如何快速刪除工作表中的空行
以下幾種方法可以快速刪除空行 方法一 如果行的順序無關緊要，則可以根據某一列排序，然後可以方便地刪掉空行。方法二 如果行的順序不可改變，你可以先選擇 插入 列 插入新的一列入在a列中順序填入整數。然後根據其他任何一列將表中的行排序，使所有空行都集中到表的底部，刪去所有空行。最後以a列重新排序，再刪去...
如何SQL語句就刪除表中所有的資料
用sql語句一次清空所有資料.找到了三種方法進行清空.使用的資料庫為ms sql server.表之間不能有外來鍵關係 1.搜尋出所有表名,構造為一條sql語句 declare trun name varchar 8000 set trun name select trun name trun na...
如何SQL語句就刪除表中所有的資料
刪除tablea表中的所有資料 delete from tablea sql怎麼刪除乙個表中的所有資料 刪除表資料有兩種方法 delete和truncate。具體語句如下 一 runcate table name 刪除表中的所有行，而不記錄單個行刪除操作。在這個指令之下，中的資料會完全消失，可是 本...