VBA INT |如何在VBA Excel中使用整数函数？
Excel VBA INT（整数）函数
VBA INT 是一个内置函数，用于仅提供给我们输入的数字的整数部分，该函数用于那些其小数部分影响不大的数据，以便使用INT函数简化计算或分析仅获取整数值。
该功能在工作表以及VBA中均可用。整数函数将特定数字四舍五入为最接近的整数。
VBA Int函数可以在子过程和功能过程中使用。现在来看一下VBA中INT函数的语法。
它只有一个论点可以提供，即 数字
- 数字 是我们要转换为INTEGER的数字。提供数字后，INT函数会将其四舍五入为最接近的整数。
例如，如果提供的数字为68.54，则Excel VBA Int函数将四舍五入为68，该数字接近零。如果提供的数字为-68.54，则INT函数会将数字四舍五入为零的69。
如何使用VBA INT功能？
您可以在此处下载此VBA INT Excel模板– VBA INT Excel模板范例＃1
现在，看一下VBA中“ INT”功能的简单示例。让我们执行将数字84.55舍入到最接近的整数的任务。
步骤1： 启动子过程。
第2步： 将变量声明为 整数.
代码：
Sub INT_Example1（）Dim K作为整数结束Sub
第三步： 现在，将公式分配给变量“ķ”通过应用INT函数。
代码：
Sub INT_Example1（）Dim K作为整数K = Int（End Sub
第4步： 提供为 84.55.
注意：由于它是一个数字，因此我们不需要提供双引号。
代码：
Sub INT_Example1（）Dim K作为整数K = Int（84.55）End Sub
步骤5： 现在在VBA消息框中传递变量的结果。
代码：
Sub INT_Example1（）Dim K作为整数K = Int（84.55）MsgBox K End Sub
好的，让我们运行代码，看看会发生什么。
因此，结果是 84 并四舍五入到最接近的整数值。
范例＃2
现在使用带有负号的相同数字，我们将尝试转换为最接近的整数值。下面是带负号的代码。
代码：
Sub INT_Example2（）Dim k As Integer k = Int（-84.55）'带INT函数的负数MsgBox k End Sub
当我运行此代码时，它已将数字四舍五入到 -85.
Example＃3 –从日期和时间中提取日期部分
在我的职业生涯中，很少遇到过从日期和时间组合中提取日期和时间的情况。
例如，请查看以下日期和时间数据。
如何提取日期部分和时间？
首先，我们需要提取日期部分，为此我们应用INT函数。下面的代码将从上述数据中提取DATE部分。
代码：
Sub INT_Example2（）Dim k作为整数，对于k = 2至12个Cells（k，2）.Value = Int（Cells（k，1）.Value）'这会将日期提取到第二列Cells（k，3）。值= Cells（k，1）.Value-Cells（k，2）.Value'这会将时间提取到第三列Next k End Sub
运行此代码，您可能会得到如下所示的结果（如果未应用格式设置）。
在日期栏中，将格式设置为 “ DD-MMM-YYYY” 对于时间列，将Excel中的日期格式应用为 “ HH：MM：SS AM / PM”
