当前位置：首页>软件问题 > excel如何使用vba求当前日期所在季度

excel如何使用vba求当前日期所在季度

来源：番茄系统家园浏览：时间：2022-05-14 07:32:14

excel中使用vba求当前日期所在季度。

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

excel如何使用vba求当前日期所在季度

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

Sub 查询季度()

Dim jd As Date

Dim Msg

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

Msg = "季度: " & DatePart("q"， jd)

MsgBox Msg

End Sub

excel如何使用vba求当前日期所在季度

3、我们声明jd变量为日期类型，这里声明 Msg变量并没有给出具体类型，所以 vba会默认为variant类型。

excel如何使用vba求当前日期所在季度

4、给jd变量赋值，我们使用 inputbox函数，并设置一个提示“请输入一个日期：”，然后使用datepart函数来对inputbox返回的日期值，进行季度判断。其参数为q 。记住q的输入必须以双引号包括。

excel如何使用vba求当前日期所在季度

5、因为我们这里求的是指定日期所在的季度，所以不需要对星期天数起止或年度天数起止进行判断，也就是简写了日期的参数。

excel如何使用vba求当前日期所在季度

6、我们运行一下这个宏，指定日期为2016/8/19，来看看得到的结果。得到3季度，与正确答案一致。

excel如何使用vba求当前日期所在季度

推荐系统

雨林木风 winxp下载纯净版永久激活 winxp ghost系统 sp3 系统下载
64位
系统大小：0MB系统类型：WinXP
雨林木风在系统方面技术积累雄厚深耕多年，打造了国内重装系统行业知名品牌，雨林木风WindowsXP其系统口碑得到许多人认可，积累了广大的用户群体，是一款稳定流畅的系统，雨林木风 winxp下载纯净版永久激活 winxp ghost系统 sp3 系统下载，有需要的朋友速度下载吧。
系统等级：
进入下载 >
萝卜家园win7纯净版 ghost系统下载 x64 联想电脑专用
64位
系统大小：0MB系统类型：Win7
萝卜家园win7纯净版是款非常纯净的win7系统，此版本优化更新了大量的驱动，帮助用户们进行舒适的使用，更加的适合家庭办公的使用，方便用户，有需要的用户们快来下载安装吧。
系统等级：
进入下载 >
雨林木风xp系统 xp系统纯净版 winXP ghost xp sp3 纯净版系统下载
64位
系统大小：1.01GB系统类型：WinXP
雨林木风xp系统 xp系统纯净版 winXP ghost xp sp3 纯净版系统下载，雨林木风WinXP系统技术积累雄厚深耕多年，采用了新的系统功能和硬件驱动，可以更好的发挥系统的性能，优化了系统、驱动对硬件的加速，加固了系统安全策略，运行环境安全可靠稳定。
系统等级：
进入下载 >
萝卜家园win10企业版免激活密钥激活工具 V2023 X64位系统下载
64位
系统大小：0MB系统类型：Win10
萝卜家园在系统方面技术积累雄厚深耕多年，打造了国内重装系统行业的萝卜家园品牌，(win10企业版,win10 ghost,win10镜像),萝卜家园win10企业版免激活密钥激活工具 ghost镜像 X64位系统下载,其系统口碑得到许多人认可，积累了广大的用户群体，萝卜家园win10纯净版是一款稳定流畅的系统,一直以来都以用户为中心，是由萝卜家园win10团队推出的萝卜家园
系统等级：
进入下载 >
萝卜家园windows10游戏版 win10游戏专业版 V2023 X64位系统下载
64位
系统大小：0MB系统类型：Win10
萝卜家园windows10游戏版 win10游戏专业版 ghost X64位系统下载，萝卜家园在系统方面技术积累雄厚深耕多年，打造了国内重装系统行业的萝卜家园品牌，其系统口碑得到许多人认可，积累了广大的用户群体，萝卜家园win10纯净版是一款稳定流畅的系统,一直以来都以用户为中心，是由萝卜家园win10团队推出的萝卜家园win10国内镜像版，基于国内用户的习惯，做
系统等级：
进入下载 >
windows11下载萝卜家园win11专业版 X64位 V2023官网下载
64位
系统大小：0MB系统类型：Win11
萝卜家园在系统方面技术积累雄厚深耕多年，windows11下载萝卜家园win11专业版 X64位官网正式版可以更好的发挥系统的性能，优化了系统、驱动对硬件的加速，使得软件在WINDOWS11系统中运行得更加流畅，加固了系统安全策略，WINDOWS11系统在家用办公上跑分表现都是非常优秀，完美的兼容各种硬件和软件，运行环境安全可靠稳定。
系统等级：
进入下载 >