广告合作
  • 今日头条

    今日头条

  • 百度一下

    百度一下,你就知道

  • 新浪网

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

  • 搜狐

    搜狐

  • 豆瓣

    豆瓣

  • 百度贴吧

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

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

    怎样使用VBA利用名称动态求和?

    来源:网络收集  点击:  时间:2024-05-19
    【导读】:
    随着手机里面功能越来越丰富,让我们使用起来越来越方便了,给我们的生活带来了极大的便利。怎样使用VBA利用名称动态求和?工具/原料more手机方法/步骤1/5分步阅读

    首先在开发工具中打开VBA编辑器

    2/5

    在单元格区域当中输入一些内容作为例子

    3/5

    在VBA编辑器中插入模块

    4/5

    在模块当中输入如下代码,然后运行

    Private Sub Worksheet_Change(ByVal Target As Range)If Target.Address=$E$2 ThenActiveWorkbook.Names.Add Name:=语文, RefersToR1C1:==Sheet1! Range(, Range(b1048576).End(xlUp)).Address(, , xlR1C1)ActiveWorkbook.Names.Add Name:=数学, RefersToR1C1:==Sheet1! Range(, Range(c1048576).End(xlUp)).Address(, , xlR1C1)ActiveWorkbook.Names.Add Name:=地理, RefersToR1C1:==Sheet1! Range(, Range(d1048576).End(xlUp)).Address(, , xlR1C1)MsgBox Target 合计为: WorksheetFunction.Sum(Range(Target.Text))End IfEnd Sub

    5/5

    在单元格E2下拉框中选择一个求和项目,程序将弹出该项目的汇总数据

    注意事项

    智能手机助理给我们的生活带来了极大的便利!

    本文关键词:

    版权声明:

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

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

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

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

    相关资讯

    ©2019-2020 http://www.1haoku.cn/ 国ICP备20009186号05-05 22:38:11  耗时:0.025
    0.0253s