全民一起VBA基础篇第五课:字符串,逻辑运算,调试

调试

设置断点

单击语句左侧,得到一个红色的点
在这里插入图片描述

单步调试

按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代码,略微修改即可自己用

发布了26 篇原创文章 · 获赞 5 · 访问量 1106

猜你喜欢

转载自blog.csdn.net/qq_43568982/article/details/103749546