Использование счета, если с датами

Question

я пытаюсь подсчитать, сколько дат в столбце G (или даже лучше: столбец с заголовком «дата документа») являются:

• 3 трудодня старые или менее
• между 3 и 30 рабочих дней
• более 30 рабочих дней

Эти формулы, которые я использую в Excel, но я хотел бы сделать это только с одним щелчком мыши, так как файл Excel является загрузка с SAP и каждый день новые загрузки выполняется.

=COUNTIF(G:G, ">=" & WORKDAY(TODAY(),-1)-2) 

=COUNTIF(G:G,"<=" & WORKDAY(TODAY(),-1)-3) - COUNTIF(G:G, "<=" & WORKDAY(TODAY(),-1)-30) 

=COUNTIF(G:G, "<=" & WORKDAY(TODAY(),-1)-30) 

Я новичок в VBA и не могу перевести его на код vba.

Надеюсь, вы можете мне помочь.

Спасибо!

Answer 1

в VBA формулы должны быть

=COUNTIF(G:G, "">="" & WORKDAY(TODAY(),-1)-2) 
=COUNTIF(G:G,""<="" & WORKDAY(TODAY(),-1)-3) - COUNTIF(G:G, ""<="" & WORKDAY(TODAY(),-1)-30) 
=COUNTIF(G:G, ""<="" & WORKDAY(TODAY(),-1)-30) 

Например, если вы хотите формулы быть в H1, H2 H3 & клетки, то VBA код будет

Cells(1, 8).Value = "=COUNTIF(G:G, "">="" & WORKDAY(TODAY(),-1)-2)" 
Cells(2, 8).Value = "=COUNTIF(G:G,""<="" & WORKDAY(TODAY(),-1)-3) - COUNTIF(G:G, ""<="" & WORKDAY(TODAY(),-1)-30)" 
Cells(3, 8).Value = "=COUNTIF(G:G, ""<="" & WORKDAY(TODAY(),-1)-30)"