Недавнее содержимое от Masha

Я тут впервые ещё плохо тут ориентируюсь. Позже разберусь. Благодарю за помощь.

Ещё раз спасибо. Всё работает как надо.

Нет, ранее мне был предложен другой макрос Sub CalculateRow() Dim selectedRow As Integer selectedRow = ActiveCell.Row Range("I" & selectedRow).Formula2R1C1 = "=--SUBSTITUTE(DATE(ROW(INDIRECT(YEAR(R" & selectedRow & "C[-7])&"":""&YEAR(R" & selectedRow &...

Да.

Спасибо при использовании FormulaR1C1 и Formula2R1C1 всё работает нормально. Лучше бы с макросам кто-нибудь помог.

Одну проблему я нашла и исправила в Вашем макросе вместо FormulaR1C1 пишу Formula2R1C1 и расчет, так скажем, выводится развернутым. Осталось сделать так чтобы результаты расчетов выводились не напротив выбранной строки ,а с 3-ей строки столбца I.

Вот картинка результата расчета столбца В строки 3. Вот так надо, чтобы отображался расчет выбранной строки. При выполнении Вашего макроса получается картинка Макрос_3. Обратите внимание на разницу формул в строке формул.

Спасибо за быстрый от вет. Макрос срабатывает, но результат выдает не в том виде как хотелось бы и всё потому, что в формуле появляется значок @ и результат вычисления пишется в одну строку, а надо чтобы выводился весь массив расчета. Если убрать из формулы значок @, будет работать нормально...

Всем привет. Я тут на форуме впервые. Знаний по VBA практически ноль, т.ч. прошу отнестись снисходительно. Вопрос у меня такой. Есть таблица в диапазоне В3:G11, в приложенном файле при нажатии в столбце А в строках 3-11 справа от таблицы происходит расчет данных , выбранной строки. Всё работает...