如何用宏制作一键清空按钮

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。 好吧，那我们把它呢删除完成之后呢哈，再给它开启点个处就行了。 好，你比如说哈，那如果说我要不写这个东西，我不写这个关闭哈，我们来试一下先不写是吧，我来执行，先看一下能不能删除哈。 现在这里是什么？十五十六十七十八是没有值的是吧？那我啊，我这边去插入一个形状按钮，去引用一下这个红，插入一个形状按钮，然后我点击物件去直接一下这个红，是吧？删除，空调点删除。哎 啊，删除的时候你看这用上干什么？就出现了这个什么要删除公外表呢？可能存在数据上，如果要删除这个数据的情况，确定看到没有就会有这样一个提示啊，我们就不需要这个提示是吧？啊，都给人取消哈，都取消， 然后这里的时候呢？哈啊，我们把这个提示还是开启，开启之后把它关闭提示开启啊，就这个地方先关掉提示再执行，我们再试一下 啊，你看啊，这样一下就删除完成了，也没有提示，可以看到只剩下什么十七和十八了，对吧？下面什么原来那个十五十六十八没有数据的全部都删除了，删除掉了啊，这两个就是这样一个批量啊去删除空表数据的一个案例，大家可以去自己去试一下啊， 非常简单。那所用的知识啊，都是我们未必课程第一季的知识，大家如果说想学综化办公，也可以选选择下下方的课程。好，感谢大家观看，下期再见，给多关注和点赞。

今天跟大家介绍一款红命令，删除全部制定艺术性， 假如这个零件里面有制定艺术性， 只要按一个这个图标就可以全部删除，按一下，然后这里的自定义就没有了。

知不知道这个红程序是干嘛用的？谁能看出来吗？兄弟们大家好，今天为大家带来一个如何把所有坐标系清零的红程序，包括外外部坐标系五四到五九，然后其五四点一， p 一到 p 四十八，四十八，所有坐标系清，最笨的办法就是一个一个数，零零零零，这是最笨的办法。看一下，我所有坐标系都是有数值的，你看一下哪个五四，然后七五四十八号里面也是有的四十八个， 这个就是一键清零的功能，把所有坐标器清零都封上去，我直接启动好，等待一会。好，所有坐标系看一下，包括外部坐标系所有全部是零，五四五五九全部是零，没有一个是有数值的啊，一键清零。

啊，前些天的话，我看一下时间是六月五号，那么六月五号的话，有一个兄弟在后台私信了我说老师写个红多少钱？那我当时也给他回复了， 我就说价格的话是根据你红对红的一些要求难度要定价的啊，那么就在昨天，然后他又回复了我，他说也删除程序啊，然后年斯贵斯一起删除掉， 那么这个红的话，我今天的话也就写好了，然后我们今天呢一起看一下。那首先我们都知道啊，我们的 squese 里面的程序啊，它是主要的程序，那在这边的话 是我们的什么？有一些快捷方式而已，那我们要删除他的话是并不能啊，删除我们真正的一些程序的，那我们来举个试验，那比如我来保存一个， 保存好保存到这里哦，保存到这里的时候，这边有一个啊程序，那我们深圳市里面又多了一个，那如果说我要删除，单独删除他的话，那我们的啊序列是没有改变的，对不对？那么点来的啊， 删除，那删除的时候这边的是不是还是有的嘛？那就我们在好多灯光师在编程的时候，突然编一个程序，突然不想要了，那我们就会想把它删除掉，那么他删除的话，这里面是没有删除， 日积月累的话，存到一万就没有了，把手动去去删除很麻烦的，那我们再把它指开回来， 那我们真正要删除的话，是需要删除我们的啊，死贵死训练是不是？那我们来看一下，当我们删除他的时候，那我们这边的程序是没有的，那么点击 thelet 啊，删除他问你是否确定？ ok， 那这时候我们这边的话程序就没有了， 那首先的话我们来看一下我们的红絮怎么样的一个操作。 那我们当前的话啊，有两个程序啊，分别啊，第一个程序的话我们只拍了两个啊，然后第二个的话我们只 拍了三个，那么同样的话，这样的一个训练的话有锁住的一个状态，也就是说在当前的话锁住状态是没有办法进行一些删除的，虽然说我们能删除快捷方式，对吧？ 但是还是删除不了，那我们首先的话要给他解锁是不是？那为什么要锁这样的一些序列呢？就比如说我们在做一些重要的程序，对吧？或者说颜色有 啊一些一些效果的时候，那么我们对这样的程序非常要求，就是说不必要的一些物删除，所以我们将它进行一些锁定， 那我们想要删除刚刚这样的一个操作，删除，他是不是要先解除之后才能删除啊？那么先给他一些解除掉，当我们解除 时候，然后我们再删除他是可以的啊，是可以的，那么进行删除，那么这时候我们才可以删除掉。如果说我们来撤销一下我们当前锁定的状态啊，我们迪莱特啊，迪莱特在删除，他是没有办法进行的删除的，对不对？ 那我这个红画也写好了这样的一个呃，命令啊，比如说我先 点这个红，比如说我要删除这个训练的所有东西，对吧？比如我随便点哪一个都可以，我点击他，然后解锁了，然后 再点一下， ok， 那个程序的话就会在这里面，不管你在，嗯，只拍在哪里，哪个页面，只要是这个序列，那么全部都会被进行删除这个红，然后选择， 然后解除，全部删除啊，这就今天的这个红。 ok， 那就今天的内容的话就大致是这样子的，如果说你有想要啊，写的一些啊命令的话，你可以私信我，或者说联系我， 那么这一期就说到这里，我们下期再见。

