返回
excel如何自动执行vba程序（ExcelVBA自动录入一个）
excel如何自动执行vba程序（ExcelVBA自动录入一个）
2024-11-06 02:16:31  作者:陌上琼楼  网址:https://m.xinb2b.cn/life/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-06去欢乐谷怎么走公交线路：地铁2号线→地铁5号线→地铁7号线，全程约17.4公里1、从东直门交通枢纽步行约340米,到达东直门站2、乘坐地铁2号线,经过5站,到达崇文门站3、步行约240米,换乘地铁5号线4、乘坐地铁。
  • 金恩圣身价（金恩圣举办婚礼）
  • 2024-11-06金恩圣举办婚礼看点：2022年10月20日，张檬和金恩圣在三亚举行婚礼在婚礼现场，两人互相告白，张檬表示：“要一起好好地经营一个家，如果可以选择，我要下辈子，下下辈子，下下下辈子枕边人都是你，我爱你老公”金恩圣则对。
  • 古老的汉字起源（我国汉字历史起源）
  • 2024-11-06我国汉字历史起源坚强的手指勾勒出细腻的线条，四只古老的眼睛忽然间眨了一眨，一种新的交流方式的想法开始兴起正如女娲为第一批人类注入生命一样，仓颉创造了一种书面形式的汉字，从而赋予了它新的生命根据我国古代传说，黄帝分配给。
  • 感恩父亲节父爱如山永存心间（感恩父亲节父爱如山）
  • 2024-11-06感恩父亲节父爱如山六月的天空映着晴朗的蓝色，那是父亲浓情的渲染；六月的鲜花开着耀眼的灿烂，那是父亲不老的容颜；六月的今天，父亲节翩然而至，为树立“感恩父亲，弘扬美德”的良好风尚，让孩子们从小感受到父爱的伟大和无私，学会。
  • 关于黄河的诗（关于黄河的古诗）
  • 2024-11-06关于黄河的古诗《凉州词二首·其一》黄河远上白云间，一片孤城万仞山羌笛何须怨杨柳，春风不度玉门关《将进酒·君不见》君不见，黄河之水天上来，奔流到海不复回君不见，高堂明镜悲白发，朝如青丝暮成雪人生得意须尽欢，莫使金樽空。
  • 梦幻西游浪淘沙锦衣价格（浪淘纱礼盒涨价至5亿）
  • 2024-11-06浪淘纱礼盒涨价至5亿大家好！我是胖虎，「胖虎看西游」每天带来梦幻各类趣闻，爱生活，爱梦幻好妓星千亿后续近期，渔岛区霸好妓星千亿领到了一本高级必杀，没想到引发了区内一顿激烈的传音对喷有人嘲讽好妓星千亿出了高必，好妓星回应道。
  • 防衣服缩水方法（防衣服缩水小妙招）
  • 2024-11-06防衣服缩水小妙招如果是用洗衣机洗过的话，那用温水泡一下,再用熨斗烫一下,以后放到洗衣机里的时候,洗衣粉多放一点如果是手洗的话，在脸盆里注入温水，滴进少量的家庭用阿摩尼亚水，然后将毛衣浸入，留在毛线上的皂成份就会溶化以。
  • 哺乳期的妈妈的饮食禁忌（哺乳妈妈要忌吃哪些食物）
  • 2024-11-06哺乳妈妈要忌吃哪些食物一些食物或者药物中含有对新生宝宝不利的有害物质，这些物质很容易通过乳汁影响宝宝的健康❗可乐等碳酸饮料碳酸饮料不仅会使哺乳妈妈体内的钙流失掉，它含有的咖啡因成分还会通过乳汁使宝宝烦躁不安❗麦乳精、韭菜、。
  • 描写各具特色的成语（成语运用题例析）
  • 2024-11-06成语运用题例析有文化底蕴类成语有不少成语涉及古籍、字数、音乐、绘画、书法、典章、制度、礼仪等内容，有着丰厚的文化底蕴如“三坟五典”，上古伏羲、神农、黄帝之书叫“三坟”，少昊、颛顼、高辛、唐尧、虞之书叫“五典”“四书。
  • 安以轩撑起收视率（蓝正龙世纪合体）
  • 2024-11-06蓝正龙世纪合体《斗鱼》电影版正式预告推出，安以轩、蓝正龙、陆明君、张勋杰等人世纪回归画面正式曝光，四人在片中互相给予彼此的拥抱，象征着彼此好久不见，并在15年后以电影版方式回归，搭配着FIR神曲《Lydia》当背景。