Как написать иструкцию на языке Visual Basic for Application(VBA)-язык макрос,чтобы вывести в табл Excel числа Фибоначчи

Question

Как написать иструкцию на языке Visual Basic for Application(VBA)-язык макрос,чтобы вывести в табл Excel числа Фибоначчи

Бахтиk Ученик (141), закрыт 13 лет назад

Как написать иструкцию на языке Visual Basic for Application(VBA)-язык макросов в MS Excel,чтобы вывести в таблицу числа Фибоначчи, хотя бы до 60 члена последовательности??

Answer 1

Sub ppp1()
Ë = 60
kk = 1
ff1 = 1
ff2 = 1
For ii = 3 To Ë
ff = ff2 + ff1
ff1 = ff2
ff2 = ff
Cells(kk, 1) = ff
kk=kk+1
Next ii
End Sub