返回
excel如何自动执行vba程序（ExcelVBA自动录入一个）
excel如何自动执行vba程序（ExcelVBA自动录入一个）
2024-11-22 07:36:50  作者:陌上琼楼  网址:https://m.xinb2b.cn/know/mek510630.html

录入过程中，为了反复录入符号“√”，让不少人心烦。


解决的办法可以使用数据有效性，也可以使用VBA，方法很简单。

假如I列要输入“是否三好学生”，如果是，录入一个“√”，因为第1、2行为标题行，从第3行开始，点击鼠标，显示一个“√”。

鼠标右键点击工作表标签，选择“查看代码”，将如下代码粘贴到光标处：

Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim Rng As Range Application.EnableEvents = False For Each Rng In Target If Rng.Row > 2 And Rng.Column = 9 Then '如果单元格行号大于2 并且 列号等于9 (I列) Rng = IIf(Rng = "√", "", "√") '如果这个单元格原来是"√"，改为空，否则，输入"√" End If Next Application.EnableEvents = TrueEnd Sub

返回工作表，即可使用该功能。

  • 柳树坪蒲剧（小剧场大码头蒲剧俄狄王）
  • 2024-11-22小剧场大码头蒲剧俄狄王“俄狄虽然担罪过，但为天下换祥福”2021年12月12日晚，蒲剧《俄狄王》在长江剧场红匣子上演我最初了解到俄狄王的故事是通过古希腊三大悲剧家之一索福克勒斯的代表作古希腊悲剧《俄狄浦斯王》，这部作品取材。
  • 南京到阜阳高铁有直达的吗（好消息南京到宿迁）
  • 2024-11-22好消息南京到宿迁好消息！12月30日起，全国铁路调图南京到宿迁和淮安开通高铁，南京到阜阳、亳州时间缩短4小时，南京至青岛开通夕发朝至动卧据上海铁路局，全国铁路将于2019年12月30日零时起实施新列车运行图，长三角新。
  • 斗罗大陆唐三个人经历（原著人物还原度天梯榜）
  • 2024-11-22原著人物还原度天梯榜【前言】《斗罗大陆》真人剧毕竟是由《斗罗大陆》小说改编的电视剧，故而不管怎么样都会被拿来与原著进行比较，现在电视剧已经更新到25集，我们今天就来参照已经更新的剧情，给剧中人物的原著还原度排个名Ps:排。
  • 日本国土面积（日本国简介）
  • 2024-11-22日本国简介日本国（日语：にっぽんこく、にほんこく，英语：Japan），简称“日本”，日本位于亚欧大陆东部、太平洋西北部，国名意为“日出之国”，领土由北海道、本州、四国、九州四个大岛及7200多个小岛组成，因此也。
  • 妇女节文案（形容妇女节的美好句子）
  • 2024-11-22形容妇女节的美好句子我要把秘密深藏心底，我要把祝福大声送去；我要把友谊好好珍惜，我要把笑语全部给你；我要让阴霾随风而去，我要让生活甜甜蜜蜜！三八快乐！妇女节到了，祝你成为真正的“富”女，精神富：不顾影自怜，乐观开朗；爱情。
  • 百叶炒辣椒的做法（香拌红油百叶的做法）
  • 2024-11-22香拌红油百叶的做法这是一道快快快手菜，只要有食材，十分钟就可以吃上哦By香草味厨房用料百叶一大块蒜3-5瓣糖少量盐少量小葱2根辣椒油适量酱油适量美极鲜适量做法步骤1、将白叶的每一片都分开洗净，切成5-7豪米宽的条2、下。
  • 神奇宝贝小智的火球鼠进化（追逐小智曾经的道路）
  • 2024-11-22追逐小智曾经的道路随着《神奇宝贝》剧场版与日&月再次热播，这部陪伴童年长大的动漫再次呈现在我们面前流水的女主，铁打的小智小智一路旅行收服了许许多多的宝可梦，而相对的女主角也是哦小光收服了火球鼠进化为火岩鼠，而小。
  • 男生阴柔风什么意思（阴柔男风的盛行）
  • 2024-11-22阴柔男风的盛行来源|喜马拉雅FM李淆忤Live的精品课《小武的朋友圈》编辑|核桃精现在懂化妆的人已经不全是女生了，很多男生也开始注重自己的外表，甚至在化妆这一方面比女生更懂得套路的确，网上的美妆博主数不胜数，而其中。
  • 怎么做仓鼠喂水器（仓鼠喂水器的做法）
  • 2024-11-22仓鼠喂水器的做法仓鼠的喝水器一般是悬挂式的，有一个滚珠控制出水量，所以可以准备一个矿泉水瓶，和一个盖子，在盖子上打一个洞，够放上一个不锈钢管，在不锈钢管里放一个稍小的滚珠，不漏水便可，然后把不锈钢管插进洞里用胶水粘好。
  • 车险买完后怎么退（车险怎么退）
  • 2024-11-22车险怎么退一、车险退保如何退?第一步：先写好一份退保申请报告，表明自身退保的缘由及其从何时开始随后签上自己的名字或是盖章，完成之后把退保申请报告出具给车险公司第二步：车险公司在收到了退保申请报告之后，便会开展审。