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

故事扮演 提交于 2020-01-16 05:45:46

调试

设置断点

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

单步调试

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

标签
易学教程内所有资源均来自网络或用户发布的内容,如有违反法律规定的内容欢迎反馈
该文章没有解决你所遇到的问题?点击提问,说说你的问题,让更多的人一起探讨吧!