大家好，我是老吴，欢迎观看 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 就可以了。 好，这三种我们看一下是不是也就已经搞定了啊，还差一个啊，差一个这个复选框啊，继续。 好，复选框也是把它的直射成 空就可以了。好，如果不是这四种情况，我就不进行任何处理就可以了。好，我们来测试一下啊，我先打上一个名字 啊，身份证我就乱打两下， 确认录录好，这个时候报错了啊，有的时候我们并不是每次写完之后呢，就百分之百一条通过啊，肯定会有报错的情况。 很多人问我的时候，就是直接把这个运行是错误这个东西，这个复制给我看，他说这个错误是怎么回事啊？其实你如果只是把这句话给我看，我如果不结合你的这个数据和你的代码，我是没有办法判断你到底出现了什么错误。好，所以点下调试看下是哪一句话有问题。好，来到这里有问题了。

有人问我右击里面自定义的命令能不能使用，这当然是可以的啦，来看看视频，一分钟将会你自定义命令，像我这里有个小玉移除参数大法，现在可以看到导航器，这里有建模步骤，但是我点击这个命令，他就自动移除参数了， 那这样自定义的命令如何制作？首先我们撤销移除参数，然后点击工具，再点击这个录制红，这里定义红的保存路径，以及给他设置一个名称，然后点击， ok， 这样我们做的每个操作他就会记录下来，这里我们按照常规给他进行一个移除参数，直接全选模型，然后移除参数就好了。 移除完了之后，我们再在工具里面找到这个红，点击停止录制，这样这个红文件就生成了。接下来就是把这个红变成右击命令，这里需要 右键进入定制页面，新建一个命令，然后将这个用户命令拖到资源条里，这样后续就能直接在界面上看到他了。接下来给这个自定义命令进行定制，这里我们右键可以进行名称修改， 然后可以编辑操作，只需将这个类型可以改为红，然后浏览器选择我们刚才录制的这个红， 下面的说明文字随意添加，这里我们只拍完了之后再来试验一下。首先还原出建模步骤，再点击下自定义的命令，他就自动移出参数了，这你们学会了吧？

在 excel 里面怎样制作按钮，来一键清取表格内容？我们来看这个列子，大家可以举一反三。首先打开开发工具，插入按钮， 这样光标变成十字架，我们拖出按钮大小，弹出表格，我们选择录制，直接确定，然后我们手动删除一次， 选中所有表格内容， delete 过程，录制完毕，我们点击左下角停止按钮， 这样按钮就制作完毕。我们来测试一下，在空白区我们随机填入内容， 点击按钮，这样内容就全部被清去掉了。我们在按钮上 点击右键，选择编辑文字，可以更改按钮名称， 再次选中文字，可以更改文字大小， 这样整个按钮就制作完毕。是不是很简单，大家可以举一反三，在日后的工作中很有帮助哦！关注我。