Ввести сразу несколько различных формул- Visual Basic(Бейсик)

Range("F1:H1").FormulaLocal = Array("=СУММ(A1:E1)", "=МИН(A1:E1)", "=МАКС(A1:E1)")

Range("F1:H1").Formula = Array("=SUM(A1:E1)", "=MIN(A1:E1)", "=MAX(A1:E1)")
Range("F1:H1").Replace What:="=", Replacement:="="