excel设置宏实行一键清除数据

最近在做阅读精英分析，需要处理大量的数据，很多数据呢都是不需要的，需要进行清洗，如果一步步手工筛选的数据，就会消耗大量的时间，所以呢我就用录制红功能一键清洗数据，大大提高工作效率。今天就跟大家分享一下怎么用容易上手的录制红功能来实现一键清洗数据。那这样一个数据，如果我们只想要黄色的列， 会计科目是办公费用的数据，那我们用红来实现，我们用习近视线设置好了红一，我们点击红， 那这里有没有发现运行结果，就是自动帮我们删除了标黄的列以及科目四办公费用的行，而且呢他还自动新建了一个文件夹，那这是怎么实现的呢？我们看一下怎么录制红。首先我们打开文件， 在文件的更多功能下面选项，选项的自定义功能区，我们找到开发工具 勾选确定，然后我们看到开发工具之后呢，我们要用录制红这个功能，点击录制红， 命名为红一确定，然后我们要开始他会开始录制我们的行为，我们把不需要的数据都删掉，删除，只保留需要的数据，然后我们要筛选， 我们只需要科目为办公费用，在选文周数据，结果呢，我们需要他帮我们自动新建一个一个表，然后命名为办公费用， 录制完之后点击停止录制，然后我们要把这个红保存，点击文件另存为，然后桌面 我们要这里要记住是启用红的工作部，然后为命名一下红一， 这个时候呢，我们第三步，我们要把红设置为快捷键，每次我们用的时候方便使用，那怎么办呢？找到选项，选项卡运营功能区，加拉工具下面一个组，重新命名为一 确定，确定之后我要把常用命令下面有个红功能，找到我们录制好的红，拉到这个红音下面添加过来。好，这个红就过来了，点击确定， 然后我们可以看到在开发工具栏右上角有一个红衣，那这样的话每次就可以使用了。对于同样格式的表格，任何重复现场操作都可以用录制红功能来帮忙实现。它的原理就是录制一遍你的行为，非常简单吧，你学会了吗？

大家好，今天跟大家分享 v b a 代码，完成简单的数据复制与清除。我们先看看代码， 代码很简单哦，就两段，现在我们先把代码删掉，然后再重新来写，空键也删掉。好了，代码我们重新开始写， 先写数据移动的代码 sub 后跟上我们这段红的名字，名字我们就写 it， 现在这里是表示我们单元格的区域， value 是表示这个单元格区域的值， 看一下这个就是等下我们要给他复制的区域，然后再等于等于后面是我们要复制的区域，就是我们要把等号后面区域的值复制给等号前面区域， 这里也要加上点 value。 好了，这样一段代码就写完了，然后我们用同样的方式把数据清除的代码也写了， 这里就是将空值复制给要清除单元格区域，这里我们可以复制上面的所有代码就写完了，是不是很简单，现在我们用两个空键来执行刚写的代码， 这里选择刚刚我们命名的红名称就行，我们先开试试效果，嗯，效果实现了， 现在再把我们的空间名字改一下。 vba 代码其实没有想的那么难，两段代码实现轻松两个功能， 每天学习两段代码，你也可以轻松实现用 v b a 办公。

w s 中一键清空指定单元格内容，输入区存储的数据图片控件，添加照片开发工具，点击设计模式，添加个清空按钮， 需要清空内容的单元格，使用 e i 鼠标通过 v b a 清空制定单元格内容，复制代码到表格中清空图片空间中内容， 复制代码退出设计，点击清空按钮测试。

in this video we'll see how to work on the clear option when it's a clear option in the home tab if you see on the right hand side you get this option as clear option that is clear all clear formats， clear contains clear comments and hyperlinks how do you use it with help of macros？ okay so i'll just remove this now if you see i have some data the sheet name is p under school clear the file name is xl vba okay and if you see there's some data given now i've tried to format that data with the background if you see a low background there's something as high pulling there's something as bold italic underline and there are some comments if you see it is also given here now if i want to remove this comments one by one if i want to remove the hyperlinks or if i want to remove the formats with delt of macros how do i do that so you can see the text which is returned in a1 to aden i'll use it with delt of this vba editor i'll open this vb editor at this place okay these are the names of the sheets so i'll minimize these sheets now okay these are the names of the models which are given the model name is speak clear if i want to clear some data here how do i do that so in that module i've created a procedure sub clear okay and how do i clear the things range 81 to 810 dot clear formats so if i say clear formats it will clear all the formatting not the text when i say range a1 to 18 dot clear comments so the comments which you can see those will be cleared all by 1 by 1 next if you see that's a range 81 to 18 hyperlinks so if you see in the cell number， four five and six i've applied some hyperlinks that would be removed from that place if i say range a one to eight and not clear everything will be cleared formats contains hyperlings everything okay so let us see that if i want to execute that step by step i can use f8 from a keyboard or shortcut or else in the debug toolbar you can see this option step into so i'll just click on this step into you see that step into click on this place now the very first thing is the formatting will be cleared from cell number 81 to 810 click on step into you see the formatting went away okay if i click on this clear comments again if i say step into the comment part have been gone away next is clear hyperlings you might think there are no hyperlings how we look clear i'll show you the hyperlings which are given if i go to this place okay if i click on the cell okay still a six cell number is having a hyperling if i click on that place okay the hyperling will open up a page that is some hyperling that is totalspoint com the same way page it will open i'll just close it so still the hyperling is still available but the automats have been gone away if i go back to my vb editor and if i click on this f8 option okay this high pullings also will be gone if i go back and check okay if i go and click on this place the i pullings are not there and they have been removed if i go back to that place again and if you see range a 1 to 8 and dot clear that means all the data whichever skin will be clear from that place if i click on step into and if you see the interdata has been gone away and finally i'll close this sub procedure which is given here right so i hope it's very very simple and easy like clear formats clear comments clear hyperlings and finally if you want you can just clear everything by putting clear option i hope you have understood that's all for this video。

