Excel VBA - 执行 While 循环 - 单元格中的日期

Question

我想增加 （分配给单元格 N13） 的结算日期，直到网络天数（分配给单元格 P11）达到 3。

工作日计算两个日期之间的工作日数，不包括节假日。但是，我添加了一系列假期。

Sub Settlement_Date()

Do While Cells(16, 12) < 3
    
    Cells(14,11)
    
Loop

Answer 1

要在循环内增加 Cells(14,11)，将该行更改为

Cells(14,11) = Cells(14,11) + 1

Answer 2

我自己设法做到了，但在我在这里找到的post

中得到了一些片段

Sub Settlement_Date()

Do While ActiveCell.Offset(0, 2).Value < 3 

    ActiveCell.Value = ActiveCell.Value + 1
    
Loop

End Sub

Moving Right One Cell Add one day to date in cells using VBA

Excel VBA - Do While Loop - Date in a cell