调试
设置断点
单击语句左侧,得到一个红色的点
单步调试
按F8进入调试
添加监视
调试->添加监视
调试完后去掉所有断点
调试->清除所有断点
字符串
与或非的表示是 And Or Not 注意区分
没有括号,先not, and 后or
if age<30 and field = “数学” or field=“物理” then
左右两边都要完整
if cells(1,1)=“RMB” Or cells(1,1)=“人民币” then
if not age >16 then
两个字符串之间的连接 用 & 符号左右需要各空出一格
录制宏
例如,需要知道高亮和加粗是怎样的
可以如下操作
开发工具->录制宏
选中任一单元格,加粗,改色
停止录制
Sub 宏3()
With Selection.Font
.Color = -16776961
.TintAndShade = 0
End With
Selection.Font.Bold = True
End Sub
然后得到上述,进行修改
可以得到下面的代码
Option Explicit
Sub highlight()
Dim i As Integer
For i = 101 To 1 Step -1 '逆序判断比较科学
If Cells(i, 2) > 500 Then '判断单元格的数值
Cells(i, 2).Font.Bold = True '用来加粗
With Cells(i, 2).Font '用来改字体颜色
.Color = -16776961
.TintAndShade = 0
End With
End If
Next i
End Sub
就可以挑出超过500的,然后加粗变红
如果想得到删除啊,换行之类的,都可以录制宏来获取VBA代码,略微修改即可自己用
来源:CSDN
作者:高开低走。
链接:https://blog.csdn.net/qq_43568982/article/details/103749546