番茄系统家园 - 免费重装系统!简单装系统,人人都是装机大师!
当前位置:首页>软件问题 > excel如何使用vba函数计算指定间隔月后的日期

excel如何使用vba函数计算指定间隔月后的日期

来源:番茄系统家园浏览:时间:2022-04-27 11:50:17

今天为大家分享excel中使用vba计算指定间隔月后的日期方法,不会的朋友可以参考本文,希望能对大家有所帮助!

步骤

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

excel如何使用vba函数计算指定间隔月后的日期

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

Option Explicit

Sub ddt()

Dim rq As Date

Dim lx As String

Dim n As Integer

Dim Msg

lx = "m"

rq = InputBox("请输入一个日期")

n = InputBox("输入增加月的数目:")

Msg = "新日期:" & DateAdd(lx, n, rq)

MsgBox Msg

End Sub

excel如何使用vba函数计算指定间隔月后的日期

3、这里我们先对变量做声明,其中rq变量为日期类型,lx为字符串,n为整数型。msg我并没有设置具体类型,vba会将其默认为可变类型variant。

excel如何使用vba函数计算指定间隔月后的日期

4、稍微详细的解释一下代码为什么会这样写,定义变量lx为一个字符串值,因为dateadd函数的必须参数1是一个字符串,这里做个定义其实等价于直接输入。但是这样便于阅读。

excel如何使用vba函数计算指定间隔月后的日期

5、输入日期我们并没有做错误纠正,那么只有对excel了解的人,才会输入正确的日期格式,这里我只做一个简单的示例,提示大家输入2016/8/19这样的格式日期。增加的月数我们是赋值给了n这个变量。

excel如何使用vba函数计算指定间隔月后的日期

6、最后用msgbox来输出最后的结果,其中,dateadd函数的第一参数是以月增加,第二参数是增加数,第三参数是指定的日期。运行代码我们可以得到结果。增加20个月后的结果。

excel如何使用vba函数计算指定间隔月后的日期

以上就是excel如何使用vba函数计算指定间隔月后的日期方法介绍,操作很简单的,大家学会了吗?希望这篇文章能对大家有所帮助!

推荐系统

  • 雨林木风 winxp下载 纯净版 永久激活 winxp ghost系统 sp3 系统下载

    雨林木风 winxp下载 纯净版 永久激活 winxp ghost系统 sp3 系统下载64位
    系统大小:0MB系统类型:WinXP

    雨林木风在系统方面技术积累雄厚深耕多年,打造了国内重装系统行业知名品牌,雨林木风WindowsXP其系统口碑得到许多人认可,积累了广大的用户群体,是一款稳定流畅的系统,雨林木风 winxp下载 纯净版 永久激活 winxp ghost系统 sp3 系统下载,有需要的朋友速度下载吧。

    系统等级:
    进入下载 >
  • 萝卜家园win7纯净版 ghost系统下载 x64 联想电脑专用

    萝卜家园win7纯净版 ghost系统下载 x64 联想电脑专用64位
    系统大小:0MB系统类型:Win7

    萝卜家园win7纯净版是款非常纯净的win7系统,此版本优化更新了大量的驱动,帮助用户们进行舒适的使用,更加的适合家庭办公的使用,方便用户,有需要的用户们快来下载安装吧。

    系统等级:
    进入下载 >
  • 雨林木风xp系统 xp系统纯净版 winXP ghost xp sp3 纯净版系统下载

    雨林木风xp系统 xp系统纯净版 winXP ghost xp sp3 纯净版系统下载64位
    系统大小:1.01GB系统类型:WinXP

    雨林木风xp系统 xp系统纯净版 winXP ghost xp sp3 纯净版系统下载,雨林木风WinXP系统技术积累雄厚深耕多年,采用了新的系统功能和硬件驱动,可以更好的发挥系统的性能,优化了系统、驱动对硬件的加速,加固了系统安全策略,运行环境安全可靠稳定。

    系统等级:
    进入下载 >
  • 萝卜家园win10企业版 免激活密钥 激活工具 V2023 X64位系统下载

    萝卜家园win10企业版 免激活密钥 激活工具 V2023 X64位系统下载64位
    系统大小:0MB系统类型:Win10

    萝卜家园在系统方面技术积累雄厚深耕多年,打造了国内重装系统行业的萝卜家园品牌,(win10企业版,win10 ghost,win10镜像),萝卜家园win10企业版 免激活密钥 激活工具 ghost镜像 X64位系统下载,其系统口碑得到许多人认可,积累了广大的用户群体,萝卜家园win10纯净版是一款稳定流畅的系统,一直以来都以用户为中心,是由萝卜家园win10团队推出的萝卜家园

    系统等级:
    进入下载 >
  • 萝卜家园windows10游戏版 win10游戏专业版 V2023 X64位系统下载

    萝卜家园windows10游戏版 win10游戏专业版 V2023 X64位系统下载64位
    系统大小:0MB系统类型:Win10

    萝卜家园windows10游戏版 win10游戏专业版 ghost X64位 系统下载,萝卜家园在系统方面技术积累雄厚深耕多年,打造了国内重装系统行业的萝卜家园品牌,其系统口碑得到许多人认可,积累了广大的用户群体,萝卜家园win10纯净版是一款稳定流畅的系统,一直以来都以用户为中心,是由萝卜家园win10团队推出的萝卜家园win10国内镜像版,基于国内用户的习惯,做

    系统等级:
    进入下载 >
  • windows11下载 萝卜家园win11专业版 X64位 V2023官网下载

    windows11下载 萝卜家园win11专业版 X64位 V2023官网下载64位
    系统大小:0MB系统类型:Win11

    萝卜家园在系统方面技术积累雄厚深耕多年,windows11下载 萝卜家园win11专业版 X64位 官网正式版可以更好的发挥系统的性能,优化了系统、驱动对硬件的加速,使得软件在WINDOWS11系统中运行得更加流畅,加固了系统安全策略,WINDOWS11系统在家用办公上跑分表现都是非常优秀,完美的兼容各种硬件和软件,运行环境安全可靠稳定。

    系统等级:
    进入下载 >