Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Ветеран


Contributor


Сообщения: 24955
Благодарности: 7250

Профиль | Отправить PM | Цитировать


Цитата 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
Это сообщение посчитали полезным следующие участники:

Отправлено: 20:50, 09-03-2012 | #2