Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

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

 

= Мир MS Excel/Копирование ячейки в последнюю строку с включенным фильтром - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Копирование ячейки в последнюю строку с включенным фильтром
Копирование ячейки в последнюю строку с включенным фильтром
Fly12 Дата: Вторник, 28.01.2020, 21:51 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 11
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Добрый день! Если просто копировать, то работает нормально. Если применить фильтр, то копирует не по порядку, а прыгает на первую строку. Как можно улучшить код? Нужно чтобы копировало одинаково с включенным фильтром и без фильтра - копирование в последнюю пустую ячейку, если ячейка с текстом, то копирует ниже в пустую.

[vba]
Код
Private Sub Copy()
ActiveCell.Copy
Cells(Rows.Count, 4).End(xlUp).Offset(1, 0).PasteSpecial
End Sub
[/vba]
 
Ответить
СообщениеДобрый день! Если просто копировать, то работает нормально. Если применить фильтр, то копирует не по порядку, а прыгает на первую строку. Как можно улучшить код? Нужно чтобы копировало одинаково с включенным фильтром и без фильтра - копирование в последнюю пустую ячейку, если ячейка с текстом, то копирует ниже в пустую.

[vba]
Код
Private Sub Copy()
ActiveCell.Copy
Cells(Rows.Count, 4).End(xlUp).Offset(1, 0).PasteSpecial
End Sub
[/vba]

Автор - Fly12
Дата добавления - 28.01.2020 в 21:51
Pelena Дата: Вторник, 28.01.2020, 23:38 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 16487
Репутация: 3563 ±
Замечаний: ±

Excel 2010, 2016 & Mac Excel
Видимо, надо по-другому определять последнюю заполненную строку. Например, свойство CurrentRegion не обращает внимание на скрытые строки.
Подробнее при наличии файла с примером


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеВидимо, надо по-другому определять последнюю заполненную строку. Например, свойство CurrentRegion не обращает внимание на скрытые строки.
Подробнее при наличии файла с примером

Автор - Pelena
Дата добавления - 28.01.2020 в 23:38
Fly12 Дата: Четверг, 30.01.2020, 19:15 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 11
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Подробнее при наличии файла с примером

Фильтр через textbox1
К сообщению приложен файл: 9544477.xlsm(32.2 Kb)
 
Ответить
Сообщение
Подробнее при наличии файла с примером

Фильтр через textbox1

Автор - Fly12
Дата добавления - 30.01.2020 в 19:15
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Копирование ячейки в последнюю строку с включенным фильтром
  • Страница 1 из 1
  • 1
Поиск:

Яндекс цитирования
© 2010-2020 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!