Как ввести сразу несколько различных формул?

Категория: Basic

2012-08-21 15:49:27

code: #vba

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

code: #vba

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

Поделиться:

Sample Code