00:10:00
问题已解决
怎么录制一个宏，点击一下让单元格的数字加1，比如单元的数字是1，点击一下变成2
温馨提示：如果以上题目与您遇到的情况不符，可直接提问，随时问随时答
你好
1.
代码如下：
Sub
add()
Dim
i,
a
For
i
=
2
To
99
a
=
Range(B
&
i)
If
a
>
0
Then
a
=
a
+
1:
Range(B
&
i)
=
a
Next
i
End
Sub
2.
根据你的实际行号范围，调整
for循环
的最大值（99）。
2021 03/27 08:14
84784958 
2021 03/27 11:27
这个代码不用输入某个单元格吗
84784958
2021 03/27 11:29
我需要在n3单元格设置
玲老师 
2021 03/27 11:43
单元格设置的。没有操作过。
84784958
2021 03/27 11:45
你这个设置的是啥
玲老师
2021 03/27 12:02
这个是写代码。
你可以按照下面这个流程里操作一下。
用宏的方法：
在工作表中按alt+f11进入vba编程界面
工作具栏第二个按钮拉下来，选择“模块”，插入一个模块
在左边栏的“模块1”名字上双击，打开右边的程序书写区域
将下面的程序粘贴进去
sub changeprefix()
dim rn as range, r as range
dim sh as worksheet
set rn = activesheet.usedrange
for each r in rn
if r.prefixcharacter = "'" then
t = r.value
r.clearcomments
r.numberformatlocal = "@"
r.value = t
end if
next
end sub
现在关闭编程窗口回到工作表，按alt+f8打开“宏”对话窗口，然后点击“执行”
（注意：要把宏的安全级别设为中或低以允许宏的运行）
上述操作完成后，带前缀“'”输入的字符内容就会被换成不带前缀的字符内容
阅读 1709
描述你的问题，直接向老师提问
1401
意见反馈
