Последняя заполненная ячейка в столбце

Вход

Регистрация

Напомнить пароль

= Мир MS Excel/Последняя заполненная ячейка в столбце - Мир MS Excel

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Последняя заполненная ячейка в столбце (Макросы/Sub)

Последняя заполненная ячейка в столбце

NiceDay

Дата: Четверг, 02.04.2015, 13:46 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 1

Репутация: 0 ±

Замечаний: 0% ±

Excel 2007

День добрый! Задача следующая: с помощью макроса копировать последние ячейки столбцов С и D (оранжевые) до последней заполненной ячейки в столбце В (синие). При этом синие столбцы периодически будут заполняться и оранжевые необходимо будет снова копировать до последней заполненной в столбце В. Т.е. в макросе нельзя использовать абсолютное имя ячейки с которой мы начинаем копирование.
Макрос написала, а заменить название ячеек начала копирования (с2 и d2) на переменную не получается, выдает ошибку.
Посмотри, пожалуйста, что можно применить?

К сообщению приложен файл: 8825591.xlsx (11.5 Kb)

Ответить

_Boroda_

Дата: Четверг, 02.04.2015, 14:05 | Сообщение № 2

Группа: Модераторы

Ранг: Местный житель

Сообщений: 16675

Репутация: 6481 ±

Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS

Так нужно?
[vba]

Код

    r0_ = Range("C" & Rows.Count).End(xlUp).Row
     n_ = Range("B" & Rows.Count).End(xlUp).Row - r0_
     If n_ Then Range("C" & r0_).Resize(n_ + 1, 2) = Range("C" & r0_).Resize(, 2).Value

[/vba]

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995

Ответить

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Последняя заполненная ячейка в столбце (Макросы/Sub)

Страница 1 из 1
1