今次我们来演示一下清空单元格的几个功能，可以看到这里有一段数据，其中包含一些课程名称，然后有的单元格上面有背景颜色和其他的一些格式，并且有的单元格上面有批注， 接下来我们要做的就是依次清除他们。首先我们点击清空批注按钮，可以看到所有的批注都已经清除了，然后我们点击清空格式按钮，可以看到背景颜色以及对齐还有字体的一些格式都清除了。 最后我们点击清空文本按钮，可以看到单元格内容已经消失了。如果你有一些需求，需要对特定的单元格进行一些特定的清除操作的话，能够用这些清空的功能进行一个搭配组合的话，那么你的工作效率将会事半功倍。

vba 红代码如何一键删除不需要的空闲工作表？大家好，欢迎观看本期 vb 红的实战教程。这节呢我们用 vb 呢来讲一个 p 处理的一个案例，就是如何让一键去删除啊？我们不需要的一些空的工作表， 比如说我们在做很多表之后是吧？我这表格用了，比如说用了一年了，或者用了几个月了，然后呢里面有很多空空的表，是吧？当时忘记删除量，里面很多空表，那如何去给他删掉呢？啊？我们来看一下这个代码该怎么做。首先的话我们插入一个新的模块， 这边呢名字叫做啥？删除空点，那我们的思路是这样的哈，思路是这样的，比如说哈，我们这边哈有很多，对啊，很多这个空的文件，有的呢，有的是有数据的，有的是没有数据的，比如说 十七和十九有数据，这十八、十六十五是吧？前面三个没有数据，这空边呢，我想把它删除掉，那怎么删除量呢？可以这样去执行。我们下啊写一下。 首先我们去循环便利工作表是吧？就循环每个工作表包一尺啊，表是吧，因什么呢？在手表集合当中，去去去循环啊，这是经常用的哈。哎，循环便利工作表这个套路方法，如果说这里哈 应该是什么？呃，首页是不检测的是吧？首先哈他这名称，他的名称不能等于首页，除了首页是吧，那个不等于首页， 然后我们在这里面去执行啊，除了首页的是吧？去执行，这边执行什么呢？啊？在里面的时候呢啊，我去看一下啊，我这边在上面变成 s 啊，我们去看一下，那我们的 思路是这样啊，比如说我堵到这个表巡航这个表我就查一下这里面哈有几个飞空数据是吧？如果有零个飞空数据的话说明什么？说明这里面没有数据就把它删掉就行了，如果有一个或者两个说明有数据就不删啊，这样一个原理啊。对，好， 那如何去获取一个表里的费空数据呢？哈，我们可以用于什么呢啊？哎，内部调函数是吧啊？大家都知道哈函数卡沃塔可以检测一个表里面有没有这个费空数据是吧？卡沃塔啊，这时候我们长期谁呢？长期所有的单一格，所有单一格的集合叫赛尔斯啊， 欢迎所有代购。那这里如果说哈 s 是什么？等于零等于零什么面一个字符都没有是吧，然后呢我们给他直行删除。直行什么啊？注意哈。呃，康他谁啊？康他这个这个什么循环那个表的四 s 这里要写上个表明是吧？比如说，比如说我需要这个表的，我就查看看他这个表里面有没有非空数据这个意思啊。所以说这个地方加上这个表明分表明，那如果 s 点零意味着什么，这个表就可以删除掉了 啊。当然哈，我这个地方是以检测零为主是吧，就一个字符都没有，但是如果说，哎小于十个字符了都删掉是吧，你就写个小于十也行，写个十也行。好吧。嗯，这个地方就以以零为准了。 ok， 好，那这个代码大体就这样啊，我们来看一下。就这么简单啊，那我们删除完成之后呢哈弹出一框来 什么？呃删除完成，好，我们来试一下啊。那对啊，这里还有个问题啊，还有个问题，就说我们在删除的时候哈， 这个表默然会有个提示哈，会有个提示，所以说哈，我们再使一下就关闭啊，删除提示提前写一下啊，删除这个关闭提示怎么去关，怎么怎么去关闭呢？哎，可以用一个 apple display， alert 等一个 boss。 好吧，那我们把它呢删除完成之后呢哈，再给它开启点个处就行了。 好，你比如说哈，那如果说我要不写这个东西，我不写这个关闭哈，我们来试一下先不写是吧，我来执行，先看一下能不能删除哈。 现在这里是什么？十五十六十七十八是没有值的是吧？那我啊，我这边去插入一个形状按钮，去引用一下这个红，插入一个形状按钮，然后我点击物件去直接一下这个红，是吧？删除，空调点删除。哎 啊，删除的时候你看这用上干什么？就出现了这个什么要删除公外表呢？可能存在数据上，如果要删除这个数据的情况，确定看到没有就会有这样一个提示啊，我们就不需要这个提示是吧？啊，都给人取消哈，都取消， 然后这里的时候呢？哈啊，我们把这个提示还是开启，开启之后把它关闭提示开启啊，就这个地方先关掉提示再执行，我们再试一下 啊，你看啊，这样一下就删除完成了，也没有提示，可以看到只剩下什么十七和十八了，对吧？下面什么原来那个十五十六十八没有数据的全部都删除了，删除掉了啊，这两个就是这样一个批量啊去删除空表数据的一个案例，大家可以去自己去试一下啊， 非常简单。那所用的知识啊，都是我们未必课程第一季的知识，大家如果说想学综化办公，也可以选选择下下方的课程。好，感谢大家观看，下期再见，给多关注和点赞。

