Цитата PhilB:
На последней приведенной строке возникает 1004 ошибка "Application-defined or object-defined error". Пробовал разные вариации на тему, но получается та же ошибка. »
|
PhilB, недостаточно приведённых данных для ответа.
Цитата PhilB:
Как реализовать банальнейшее присвоение значения ячейке??? »
|
Именно так, как у Вас написано. Но Вы хотите присвоить ячейке не значение, а формулу. Соответственно, Вы должны использовать не свойство «.Value», а свойства
.Formula/
.FormulaLocal или
.FormulaR1C1/
.FormulaR1C1Local.
Using Microsoft Excel Worksheet Functions in Visual Basic [Excel 2003 VBA Language Reference]:
Цитата:
…
Inserting a Worksheet Function into a Cell
To insert a worksheet function into a cell, you specify the function as the value of the Formula property of the corresponding Range object. In the following example, the RAND worksheet function (which generates a random number) is assigned to the Formula property of range A1:B3 on Sheet1 in the active workbook.
Код:
Sub InsertFormula()
Worksheets("Sheet1").Range("A1:B3").Formula = "=RAND()"
End Sub
|