excel表格中的日期怎么通过vba计算日期所在季度?
发布时间：2016-08-19 17:03:25 作者：佚名 
我要评论
我要评论excel表格中的日期怎么通过vba计算日期所在季度？excel表格中有很多日期，想知道这些日期都是哪个季度的，该怎么办呢？下面我们就来看看求出日期所在季度的教程，需要的朋友可以参考下
excel中使用vba求当前日期所在季度
1、首先我们打开一个工作样表作为例子。
2、使用alt+f11组合快捷键进入vbe编辑器，插入一个新的模块，并在模块中输入以下代码：
Sub 查询季度()
Dim jd As Date
Dim Msg
jd = InputBox("请输入一个日期:")
Msg = "季度: " & DatePart("q", jd)
MsgBox Msg
End Sub
3、我们声明jd变量为日期类型，这里声明Msg变量并没有给出具体类型，所以vba会默认为variant类型。
4、给jd变量赋值，我们使用inputbox函数，并设置一个提示“请输入一个日期：”，然后使用datepart函数来对inputbox返回的日期值，进行季度判断。其参数为q。记住q的输入必须以双引号包括。
5、因为我们这里求的是指定日期所在的季度，所以不需要对星期天数起止或年度天数起止进行判断，也就是简写了日期的参数。
6、我们运行一下这个宏，指定日期为2016/8/19，来看看得到的结果。得到3季度，与正确答案一致。
相关推荐：
相关文章
- excel如何使用vba函数计算指定间隔月后的日期？很多朋友并不是很清楚，所以下面小编就为大家详细介绍一下，不会的朋友可以参考本文，希望能对大家有所帮助2016-08-19
- 今天小编为大家分享利用excel vba编程在窗体上画盆子方法，教程很不错，值得大家学习，推荐到脚本之家，一起来学习吧2016-08-19
- 这篇教程主要是向脚本之家的朋友分享excel vba编程制作一个恶作剧小程序方法，教程比较基础，但很不错，推荐过来，一起来学习吧2016-08-17
- excel怎么借助vba画一个简笔画西红柿？excel中可以使用vba变成来绘制一些图形，今天我们就来看看绘制一个简笔画番茄的教程，很简单，需要的朋友可以参考下2016-08-17
- 这篇教程是向脚本之家的朋友分享excel vba编程怎么画西红柿方法，教程很不错，值得大家学习，推荐过来，一起来学习吧2016-08-17
- excel中怎么使用vba查看字符串的asc值？我们想要查看某个字符串的asc的值，就可以使用vba来查看，具体该怎么实现呢？下面我们就来看看详细的教程，需要的朋友可以参考下2016-08-17
- excel怎么借用VBA绘制小卡车？excel中直接绘制图形很困难，我们要借助vba窗体，下面我们就来看看详细的画法，很简单，需要的朋友可以参考下2016-08-16
- excel怎么使用vba一键隐藏所有工作表？excel中很多工作表机密性比较大，想要隐藏起来，该怎么隐藏呢？一个一个隐藏太慢，下面我们就来看看使用vba一键隐藏所有工作表的详细2016-08-15
- excel怎么将表格中的美元转换为人民币？excel表格中全是美元，想将美元全部转换成人民不，该怎么转换呢？下面我们就来看看详细的教程，需要的朋友可以参考下2016-08-14
- 这篇教程是向脚本之家介绍excel vba编程在窗体上画微波炉方法，方法很简单的，有需要的朋友可以参考本文，希望能对大家有所帮助2016-08-12
最新评论