哎嘿，阿文你怎么了？哎，老板给我炒了一个文件，里面有四十多张表，要我把哪张表里面员工拍到删除，他要把表盒设置成他的格式。哎，活倒是不难，就是有点无聊，得一个一个删除和设置格式。 哈哈，那我告诉你一招，可以省一半的利息。这个东西呢，叫录制红，简单的来说就是让你的一个照自己帮你写代码，记录下你一次操作的过程，然后你可以用这个代码重复执行这次操作。打开开发工具，点击录制红，随便另一个密码，选中这一页删除， 然后设置一下表头，填充一个橙色吧，字体加粗。回到开发工具，紧急录制好了，换一张表，点击 运行，再来一张点击红执行，是不是和你之前的操作一模一样，是不是比你一张一张处理快多了，剩下的就交给你了。原来还有这个功能，太神奇了。职场办公小技巧，升职加薪没烦恼，知鸟优课联合出品。

哈喽，你好，我是 team， 那么今天第一节实战呢，我们就来录制和修改一些简单的 vba 程序，那么我们这边场景是这样子的，小新呢是个部门的文员，他每天都要从系统中下载好几个报表，但是系统报表的格式呢，都需要经过更改后才能做下一步的数据处理， 他每天都要花时间在这些简单的重复的操作上呢，让他觉得非常的没有价值，那么这种时候呢，我们就可以录制一个非常简单的红来解决这类的重复操作，那这个呢是他系统报表的一个格式，我们来看一下 他的系统报表呢会有一个自带的一个系统时间，中间呢还空了一个空行，然后这里呢又有个空列，然后呢他也希望把这个客户呢放到这个销售的后面，再看信息的时候呢会更加的方便一点， 那我们来看一下是如何操作的好，那么首先呢我们来选择这个视图下方，我们这里可以看到有一个红， 然后呢我们点击一下这个录制红好，这时候呢在这个跳出的界面中，我们第一个看到是一个红的名字，那我们首先输入一个红的名字，比如说叫销售报表。好，那么这边呢是个快捷键，快捷键呢我们比如说我们定一个 q， 这样的话我只要按这个 ctrl 加 q 呢就可以执行这个快捷键，那么你在这个快捷键中要注意一下，比如说我设置了一个 ctrl 加 c， 那么你也知道 ctrl 加 c 就是我们这 excel 的快捷键 复制跟粘贴里面的这个复制，那么如果说你这边设置的 ctrl 加 c， 它是会优先运行红，而不是运行 excel 中的这个快捷键， 所以设置时要要用一些你平常不太使用的快捷键，比如说我们像 ctrl 加 q 啊， ctrl 加 w 这些我们用的比较少，那我们就可以用这些快捷键来操作了，好，我们改成 q。 好，在这里呢，我们也 特别介绍一下这个保存在哪个工作部中，有当前工作部跟新工作部，还有那个人红工作部，那么一般情况下，我们会在选择个人红或者当前工作部，两者什么区别？ 就是我们生成的代码，如果说是保存在个人红工作部中的，那么我们下次打开任何一张 excel， 我们都可以调用这个代码，因为只要你这个个人红的这个 excel 是打开状态就可以了。一般情况下， 你如果有保存的话，系统会自动打开，那么如果说保存在这个当前工作部，那么我们调用这个红的话，就必须得打开这个我们现在这个 excel 文件，那么才能使用这里面的红。 好，那我们现在呢就把它保存在这个当前工作铺中，你也可以添加一些说明，当然你不写也没有多大关系，然后我们点击确定。好，那么这个时候呢，我们这个红就会在录制了 你的所有操作呢，它就会自动生成一些 vba 代码。好，首先我们选择 b 行，把 b 行呢删除掉，然后呢我们把第一行跟第二行选中，也把它删除掉。 好，那么接着下一步呢，我们选中这个 k 列，按一下 ctrl 加 x 就剪切操作。然后呢我们在这个销售这一点后面，我们按一下 插入剪切单元格。好，那么如果说我操作到这里，我想操作的数据都已经操作完了，格式调整完毕了，我们只要按一下这个停止录制就可以了。 好，那么这个时候呢，我们这个红就已经录制完了。 the next day， 好，现在呢我们又有这份报表了，那么这份报表呢，就是我每天当录下来的一个格式，然后呢我们看一下这个红，我们点击这个查看红，这个就是我们刚刚录制 这个报表，这个销售报表这个红，我们选中之后呢，只要点击一下这个执行，我们来看神奇的事情就要发生了，执行， 你看只要一秒钟的时间，我们就把刚刚录制的操作呢全部生成在这边了。好，那么这个是不是非常简单，但是呢如果说有一天我们想一想，如果说他这个报表系统可能他更改一些事，他变成了多加入一行。好，那么像这种情况下，我们再运行我们这个红的话， 我们执行一下就发现这边多了一行，我们没有删除掉的。那，那么这个时候我们想一下，我们是不是要重新录制一遍呢？那么假如说你录制操作也是非常多，那么就非常麻烦。好，那我们来看一下如何修改这个简单的红。 我们首先看一下你是否有这个开发工具，那么如果没有开发工具，我们点击这个文件，在这个选项卡里面选择这个字典 定义功能区呢，我们可以看到这边有个开发工具，你把它打勾就可以了，点击确定，这样的话呢，我们就可以点击这个李九 basic， 这个就是他的代码编辑界面，你也可以使用快捷键， alt 键加 f c 也可以。 我们刚刚是存储在这个当前工作部中的，所以它是存储在这个模块里面，我们双击这个模块，然后再点击下这个模块一，这个就是我们刚刚自动生成的这个代码， 我把这个格式呢调大一点，在工具下方我们选择这个选项，然后呢我们在这个编辑器格式里面，我们把这个字体呢调大一点， 改成十八，我们试一下。好，这样的话呢我们应该可以看起来比较清楚了，我们来看一下这些操作他刚刚运行的哪几步，那么这些代码你现在可能还看不懂的，没有关系，但是呢我们如果会一些英语的话呢，基本上也能看得懂。我们先选中了这个 是列吗？选中了这一列鼻到鼻列，然后呢把这个选中的这个列呢删除掉了，那么这个 lose 一杠二呢，就是我们把一到二行选中，然后把它删除掉。那么现在呢，因为我们有三行了，所以我们如果修改呢，我们再把这个一二改成三，这样的话呢我们就选中了一到三行，然后把它删除掉， 删除掉之后下面操作呢都是没有变化的。好，我们保存一下，那我们再复原一下这个工作表。好，那么我们再讲一下啊，如果说你是用使用这个 vba 进行这个操作呢？我们是不能用使用这个返回上一步操作的，所以是没有办法的，那我们手工把它复原一下。 好，然后呢我们来打开这个 v b a 这个红，好，这里呢顺便我们来讲一下如何调试这个 v b a 这个红，那按 f 八呢，我们就可以逐换的调试，我们来试一下。好，这边黄色接头呢就开始执行， 第一步选择靠拢 b 到 b， 我们看一下好，就选中了这靠拢 b 到 b， 然后呢删除掉，没有问题，下一步呢选中一到三行，这样呢就把它选中了，然后呢也删除掉，然后呢 k 到 k 列，这个 k 列呢会把它选中 好，选中之后呢他这个 cut 就是把它剪切，剪切这个操作之后呢滴到底脸，他就把它选中，然后选中之后呢他有个音色，他就是这个插入操作， 运行一下好，就把这个销售这一点剪切这一点的插入到了第一列这个位置，然后呢这边有个操作，你看 ranch d 五点 select 就是选中 d 五这个单元格， 这个其实我们可以把它删除，因为就这个选中操作呢并没有多大意义。然后呢结束了这个红，好，这样呢就完成了。那么好这一节呢，我们就讲了简单的录制一个红，然后做一些 简单的修改，然后呢通过 f 八足行的来调试。好，那么你也尽量来根据我们这个课程呢，自己来简单的操作一下。好，那么使用到这里呢，你就是一个会使用 vba 的一个高手了。好，谢谢观看，我们下期再见。

