广告合作
  • 今日头条

    今日头条

  • 百度一下

    百度一下,你就知道

  • 新浪网

    新浪网 - 提供新闻线索,重大新闻爆料

  • 搜狐

    搜狐

  • 豆瓣

    豆瓣

  • 百度贴吧

    百度贴吧——全球领先的中文社区

  • 首页 尚未审核订阅工具 订阅

    Excel的VBA语言中的If语句怎么使用

    来源:网络收集  点击:  时间:2024-04-25
    【导读】:
    If函数是Excel的基础函数,在Excel中有着非常广泛的应用。使用If函数可以方便地完成很多Excel的数据填充。VBA语言是Excel的高级应用语言,可以完成Excel函数不容易完成的操作,也可以完成Excel函数能完成的操作,但是使用VBA语言会让Excel操作更加简单快捷。工具/原料more计算机Excel方法/步骤1/8分步阅读

    VBA语言的入门学习可以从与IF函数相对照着来学习。

    以学生成绩表为案例,根据学生的成绩进行等级判定,来分析VBA和IF的使用方面的区别。

    根据学生的总分数据,判定学生的等级为“优秀”、“合格”与“不合格”,填充到“等级”列。

    判定标准:480分及以上判定为“优秀”,460分及以上为“合格”,460分下为“不合格”。

    2/8

    1、 使用Excel的If函数进行等级填充的方法

    选择I3单元格,输入If函数表达式:

    =IF(H2=480,优秀,IF(H2=460,合格,不合格))

    这是一个嵌套函数,使用了两级嵌套。使用函数嵌套时,必须要有清晰的逻辑。

    判定出I3单元的等级之后,使用自动填充柄快速填充其他学生的等级。

    3/8

    2、 使用VBA语言完成学生等级填充

    选择打开“菜单”栏中的“开发工具”菜单,鼠标单击“代码”栏中的“Visual Basic“命令按钮,在VBA主程序编辑窗口中的”工程“栏中单击鼠标右键,在打开的右键快捷菜单中,依次选择”插入“、”模块“。

    4/8

    在VBA编辑窗口中输入“sub dengji()”,敲击回车键,“end sub”语句自动出现。

    完成VBA语言框架的架构。

    5/8

    “dengji“是该程序语言的自定义名称。

    输入以下语句:

    Sub dengji()

    Dim i As Integer

    For i = 2 To 18

    If Range(h i) = 480 Then

    Range(i i) = 优秀

    ElseIf Range(h i) = 460 Then

    Range(i i) = 合格

    ElseIf Range(h i) 460 Then

    Range(i i) = 不合格

    End If

    Next

    End Sub

    单击VBA工具栏上的“运行“命令,完成所有学生的等级填充。

    6/8

    这个VBA小程序涉及到了“IF”语句和“For“语句。

    IF语句的完整的框架结构为

    If……then

    (elseif)……then

    endif

    For语句是控制循环语句的完整的框架结构为:“For……Next”。

    在这个程序中我们先理解If语句的含义。

    7/8

    如果(IF)H2单元格中的数据大于等于480,那么(Then)I2单元格中填充“优秀”,

    如果(IF)H2单元格中的数据大于等于460,那么(Then)I2单元格中填充“合格”,

    如果(IF)H2单元格中的数据小于460,那么(Then)I2单元格中填充“不合格”。

    这是IF语句的清晰的逻辑思路。

    8/8

    现在这个案例只是一个入门操作,只是对IF函数和VBA中的IF语句做一下对比,暂时还不能更准确地判断函数与VBA操作性的优劣。

    随着VBA学习的深入,你会发现VBA语言才是Excel操作的王道。

    VBA语言IF语句VBA入门
    本文关键词:

    版权声明:

    1、本文系转载,版权归原作者所有,旨在传递信息,不代表看本站的观点和立场。

    2、本站仅提供信息发布平台,不承担相关法律责任。

    3、若侵犯您的版权或隐私,请联系本站管理员删除。

    4、文章链接:http://www.1haoku.cn/art_588717.html

    相关资讯

    ©2019-2020 http://www.1haoku.cn/ 国ICP备20009186号05-05 10:15:19  耗时:0.027
    0.027s