вычислить ЭТО поле в агенте, записать в док и сохранить
можно использовать Evaluate, если удобно:
.....
Const макро$ = "формула поля"
Dim result As Variant
result = Evaluate(macro$, doc)
.....
кстати, если doc.Test(0)<Today = false, для первого же дока, значит агент в этот день, для старых доков уже сработал, поэтому сразу Exit sub
кстати, если doc.Test(0)<Today = false, для первого же дока, значит агент в этот день, для старых доков уже сработал, поэтому сразу Exit sub
что-то не пойму почему exit sub, а не следующий документ?