今天带来的分享是手把手教学之批量删除表格中的空段。在上期节目中，我们讲解了正文的空白段落和表格中的空白段落要如何删除， 那今天我们要处理的是一份长文档，这份文档中有很多的表格，现在我们要删除表格中的空白段落，但是不要删除正文中的空白段落，这个时候咱们就要用红来批量操作， 在 wps 中也是一样，咱们也可以批量设置。下面咱们就来手把手教学。首先咱们点击选项卡的开发工具， 如果没有开发工具，右键空白区域自定义勾选开发工具。接下来点击 video basic， 找到 nomo 右键它插入一个新的模块。接下来咱们把这个拖到右边去。首先咱们依次处理每一个表格，也就是给所有表格做一个循环，接下来循环这个表格中所有的单元格， 依次处理这个单元格中每一个段落，如果这个段落只有一个回车，那么咱们把这个段落删除。等所有的段落处理完之后，咱们读取这个单元格中最后三个字符。最后如果是回车符，回车符，单元格结束符， 那么咱们就把这个回车给他删除，这样就可以了。好，接下来咱们来写代码，首先写程序名 sub 删除表， 表格的空白段落，回车。接下来咱们要依次处理每一个表格，那这里咱们用否一直循环， 也就是 for each 表格 in active document。 第二， tables 回车。记住有始有终有 for， 咱们提前写一个 next， 也就是依次处理每个表格。有表格咱们最好给他定一下 定义， dim 表格作为一个表格 table t， a， b， l， e 这样的话呢，咱们接下来输入其他的内容会比较方便一点。 那对于每个表格来说，咱们现在要依次处理这个表格中所有的单元格，所以咱们用 for each 单元格， in 表格点 range， 点 sales， 单元格 有 for next， 做一个循环，然后有单元格，咱们要给单元格做一个定义，单元格 eyes sell。 接下来对于单元格来说，咱们要依次处理单元格中每一个段落，那现在对于每一个段落， in 单元格点 run 指点 paragraphs 有 for， 有 next， 同时段落要作为一个 paragraph。 对于每个段落来说，咱们让内容等于段落，点 range 点 text， 也是让内容这个变量等于段落的文本。既然做了变量，怎么在内容这里？ i 字变量，嗯，看不到了是吗？咱把这个调小一点， 然后如果内容等于回车 怎那么段落做一个删除，删除之后结束判定。按 的衣服好，咱们可以先运行一下，看下效果。点击上方的运行 好，现在咱们会发现所有的表格只剩下最后的回车符没有删除，所以咱们要在单元格的程序中给他做一个判定。首先让内容等于单元格最后三个字符，单元格 点 ranch， 点 text 最后三个。如果这个内容等于回车符，回车符单元格结束， 那么咱们把单元格中倒数第二个字符给它删除。所以单元格第二 range 点字符 character 哪一个呢？倒数第二个怎么表示？怎么用单元格点 range 点 characters， 字符的总数量给它减去一就是倒数第二个字符，第二 delete 结束 e 符， 那在这里咱们要注意，最后的这个符号算一个字符，所以咱们要删除倒数第二个字符，虽然它实际上是由两个字符组成，但是它仍然是一个字符。好，现在咱们点击运行 就可以了，那在 w s 中咱们也可以用红来 p 档操作，咱们点击工具， 开发工具，找到红编辑器，进来之后咱们右键 nomo 插入模块。接下来咱们写方审，注意是小写的方审空格，删除表格空白段落。 接下来输入一组英文的小括号，然后输入英文的大括号，在大括号中间敲个回车。 接下来咱们做循环，步骤都是一样的，首先处理表格 four， 按一下键盘的 tab 键，英文的小括号设置一个变量， i 等于一， 咱们让这个 i 小于等于当前文档的表格的总数量，运行完 这个运行下一个，所以咱把这个爱做一个，爱等于爱加一，简写成爱加加，英文的大括号。 接下来咱们设置表格等于当前文档的表格 tables， 哪一个呢？ itm， 英文小括号里面写上 i， 第二个也是咱们设置表格，这个变量是当前文档第二个表格。 接下来对于这个表格来说，咱们要循环每一个单元格，所以 four 再做一个变量， j 等于一，然后 j 小于等于表格的 run， 指点儿 sales， 点儿 count。 第一部分是起始值，这个变量从几开始？第二个变量是循环的条件，当他满足什么时候，这个循环会运行。 最后是循环的步数，每次加一，所以 j 加加大括号回车。同时咱们设置单元格，就等于表格点 run 指点 sales。 第二， it e， m 哪一个呢？ dj 个。最后咱们给段落做一个循环，但是要注意段落是要 删除的，对于删除，咱们要做逆序循环，所以 for 变量 k 等于单元格，点 range， 点 paragraphs。 所有的段落的数量， 循环条件就是 k 大于零， 当然这会要做逆序，所以要变成 k 减减大括号回车。 接下来咱们设置一下段落等于单元格，点 rent， 点 pyrographs， 点 it e m d k g 内容等于段落，点 range， 点 text， 这个内容是段落的文本。接下来做衣服判定，如果小括号内容等于完全等于三个等号回车，也就是杠二大括号， 那么把这个段落删除，也就是段落 range 点 delete。 注意 delete 是方法，所以要加上英文小括号。 结束完这个衣服之后，这部分段落的循环结束了。好，咱们可以先运行一下，看下结果，同样 只剩下了最后的回车，还有单元格结束符，那这一部分是单元格，也是这里咱们重新设置一下内容等于单元格点 range， 点 text 后三个字符。第二， sub str 里面写负三。 接下来做一个判定，如果这个内容是回车符，回车符，单元格结束符，那么删除回车符，所以如果内容等于回车，回车 结束。杠 u 零零零七，那么咱们把单元格倒数第二个字符 range characters， 单元 格点 range， 点 character 总数量 count 给它减去 e， 也就是把现在倒数第二个字符给它做一个删除。 delete d e l e t e 注意第一个字母要大写 好。打开窗格预览一下，咱们直接运行 好，这样就没有问题了。这就是今天所有的内容，主要讲解了用红来批量删除表格中的空白段落，而不影响正文区域。如果有所帮助的话，长按点赞，支持一下，关注一闪，留意每天 get 新技能。

