今天朋友问了我一个这样的问题,他要删除100个工作簿的第一个工作表特定行的最后6列,
他问我有什么方法,他不想一个个打开一个个删,这样很费手。我想了下,在保证他每个工作簿所要的工作表正好都是第一个的前提下。我给他写了这样一段代码。
Sub aa()
h = [dz1].End(xlToLeft).Column ‘判断最后一个非空的列
For i = h To h – 5 Step -1 ‘循环
Excel vba 锁定单元格的代码介绍
文章介绍vba 锁定单元格的方法以及屏蔽撤销保护锁定单元格警告框。 第一,vba 锁定单元格 vba 锁定单元格是怎样的操作流程呢?下介绍vba 锁定单元格的方法: 在excel工作表中,选中需要锁定的单元格区域,也可以不选择单元格,按ALT F11,打开VBE编辑器,单击插入——模块,
Columns(i).Delete ‘满足条件行的删除
Next
End Sub
我上面选dz1的原因是保证从一个较大的列标向左取,dz基本是快第100列。肯定是可以的。
这样的话,最后6列就被删除了。VBA的操作是不可逆的,所以操作前我们应该要先备份数据,这本身就是工作的良好习惯养成。100个工作簿就能很容易的搞定了。
这几段VBA代码,看似很简单的。但也要花些功夫去学习的。而且首先要先去熟练函数,然后才适合去涉及VBA.
Excel VBA中实现数组排序的多种方法
VBA里面没有现成的Sort方法可以使用,在ExcelVBA里面要对数组进行排序,现有的通常做法:1,通过单元格赋值以后利用工作表里的Sort方法进行排序,2,通过SQL实现,也需要调用单元格区域存放数据,3,直接写循环语句通过算法来实现。 除了上述方法以外,借助一些其他语言工具与VBA相结合,也能利用现成的排序功能来