VBA: как учитывать значения WEEKNUM 2019 при применении текста

У меня есть столбец, в котором записаны недели WEEKNUM (эта неделя - неделя 28), а затем, если значение меньше, чем на этой неделе, оно помечается как «Поздно». Код работает нормально, но некоторые недели меньше, чем эта неделя, относятся к 2019 году. Я включил пример изображения ниже, чтобы продемонстрировать, что я делаю. Я не уверен, как настроить мой VBA для учета значений 2019 года.

With isum.workSheets("Orders")
With .Range(.Cells(2, "X"), .Cells(.Rows.Count, "O").End(xlUp).Offset(0, 9))
    .Formula = "=weeknum(o2)"
    .NumberFormat = "0_)"
    .FormatConditions.Delete
    With .FormatConditions.Add(Type:=xlExpression, Formula1:="=x2<weeknum(today())")
        .NumberFormat = "L\at\e_)"
    End With
End With

Конец с

Формула WEEKNUM применяется к дате получения


person Community    schedule 10.07.2018    source источник
comment
Почему бы не добавить номер года в начало и не отформатировать номер недели с двумя значащими цифрами?   -  person Rory    schedule 10.07.2018
comment
Что было бы эффективным способом сделать это?   -  person    schedule 10.07.2018


Ответы (1)


Пытаться,

...
... , Formula1:="=and(x2<weeknum(today()), year(o2)=year(today()))")
...
person Community    schedule 10.07.2018