好，我们讲一下表格神奇红的控电实践，今天讲的是一个秘密按钮，接下来我们回到之前的页面，我们把这页面内的内容全部进行清空， 接下来，好，我们点击一下我们所对应的开发工具。好，我们把里面的自定义窗口窗体进行删除。 好，接下来我们可以看到，当我们点击设置模式以后，我们这里面可以选择一个命令界面按钮，我们选择拖拽以后，好，在这里面就是等于说我们创建了一个按钮，那么这按钮怎么使用？ 当我们点击退出设置以后，看到没有，这时候这个按钮就可以被点击了，但是这种时候点击是没有任何效果的，因为我们还没有通过编辑器里面的代码赋予这个按钮任何操作，那么怎么赋予呢？好，我们可以首先 查看一下点击属性，看到没有，上面则是对应的这个按钮的名称， 接下来下面所对应他的值，例如他是否可以修改尺寸，我们要选择去好看到没有，他自定义修改尺寸。同样的我们还修改背景颜色， 我们可以选择红色，看到没有，同样的这种大小也是一样。 好，接下来，哎，好，接下来我们看到没有？如果说这个按钮我们想要修改它的名称，我们可以在这里面进行修改，例如体现的名称话，就比如说改成我的网名吧， 好看到没有？这时候就已经改成网名了，接下来我们这里面还可以选择， 对吧？那么这里还选择字体，我们还可以选择自色的颜色，例如我这里改成白色，好看到没有，这也是能够修改的高度，好，这可以修改一下， 看到没有，这些都是可以修改的，那么同样的我们 该怎么操作？我们可以快捷方式选择双击，这时候最下面就会出现了某，我把上面先注视掉吧。 好，下面我们可以看到前面的就是对应我们这按钮的名称，看到没有按钮的名称，接下来后面则是点击到我们单击这按钮后所谓执行的函数。好，在这里面我们首先弹出一函数法， 好，就弹出这个函数，那么我们来自行操作一遍，当我们退出设置好点击看到没有，这时候弹出一函数，点击看到没有，这样的 我们就可以通过一个代码，通过我们所对应的代码来，当我们点击这个空间以后来执行所对应函数了，就这样子吧。

