如何在 vba 中使用 networkdays（带有示例）

您可以使用 VBA 中的NetworkDays方法来查找特定开始日期和结束日期之间的整个工作日数。

请注意，工作日不包括周末和节假日。

以下是在实践中使用此方法的常见方法：

 Sub CalculateNetworkDays()

Dim i As Integer

For i = 2 To 9
    Range("C" & i) = WorksheetFunction.NetworkDays(Range("A" & i), Range("B" & i))
Next i

End Sub 

此特定示例计算范围A2:A9中的开始日期和范围B2:B9中的结束日期之间的工作日数，并在范围C2:C9中显示结果。

以下示例展示了如何在实践中使用此语法。

示例：如何在 VBA 中使用 NetworkDays

假设我们在 Excel 中有以下开始日期和结束日期列表：

假设我们要使用 VBA 中的NetworkDays方法来计算每行的开始日期和结束日期之间的整个工作日数。

我们可以创建以下宏来执行此操作：

 Sub CalculateNetworkDays()

Dim i As Integer

For i = 2 To 9
    Range("C" & i) = WorksheetFunction.NetworkDays(Range("A" & i), Range("B" & i))
Next i

End Sub

当我们运行这个宏时，我们会收到以下输出：

C 列显示每行开始日期和结束日期之间的完整工作日数。

例如：

• 1/2/2023 和 1/3/2023 之间的工作日数为2 。 （因为这两个日期都是周末）。
• 1/5/2023 和 1/8/2023 之间的工作日数为2 。
• 01/10/2023 至 01/20/2023 之间的工作日数为9 。

等等。

注意：您可以在此处找到 VBA 中NetworkDays方法的完整文档。

其他资源

以下教程说明如何在 VBA 中执行其他常见任务：

VBA：如何从日期获取月份名称
VBA：如何使用 IsDate 检查单元格是否为日期
VBA：如何使用 mm/dd/yyyy 作为日期格式