问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501
你好,欢迎来到懂视!登录注册
当前位置: 首页 - 正文

急急急。。。如何把一段代码添加到在EXCEL并且运行,在线等

发布网友 发布时间:2022-05-17 10:49

我来回答

5个回答

热心网友 时间:2023-10-19 12:06

EXCEL上点击工具——宏——录制新宏,就会出现如下对话框,对话框内容无需更改,点确定即可

然后在你需要实现加1的工作表名那里右键查看代码,

红色圈圈那里右键查看代码,执行后就是红色圈圈的工作表有效,

右键查看代码后会出来如下框框

把你的代码复制粘贴上去,如上图,

然后

点这个红色圈圈的地方调试选编译VBA。。。

然后是

点运行,运行子程序。就OK了。

最后

点这个可以返回EXCEL工作表。

这个时候你所选择的工作表就有你提问中所说的效果了,要点击一次加1,代码里+1那就不用改,要是+2或其他的就把1改成2或其他数字

追问我现在显示语法错误,你能不能帮我填一个完整点代码,谢谢了。
另外,我把我今天赚到的50分也全送你了

追答你发的那个代码是没有问题的啊!语法错误可能是输入的时候输入法设置问题吧!

热心网友 时间:2023-10-19 12:07

这是选中一次即 +1, 不知道是不是你所谓的点击

 

选中工作表标签(就是表下面的 工作表名字) --右键---查看代码,

把代码复制进去, 使用需要开启宏,且2007版Excel 需另存为 Xlsm  格式(开启宏的工作薄)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   if target.address ="$A$1" then   '对A1单元格起作用,可自己修改为实际单元格,用绝对引用,就是  $B$1 这种
    Target.Value = Target.Value + 1
   end if
End Sub

追问就是在一个表格里,在每个单元格里,每单击一次所在的单元格,在原有的基础上加1,例如是1,点击下就变成2了

追答

 查看代码,代码复制进去就好了

要开启宏,2007 要存为Xlsm , 可 1052974911@qq.com


    热心网友 时间:2023-10-19 12:07

    Alt+F11,调出代码编辑窗口,插入模块,在模块编辑窗口,把代码粘贴进去,然后关闭就可以了。

    热心网友 时间:2023-10-19 12:08

    添加”命令按钮“,在代码行输入代码。

    热心网友 时间:2023-10-19 12:08

    Sub Inc_One()
    '
    Sheet1.Cells(Selection.Rows.Row, Selection.Columns.Column).Value = Sheet1.Cells(Selection.Rows.Row, Selection.Columns.Column).Value + 1

    End Sub

    再在菜单栏上加个按键。
    声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。
    E-MAIL:11247931@qq.com
    收到别单位给的承兑汇票 我单位在给别的单位 这笔业务应该怎么做啊? 荔枝什么生肖 均衡器怎样调成重低音 电脑eq设置低音电脑EQ均衡器怎么设置达到最佳音效 第一排是什么单词 人生中的黑暗乐章——Agust 乐评 Sigur Ros乐队简介 ...在这部影片里面名字叫Agust还是什么的、求名字 请大大们给个英文名 大叶芹叶子可以吃吗 excel中批量加入代码 网页的最大化,最小化,最大化的JS代码如何写? 剥削的剥读音是什么 毕毕剥剥的读音 联系上下文说说:三年集恐龙一课:庞然大物和望而生畏词语的意思 望而生畏的词语辨析 望而生畏是什么意 望而生畏是什么意思 望而生畏怎么解释 望而生畏什么意思 望而生畏是什么意思? 望而生畏的意思 怎么解释望而生畏的词语 望而生畏词语的意思 望而生畏的成语解释,望而生畏是什么意思 office word2007,插入表格后,怎样才能实现自动扩展? 白色含低羊毛毛呢用洗衣粉洗过后有点发黄了怎么办 羊毛衫、羊绒衫可以用洗衣粉洗吗? 白色大衣含羊毛,用洗衣粉洗,干了之后衣服发黄,漂白水漂了更黄,怎么办? 羊毛大衣洗衣粉洗了会怎样 如何在EXCEL中创建代码 EXCEl 如何在一个工作表内添加两段代码! EXCEL中VBA任意14个数字7个组合如何添加代码 阜新银行五一放假吗? 五一沈阳的辽阳银行放假吗? 能不能限制固定电话拨打出去呢? 如何将一个上的聊天记录共享给另一个? vivoys5手机锁屏密码忘记了但不知道怎么能解开 如何将一个上的聊天记录共享给另一个? 共零的电线怎么分电表 最近发现患上沙眼该怎么办还可以上班吗医生给了叫左氧氟沙星滴眼液不知道有效不好烦啊眼睛老是红都不敢看 最近这段时间眼睛不舒服去医院检查说是感染了沙眼开了盐酸左氧氟沙星滴眼液用了一星期效果感觉都可以? 氧氟沙星对沙眼治疗有效果吗? 沙眼用什么眼药水治疗?_沙眼 沙眼 滴利福平眼药水和左氧氟沙星眼药水 得了沙眼 怎么办??? 怎么治疗风沙眼? 关于沙眼用药的问题 沙眼结膜炎怎么治? 结膜炎沙眼
    • 焦点

    最新推荐

    猜你喜欢

    热门推荐