Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц, летом дешевле!

Ответ
 
Опции темы Поиск в этой теме
Старый 02.10.2009, 10:03   #1
faiza
 
Регистрация: 02.10.2009
Сообщений: 8
По умолчанию Вставка формул в столбцы

Подскажите, плиз, как с помощью VBA написать: В столбец D вставляем формулу1, начиная с определённой ячейки(допустим с 16-й) и до конца таблицы, так через шаг =3; а в столбец Е всавляем формулу2, начиная с определённой ячейки(допустим с 16-й) и до конца таблицы, так через шаг =3.
faiza вне форума Ответить с цитированием
Старый 02.10.2009, 10:36   #2
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,176
По умолчанию

Например, так:
Код:
Sub InsertFormula()
    Dim i As Long: Application.ScreenUpdating = False
    For i = 16 To Cells(Rows.Count, "D").End(xlUp).Row Step 3: Cells(i, "D").FormulaR1C1 = "=R[-2]C+R[-1]C": Next
    For i = 16 To Cells(Rows.Count, "E").End(xlUp).Row Step 3: Cells(i, "E").FormulaR1C1 = "=R[-2]C*R[-1]C": Next
End Sub
Чем шире угол зрения, тем он тупее.
SAS888 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц, летом дешевле!

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
поменять столбцы на строки olimpus Microsoft Office Excel 3 24.10.2011 09:50
Вставка формул и скриншотов в сообщение на форуме, работа с FTP EducatedFool Microsoft Office Excel 2 27.03.2011 15:16
Взаимосвязанный столбцы! nikolai_P Microsoft Office Access 0 19.06.2009 11:29
Поменять столбцы в массиве Wildstudent Паскаль, Turbo Pascal, PascalABC.NET 5 16.06.2009 16:33
как копировать столбцы BEKO83 Помощь студентам 1 09.02.2009 20:17