in this video we'll see how to delete cells into your excel with delt pop this mac recording part let us see that i've written some example at this place the name of the sheet is q delete okay that's a delete sheet name the final name is xlbb and i've written some data at this place now usually if you want to delete any cell what to do is you just right click on this place and you press delete key you can see i'll just right click on this place and if i click on this delete option okay i get this four options which are given do you want to shift to do the left shift cells to the up intero intercolum if i click on okay， okay see my cell is selected as a4 if i click on okay， the cells should be shifted on the top you can see if i click on okay， the cells are been shifted on the top if you observe here so this way what i can do is how can i delete this option with delip of my macros there's one more thing before going there if i click on this place click on this delete okay and if you observe there's a option given us intero inter column so if you're selected this cell you want to delete the intero or inter column how it can be done with help of this macros so we'll see that okay i'll just press undo from this place so i'll get the same data here i see with help of macros i'll open this vb editor part okay these are names of the sheet now it has been grown up i'll just minimise these are the names of the models physics which are given i'm on the model name that's delete so if i want to delete some cells with delt of this macros i've written this code here that is sub procedure delete cells and have written as range b3 dot delete that's a cell number b3 selena b3 is tuesday so range b3 dot delete what'll happen let's see now next this range a1 to 8 and dot delete okay so range 81 to 18 i want to delete the inter 81 to 8 in next is range b6 inter row delete so if i want to delete the inter row that is a method range interrew delete so what it will do is we'll execute step by step and let's see understand if i press f8 from my keyboard okay f8 from my keyboard remember b3 celimber b3's tuesday if i press delete f8 from my keyboard the cells will be shifted up if you see that the cells have been shifted up and that line has been executed now i have the second thing that is range a1 to 800 or delete so if your observe range a1 to 810 will be deleted and all the cells have been shifted to the left hand side so that has been deleted see this is empty now okay next this range b6 to be a b6 intero door delete b6 in this place is nothing but vba okay saturday vba if i want to delete the ntaro okay i have to write this basics in taro to delete i can just click on this step into and you see that intero has been deleted from this place and the cells have been shifted on the top the last one is c4 inter column if you want to delete the inter column just right inter column or delete and the c column okay c4 whatever contains are there in that c4 with respect to that the inter column would be deleted so i'll just click on this step into okay you see the enter data has been deleted from this place and finally i'll just come out of the code itself and that has been done so i hope you'll be able to understand how to delete the cells how to delete the entero and enter column in which your data is it or if whichever sell you ask him to delete for right now that's all for this video。

先演示啊，就我们一般有这样一个表，看到了这个东西了之后，我们大家常规的做法啊，可能就是这个搞一个筛选，然后我要筛选这个 登成名品，是吧？然后再把登成名品的这一个 个 ctrl c 再新建一个，然后 ctrl v 过来这样子，然后再在这个里面去看他的流水，是吧？ 或者是进行排序干嘛？这个是按时间排好了的是吧？这样的很多去做，你当这个中间的呃，东西 很多的时候，我们是不是多个多个的去弄是吧？这样子就效率非常的低。但是通过这几天啊，这个 事情往前面推的话，就肯定有，我先把这个删掉啊，删掉，然后在这里就会 有做了一个狠命令，狠命令其实你们也不需要知道，就是说 这个东西会怎么样的去把这个按照我要想要的，你比如说我要按时间日期来分也可以，按供应商的名称来分也可以，那这样子我们对这个表格的猜 呀合啊，因为合合并数据告诉了大家怎么样去合，现在告诉大家怎么样去拆，速度很快，实际上我就点一下，他就能够自动的在在做好，已经做完了，做完了的话你看一下有多少多少 多少下啊，这个都是都是按公司自动已经拆封完了啊，这样子就省了我很多事， 实际上这里应该是有起起落落有一十三个公司，那有一十三个公司的，那还很多，也就同样的 也就一下子就干完了，是不是比我们的效率要高了？那接下来可能有很多表，你们不需要再折腾来折腾去的做了啊，这个数据就是这样子，慢慢的会完善，但是 为了这个表格，这中间有些数据肯定是要定掉了，就是没有办法去让你们输了，也就后面会把这个效率提得更快。 我们一定要在我们的过程中间找出这个规律，然后去把这个重复的工作简单化的去做，好吧？

哈喽，大家好，上一个视频我们已经做好了，就批量的生成多张工作表，那这个视频我们要来解决另外的一个问题， 就是当你的月份发生变化的时候，比如说一月份，你可能这张表都是一月份的，你去建了一月份的一到三十一号的工作表，那么你要建立二月份，是不是把这一张工作表 另存，保存好之后把之前建立的工作表全部删掉，删掉之后再重新运行一次代码，我先把文件名字改一下，然后把这个案例改成第五个案例，这个就是删除，我们现在要来执行删除操作代码很简单，我们重新写一个，同样我们也是要用到循环这里的，循环的话我们第一个变量就好，我们尽可能的 用一些比较简单的好开始直接循环，这里要用一个放一起，如果工作表的名字不等于模板的话，我们就删除他，就只有这样的一句话， 但是你自己注意一下，你手工操作删除工作表的时候，他是不是有一个信息提示，你是否继续删除，你得选一下这里，他有一个提示性的语句，我们得把它关闭掉，不然的话你每一次都需要去点一下他，那我们就不能提高工作效率了吗？所以我们得把它关闭。一个文件的提示 关闭完之后记得一定要打开，这样的一个代码就已经完成了，然后我们来试一下吧，点着我们这段代码当中的任何一个行，直接 变量为第一，这里写错了，好，继续，我们的工作表都已经删干净了，对不对？然后我们再来执行下面一个新建工作表，按一个运行，我现在要建立一个十二月份的啊，十二月份的很快就完成了， 我们建完之后我们会发现我们想要把它恢复到第一章的选中状态，所以说在这里建完之后呢，我们把第一个工作表给他选中，就回到第一个，不然的话他会回到最后一个，然后再 点一下这里，我们把它删除掉啊，就是留下了这个模板，看一下是不是非常的迅速，非常的快。然后我们再来试一下这个新建 十一月好看到吗？现在你没有感觉他发生任何的变化，但是他的代码都已经生成好了，然后每一个工作表都已经做好了，是不是非常的简单呢？这个跟实际工作的关联度还是挺大的，希望大家能够学会。代码也很简单，代码真的非常的简单啊。

