广告合作
  • 今日头条

    今日头条

  • 百度一下

    百度一下,你就知道

  • 新浪网

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

  • 搜狐

    搜狐

  • 豆瓣

    豆瓣

  • 百度贴吧

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

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

    excel中vba里的ontime函数的使用方法

    来源:网络收集  点击:  时间:2024-07-24
    【导读】:
    小编致力于为大家奉献最有效的经验,让大家能够解决掉问题,但是大家也都知道,每个人遇到的情况都是不一样的,大家在看小编经验的同时,除了跟随操作,也需要自己的思考,举一反三的解决问题,这样才会变得更加有内涵,成为和小编一样的经验达人。excel中vba里的ontime函数的使用方法,这里,让小编给大家介绍一下。工具/原料moreexcel2016此经验本人原创首发,未经本人许可请勿转载。方法/步骤1/7分步阅读

    首先我们打开一个工作样表作为例子。

    2/7

    我们使用alt+f11组合快捷键进入vbe编辑器,插入一个新的模块,并在模块中输入以下代码:

    Sub proce()

    Range(a1) = Format(Time(), h:mm:ss)

    End Sub

    3/7

    这段代码是在a1单元格内输入时间,并且格式是小时:分钟:秒的形式。运行这段代码。会在a1单元格内现实当前的时间。如果我们需要时钟运行起来,我们可以使用一个循环语句,并设置无限循环。

    4/7

    写了一个go循环,可以实现计时,但是效率低,无实用性,这时候我们就需要使用ontime函数来定时触发proce过程,同样实现时钟运行的目的,但是代码效率高的多。

    Option Explicit

    Dim i As Integer

    Sub proce()

    i = 0

    1 If i = 0 Then

    Range(a1) = Format(Time(), h:mm:ss)

    End If

    GoTo 1

    End Sub

    5/7

    我们输入以下代码

    Sub runtimer()

    Application.OnTime Now() + TimeValue(00:00:01), procedure:=proce

    End Sub

    6/7

    可以看到我们设置了当前时间加1秒时重复运行proce过程,然后在proce过程中添加runmimer()过程,那么两个过程交互调用,每隔1秒就运行一次,这就是ontime函数的定时运行功能。这种方式下代码运行的效率提高,就可以同时并行处理其他的工作。而不是时刻占用处理线程。

    7/7

    先写到这里了,谢谢大家的观看。

    祝大家生活愉快。

    小编还有许多其他的经验可以观看,如果无法解决问题可以联系小编进行咨询。

    看不清楚图片的可以点击放大再看哦。

    注意事项

    个人经验,仅供参考。

    EXCEL编程语言VBAONTIME
    本文关键词:

    版权声明:

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

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

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

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

    相关资讯

    ©2019-2020 http://www.1haoku.cn/ 国ICP备20009186号05-06 06:45:54  耗时:0.029
    0.0286s