Excel и VBscript дает мне Invalid вызов процедуры или аргумент

Question

Я пишу VBScript для создания календаря и на этой линии, я получаю сообщение об ошибке:

With objExcel.Range("A1:U28") 
    '.FormatConditions.Add xlCellValue, xlEqual, "=TODAY()" --- CRASH 
    objExcel.Range("A1:U28").FormatConditions.Add xlCellValue,xlEqual,"=Today()" // CRASH 
    .FormatConditions(1).Font.ColorIndex = 2 
    .FormatConditions(1).Interior.ColorIndex = 1 
End With 

Ошибка: Неправильный вызов процедуры или аргумент

Answer 1

В VBScript вы должны явно определять константы, такие как xlCellValue (и вы не можете использовать именованные параметры через :=). cf info