大家好，我是老吴，欢迎观看 excel vba 入门开窍课程，这节课我们来讲批量清空，批量清空应用到的场景呢，就像现在这样，我把这个窗体呢已经填满了，我现在点击录入 啊，这个内容是没有问题啊，把它录进来了，但是现在如果我想进行下一单的录录呢，我就要把这个已有的这些东西全部删掉。单选框呢？我都没法删掉啊，我没法把它点成空啊，特别是这个副选框呢，我要一个一个点 啊，这样就比较麻烦，所以呢，我们必须通过代码来一次性把它全部清空掉， ok， 我们来写下看啊。首先清空一个空间的内容是很简单的， 比如说我想把这个文本框一的值清空，其实我就是把它复制一个空给他就可以了， 那这样就清空了。如果是一个逻辑值，比如说像这个凹陷巴腾，那像这种逻辑值把它清空，其实呢就是负值，这个 把这个 boss 复制给他呢，就等于是清空了啊，但是用这种写法呢，不是说不可以，而是呢比较繁琐。 你像我这个窗体呢，一共有这个三个文本框就要写三下，有两个复合框写两下啊，这里有四个复选框写四下，六个单选框写六下啊，这样就很烦，而且我这个窗体空间呢，并不是很多，如果这个窗体空间非常多， 那写起来呢，会非常繁琐，所以我们肯定是不能通过这种来写的好，批量来写就是循环，循环有两种办法啊，一， 这种办法就跟我们这个填入兴趣的时候一样啊，我们首先知道这个复选框呢有四个，然后我们通过这个货循环 e two 四，然后通过这个 ctrl s 这个集合的这种写法 啊，去动态的去获取每一个复选框的名字，然后把他的这个 w 改成 boss 就可以了。好，但这种写法呢，他有个弊端， 你首先得知道他有几个复选框，几个文本框，如果这个窗体进行了更改，比如说增加了一个复选框，那这种写法你就得去改，这样呢，也不是很方便。好，所以我就不是用这个货循环，我是用这个货一起循环，那就是循环对象 啊，就叫做控件吧，对象集合是优质 flam 四的 ctrl 式集合 好，可以做一个定定控件。哎，把它声明成一个恳求。 ok， 好，我们首先看一下他是怎么来循环这些空间的，那把他的名字弹出来，我们看一下，做一个断点，先 调出，然后点一下，这个录入好， f 八，逐步运行一下。好，第一个文本框一啊，就是这个了。好，第二个啊，这个是一个标签，标签一就是这个姓名 啊，继续啊，标签二啊，这个是命令按钮一，那就是这个，这个确认录入好，继续。 o 型八筒， 这个是单选框啊，二啊，三四五六啊，一共有六个单选框啊，然后是这个框架好，然后是副选框啊，一共有四个副选框， 然后又是这个标签啊，然后是这个复合框一啊，标签啊，复合框二啊，标签 啊，文本框二，文本框三，好，标签六啊，标签七啊，结束了，所以呢，我们通过这个循环，我们是把这个里面所有的空间都循环了一遍，但其实我们只需要改变其中三 三种空间的内容就可以了，只是这样写啊，直接把这个空间的这个啊， tst 啊，把它射成这个空，肯定会爆错，为什么？因为有些他不是 fast， 有些是 w， 那这个怎么来处理呢？其实我们可以在这个循环里面来做一个判断啊，以空间 啊，空间的名字，如果等于我们特定设置好的，比如说等于这个 t 一 xt， 好，那就证明他肯定是一个文本框啊，这个时候呢，我们就可以把他的 太子的这个值呢色成空。好，但是我们这样写可能会有点问题啊，因为每个文本框的名字呢，都不是完全一样的啊，所以呢，我就用了一个密的啊，这个密的取值从第一位取到 第四位吧。好，我们就这样写一下，我们把这个复制一下啊，四位，接着我们就 l e， 然后再把这个复制一下。 好，如果取出来直 是什么情况？再来看一下，这个，好，这个就代表着复合框。好，如果是复合框呢，那就是把他的歪柳射成 boss， 还有一种是欧布逊八腾这个，那也选四个，那复制早了，我们先把这个复制一下。好，继续 iose， 如果这个 地方是凹陷八层 啊，一样的，把他的直射成 boss 就可以了。 好，这三种我们看一下是不是也就已经搞定了啊，还差一个啊，差一个这个复选框啊，继续。 好，复选框也是把它的直射成 空就可以了。好，如果不是这四种情况，我就不进行任何处理就可以了。好，我们来测试一下啊，我先打上一个名字 啊，身份证我就乱打两下， 确认录录好，这个时候报错了啊，有的时候我们并不是每次写完之后呢，就百分之百一条通过啊，肯定会有报错的情况。 很多人问我的时候，就是直接把这个运行是错误这个东西，这个复制给我看，他说这个错误是怎么回事啊？其实你如果只是把这句话给我看，我如果不结合你的这个数据和你的代码，我是没有办法判断你到底出现了什么错误。好，所以点下调试看下是哪一句话有问题。好，来到这里有问题了。

