您的位置: 首页 > EXCEL技巧 > ExcelVBA >

用VBA删除单元格、行和列

时间:2014-10-12 整理:docExcel.net

如果要用VBA代码在Excel工作表中删除指定的单元格、行和列,可以使用下面的代码:

Sub DeleteCellRowColumn()
   '删除活动单元格,下方单元格上移
   ActiveCell.Delete Shift:=xlUp
   '删除选定的区域,右方单元格左移
   Selection.Delete Shift:=xlToLeft
   ' 删除行或列
   Range("B2").Select
   Selection.EntireRow.Delete
   Range("F2").Select
   Selection.EntireColumn.Delete
   End Sub

 

 

 

 

 

用VBA删除单元格、行和列 问题:用VBA删除单元格、行和列
回答:如果要用VBA代码在Excel工作表中删除指定的单元格、行和列,可以使用下面的代码:Sub DeleteCellRowColumn()    '删除活动单元格,下方单元格上移    ActiveCell.Delete Shift:=xlUp    '删除选定的区域,右方单元格...
VBA删除工作簿中的所有批注 问题:VBA删除工作簿中的所有批注
回答:用下面的VBA代码可以同时删除工作簿中所有工作表中的批注: 1.按Alt+F11,打开VBA编辑器。 2.在代码窗口中输入下列代码 Sub RemoveAllComments() Dim sht As Worksheet Dim cmt As Comment For Each sht In ActiveWorkbook.Worksheets    For Each cmt In sht....
在EXCEL中,若C列的某些单元格为空,则将该单元 问题:在EXCEL中,若C列的某些单元格为空,则将该单元格所在的整行数据删除 应该怎样操作?
回答:可以考虑做个自动化的程序,只要是C列的单元格是为空,则此单元格整行就自动删除就行了,这个须涉及到VBA方面的知识,也可以采用手...
VBA删除工作表中的重复行 问题:VBA删除工作表中的重复行
回答:如果要在Excel中用VBA的方法以根据某列内容删除重复的行,即当某列有重复数据时仅保留一行,可以用下面的VBA代码。假如以A列为参考,工作表的第一行为标题行,数据从第二行开始。 方法一:用工作表函数CountIf判断该行是否...
用VBA删除空行和空列 问题:用VBA删除空行和空列
回答:在Excel中删除空行和空列的方法有很多,下面的方法是用VBA代码来删除工作表指定区域中的空行和空列: Option Explicit Sub Delete_Empty_Rows()   Dim rnArea As Range   Dim lnLastRow As Long, i As Long, j As Long    Application...
用VBA进行多表合并计算一例 问题:用VBA进行多表合并计算一例
回答:...工作簿中某两个工作表中的数据,区域的起始位置都是E5单元格: 方法是:将要存放合并数据的工作表命名为“汇总”,删除工作簿中没有合并数据的工作表,各工作表中要合并的数据右侧和下边没有其他数据。然后在VBA...
相关知识:

下面内容对您也许有用

      话题:如何用VBA删除单元格中的内容
      问:表格中有大量数据,想删除小于12或者大于等于30000的数据,有多个工作表如何
      答:Sub tt()Dim rng As Range For i=1 To Sheets.Count For Each rng In Sheets(i).UsedRange If rng 12 Or rng =30000 Then rng.Delete Next Next End Sub 记得加分 用VBA如何将列中单元格相同的 如何使用VBA 根据单元格里内容
      话题:请问如何使用vba删除某一列单元格的中包含某特定字符所在的行_
      答:Sub Macro1()A=InputBox("请输入需要删除包含的某特定字符","输入框",v)j=Trim(InputBox("请输入需要选择的列号","输入框",1))For k=j To j For i=1 To 65535 求excel宏代码:多条件删行,把C 请教,如何使用Excel VBA 删除
      话题:请教,如何使用Excel VBA 删除某列中单元格文字相同的行?
      问:某列1至5行分别是:A、B、C、A、B。删除重复后1至3行分别为A、B、C。谢谢。
      答:从后面往前删除就可以保持前面的位置。Private Function MyFunction9()Dim I As Long,J As Long For I=1 To Range("A65536").End(xlUp).Row '最大行数 For J= 如何用vba程序改变excel单元格内 Excel VBA 如何把单元格中的多行
      话题:如何用VBA删除选定单元格所在的行?请注意是删除一整行,而
      问:假设现在我选定了A3:B4这个区域,怎样写代码来删除第三第四行?注意是删除这两
      答:Selection.EntireRow.Delete 你录制宏看一下就行了 vba删除可见单元格整行,第一行 求教高手:VBA 单元格符合条件整
      话题:如何使用VBA 根据单元格里内容进行删除单元格
      问:例如L列中有N个GOOSE与N个SV两种内容,确定L列中出现GOSSE的信息整行删除。谢谢
      答:'给个代码,不过,你给的题里的单词拼写前后不一样,我在程序中是查找“GOOSE”如果要改成“GOSSE”请自己修改一下,特此提醒。代码如下:Sub 删除()x=Range("L excel中使用vba实现单元格计算的 excel 中 怎么使用vba将sheets(1
      话题:请教,在Excel 中,如何使用VBA 删除所有空行?该工作表仅有一
      答:假设你数据在A列 Range("A:A").SpecialCells(xlCellTypeBlanks).EntieRow.Delete excel VBA提取工作表中单元格 Excel中,使用VBA以某一单元格
      话题:当指定单元格有数据时删除该行,用VBA怎么实现?知道
      答:以下代码能满足你的要求。Sub ABC()For i=[H65536].End(xlUp).Row To 5 Step-1 If Range("H"&i).Resize(,14).SpecialCells(2).Count=14 Then Rows(i).Delete 请问如何用VBA实现删除选中的 如何使用VBA 根据单元格里内容
      话题:求VBA代码:删除F列单元格为空且E列单元为“0”的行。知道
      答:Sub deleterow()dim r as long,lastrow as long application.screenupdating=false lastrow=sheet1.usedrange.rows.count-sheet1.usedrange.rows(1).row+1 for r 求VBA代码:删除F列单元格为空且 求助 使用VBA 删除单元格内相同
      话题:在EXCEL中 如何用VBA查找某特定单元格并返回该单元格的行和列
      问:步骤:1)找到内容为Weight/Mt Contents的单元格(这个单元格在sheet中肯定是
      答:dim flag as boolean flag=false for i=1 to usedrange.rows.count for j=1 to usedrange.columns.count if cells(i,j)="Weight/Mt Contents"then Rows(i+1). Excel VBA 查找到的单元格位置 如何用excel vba查找某一行最后
      话题:怎样用vba显示选择区域的第一个单元格的行的数值,列的数值_
      问:选择区域为a,a表示的是一个较大的选择区域,a.rows表示的是选择区域所有的行的
      答:a.rows的编号是从1开始的,a.rows(1)表示的就是a区域的第一行 如果你要获取a区域的第一个单元格单元格地址 可以这样写:a.rows(1).cells(1).address(0,0)或者:a. excel如何用vba选择当前选定单元 EXCEL VBA 我想选择A列中有数据
最新评论