VBA DateSerial函数|如何使用DateSerial函数？ （例子）
Excel VBA DateSerial函数
VBA中的DateSerial函数 从用户提供的值中返回日期。我们需要提供什么是年，什么是天，什么是月。结果将基于系统的日期格式。
以下是的语法 DATESERIAL功能.
＃1年： 我们需要输入整数作为年份？在提供整数时，我们需要牢记以下几点。
- 我们可以提供0到9999之间的数字。
- 从1930年到2029年将处理从0到99的一位数和两位数。
- 负整数将从2000年中减去。例如，如果您提供-1，则结果将是1999，因为2000 – 1 = 1999。
＃2个月： 我们需要输入整数作为月份？输入此数字时，我们需要牢记以下几点。
- 我们只能提供1到12之间的数字。
- 如果提供的整数值为0，则它将表示上一年的月份“ December”。
- 如果提供的整数值为-1，则它将表示上一年的“十一月”月份。这样，当负值增加时，它将继续代表倒退的月份。
- 如果提供的数字大于12，即如果数字为13，则表示第二年的“一月”月份；如果数字为14，则将其视为第二年的“二月”月份。
＃3 –天： 我们需要输入整数作为星期几？输入此数字时，我们需要牢记以下几点。
- 我们可以输入当前月份的1到31之间的整数。
- 如果数字为0，则表示上个月的最后一天。
- 如果数字为-1，则表示上个月的第二天。
- 如果您提供本月的最后一天+1，那么它将代表下个月的第一天。例如，如果八月的最后一天是31，而您提供的日期是31 +1，那么它将代表九月的第一天。
如何在VBA中使用DATESERIAL函数？
您可以在此处下载此VBA DateSerial Excel模板– VBA DateSerial Excel模板范例＃1
要使用DATESERIAL函数，请开始编写宏代码。
步骤1：开始子程序
首先，如下所示创建一个VBA子过程。
步骤2：声明变量
现在将变量声明为DATE。
步骤3：将DateSerial函数分配给该变量。
现在为该变量分配DATESERIAL函数。
步骤4：现在在DateSerial函数中输入年，月和日值
对于2019年YEAR供应，对于MONTH 08供应以及对于DAY 05供应。
步骤5：在消息框中显示结果
现在，在消息框中显示变量“我的日期”的结果。
代码：
Option Explicit Sub DateSerial_Example1（）Dim Mydate作为Date Mydate = DateSerial（2019，8，5）MsgBox Mydate End Sub
步骤6：运行代码
现在运行此代码以查看下面的日期。
结果为“ 8/5/2019”。在我的系统中，日期格式为“ MM-DD-YYYY”，这就是为什么结果也采用相同格式的原因。
我们还可以通过使用VBA中的FORMAT函数来更改日期格式。如下所示应用FORMAT函数。
代码：
选项显式子DateSerial_Example1（）Dim Mydate作为Date Mydate = DateSerial（2019，8，5）MsgBox Format（Mydate，“ DD-MMM-YYYY”）End Sub
这将采用“ DD-MMM-YYYY”格式，结果如下。
范例＃2
我们还可以声明变量并将值提供给这些变量。例如，请看下面的代码。
代码：
Sub DateSerial_Example2（）Dim Mydate作为日期Dim MyYear作为整数Dim MyMonth作为Integer Dim MyDay作为Integer MyYear = 2019 MyMonth = 8 MyDay = 5 Mydate = DateSerial（MyYear，MyMonth，MyDay）MsgBox格式（Mydate，“ DD-MMM-YYYY” “）结束子
我们没有直接向DATESERIAL函数提供年，月和日，而是声明了变量并为其分配了值。然后，我们将变量提供给DATESERIAL函数。
这就是我们可以利用VBA中的变量来存储值的方式。
例子＃3
现在我们将尝试这一年。我将年份值指定为1并查看结果。
YEAR中的一位数和两位数表示从1930年到2029年的年份。因此01表示2001，02表示2002，依此类推。
现在，将月份号更改为0并查看结果。
在这里看代码，Year是2019，month是0.但是看看结果是05-Dec-2019，而提供的年份是2019则是2018，即前一年。
这是因为由于我们提供的月份为0，DATESERIAL函数将月份从上一年的最后一个月开始，因此也相应地更改了年份。
像这样尝试不同的数字以查看功能的影响。
要记住的事情
- 您需要知道什么数字代表哪个年，月和日托。仔细阅读语法说明以了解。
- 结果将基于系统的日期格式，如果要修改结果，则需要应用FORMAT函数，并根据需要方便地提及日期格式。