好，为了方便操作了，我们代码助手呢，为系统添加了一些快捷键啊，来一起来看一下，可以加速我们的日常操作啊。这种呢，新手的话可能用途不大啊，老手啊，主要是 比如说这个切换注视啊，很多同学呢，喜欢经常会切换注视，比如这一行我不想要了，临时不想要了， 但是我们手工打一个也是可以啊，我们可以这打一个，然后再啊删除。这样啊，但是我们现在用 ctrl 加，注意 ctrl 加这个斜杠啊，这其他编程语言经常会这个，哎， 这样快速的切换啊，也可以多行啊，比如说我们这三行啊，直接把三行选中，那么他如果有，有的情况下他就是取消掉，如果没有就是加上啊。这个个别同学你需要的话可以啊，但是我 个人的喜欢在这个上面点一下也行啊，反正用习惯的话，可能也都很喜欢用，用别的编程语言或者编辑器用多了啊，可以用这个 啊，删除光标所在的行啊，比如说我们这一行的不要了，那我们传统情况下这样选中，然后这样删除啊，我们现在只要光标放到这个地方， ctrl 加减号就可以了啊，注意 ctrl 加减号直接删除啊，如果我们双手操作的话，他这个比较方便啊。 ok， 再介绍一个啊，删除所有空行，这个呢，也是用的比较多，比较有洁癖的同学啊，他见不得代码里面有空格啊，因为这这样子 你看，那么这个空格我要一次性删除，只需要按一下 alt 加减号啊，这个不不建议这个太高频的用啊，最近有同学说在 wps 里面 这个用多了会卡死啊，什么样的？不知道啊，这个在右键里面呢，他也有啊，右键那么点一下这个啊，删，删除空行啊，这里有一个删除空行，然后这样也可以有删除空行的功能啊。对， 那么还有一个切换界面的啊，我们知道经常我们在写代码的过程中要两边切换啊，两边切换。呃， 平时呢，我们可以用二十加 fc 啊，但是这个两个键呢隔得比较远，按起来不是很爽啊。我这里呢给大家用一个键转发了一下 f 六，这个键我们很少用， 然后我们自己按一下 f 六，哎，这就可以直接切过来啊，看这里，实际上他显示的 f 加 f c。 嗯，我按一下的只按了一个键啊，我只按了一个 f 六，这个键他系统显示的按到加 f 六 f c， 他想要转发成这个键的。好，你看我们有时候对照着代码来看的时候是这样子，是吧？哎，我们不想看的，那我们直接按一下 f 六就把它调出来。还有一种情况，我们希望在 这个窗口呢，能够放到这个上面，一直看在上面，我们在调试的时候又同时能够选中这边，不希望他能够把它放下去了，这样这单个屏幕的时候就是对照调试的时候啊，我们需要把这个窗口强制置顶，这个时候按下 alt 加 f 列。 哎，你没看到一个很神奇的事情是吧？我们这边呢可以操作代码，那么这边呢也可以操作 excel 表拆，操作 excel 表示他不会 怎么样，他不会消失，这样我们在调试的时候就很方便，我们可以一边修改这边数据，一边看这边的结果，或者一边修改这边的，一边看这边，两边可以同时进行，但你要取消这个再按 f 六啊。好，这个写错了啊，按，按错了啊，不了，再按一下 f 六，你看他就取消了这个置顶注意啊，那 art 加 f 六他是置顶的，注意看啊。好，这个操作就对高频调试的时候有一定的作用啊， 那么还有一个功能是对我们的，这是我自己需要的啊，你们看到这个地方，那我们这数到第几是第几列？直接脱口而出第七列。好，那我请问 这是多少列，你能告诉我吗？你孩子，是不是有的人要打一个等号？靠了，我们算一下是吧，是多少列啊？ 啊？三十七，那不用了，我们按一下二的加零三十七是吧，这个是不是很爽啊，一数就知道是多少个了。那直接告诉我们，因为我直 直接用我们内置的功能切换了这个行列显示的状态啊，当然你这个你要记得切回去啊，否则有的时候公司会出现一些问题，那比如我们更大一点，到最后你看到这种时候你要数的话不太好数啊。嗯，阿特加 f 零， art 加零 啊，这是装的代码助手就会自带这个功能就快速的切换列号啊，再也不用数了啊，同学之前数的很痛苦啊，经常在这里要数半天啊，一写个靠，那么也麻烦来看，这是十二行，十二列是吧，这就是十四列是吧。啊， 好，那么底下还有两个，复制当前行和剪切当前行啊，这两个可能有的人用的不多啊，我还顺便顺手把它写了，比如这一行呢，我们可能要下面复制一行啊，那我们有的时候之前呢是这样子，直接选中一行，然后 ctrl 加 c 啊， 现在只需要二的加 c 就可以了，那么你再到其他位置啊，直接 ctrl 加微就可以暂停了，那剪切也是你要这一列？不要了，我们要把它换个位置，那就直接二的加 x 好换到这里来。哎， ctrl 加微就可以了啊， 你看这里没对齐，再顺手推拨一下他就对齐了啊，这个我们这几个键的组合的音乐啊，双击推拨在任何地方只要你觉得没对齐的啊，你双击推拨他就对齐了。 好，那这个是最后两个啊，快捷键呢，我个人用的多了，就是二的降零和 f 六啊这两个，其他的其实用的不是很多啊啊啊的解剪呢，有时候用一下注视，有时候用一下 这几个电台是其他有什么区别？提到了，反正我那段时间在写就顺便加上去了啊。快捷键不是什么王道，有人老是把快捷键打 当成圣经啊，在我很负责任的告诉你，最终写代码的速度永远跟快捷键没有关系啊，他只是说一定程度的辅助或者满足一部分同学的这个心理上的需求啊，好像按键比用鼠标快一些啊啊，就这么点用好，希望大家能用的用的好的人，那你肯定就好好用，没有必要强迫自己啊 啊，我个人快点用的并不多啊，你们看我直播也知道啊。好，那么这个功能就介绍到这里啊。