Макрос для перехода к последней заполненной ячейке в листе.
PORTANDREW
Дата: Воскресенье, 29.09.2019, 21:43 |
Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 30
Репутация:
0
±
Замечаний:
0% ±
Excel 2016
Доброго времени суток! Спасителям профанов! Ребят, поделитесь с макросом для быстрого перехода к последней заполненной ячейке в листе. В книге будет много далеко уходящих строк вниз, хотелось бы сделать кнопку для быстрого перехода к последней заполненной ячейке. Прилагаю простейший файл-пример, там много строк и примерно в конце есть заполненная.
Доброго времени суток! Спасителям профанов! Ребят, поделитесь с макросом для быстрого перехода к последней заполненной ячейке в листе. В книге будет много далеко уходящих строк вниз, хотелось бы сделать кнопку для быстрого перехода к последней заполненной ячейке. Прилагаю простейший файл-пример, там много строк и примерно в конце есть заполненная. PORTANDREW
К сообщению приложен файл:
2929.xlsm
(23.3 Kb)
ZAC
Сообщение отредактировал PORTANDREW - Понедельник, 30.09.2019, 08:28
Ответить
Сообщение Доброго времени суток! Спасителям профанов! Ребят, поделитесь с макросом для быстрого перехода к последней заполненной ячейке в листе. В книге будет много далеко уходящих строк вниз, хотелось бы сделать кнопку для быстрого перехода к последней заполненной ячейке. Прилагаю простейший файл-пример, там много строк и примерно в конце есть заполненная. Автор - PORTANDREW Дата добавления - 29.09.2019 в 21:43
Pelena
Дата: Понедельник, 30.09.2019, 08:02 |
Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 19405
Репутация:
4555
±
Замечаний:
±
Excel 365 & Mac Excel
PORTANDREW , зачем такой "кричащий" шрифт? Нормальный хорошо читается. Тем более, что в Правилах об этом тоже есть. Исправьте По теме как вариант [vba]Код
ActiveSheet.UsedRange.Find("*", , xlValues, xlWhole, , xlPrevious).Select
[/vba]
PORTANDREW , зачем такой "кричащий" шрифт? Нормальный хорошо читается. Тем более, что в Правилах об этом тоже есть. Исправьте По теме как вариант [vba]Код
ActiveSheet.UsedRange.Find("*", , xlValues, xlWhole, , xlPrevious).Select
[/vba]Pelena
"Черт возьми, Холмс! Но как??!!" Ю-money 41001765434816
Ответить
Сообщение PORTANDREW , зачем такой "кричащий" шрифт? Нормальный хорошо читается. Тем более, что в Правилах об этом тоже есть. Исправьте По теме как вариант [vba]Код
ActiveSheet.UsedRange.Find("*", , xlValues, xlWhole, , xlPrevious).Select
[/vba]Автор - Pelena Дата добавления - 30.09.2019 в 08:02
PORTANDREW
Дата: Понедельник, 30.09.2019, 08:33 |
Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 30
Репутация:
0
±
Замечаний:
0% ±
Excel 2016
зачем такой "кричащий" шрифт?
- Исправился, больше не буду! Pelena, Спасибо огромное, ВСЁ РАБОТАЕТ!
зачем такой "кричащий" шрифт?
- Исправился, больше не буду! Pelena, Спасибо огромное, ВСЁ РАБОТАЕТ!PORTANDREW
ZAC
Ответить
Сообщение зачем такой "кричащий" шрифт?
- Исправился, больше не буду! Pelena, Спасибо огромное, ВСЁ РАБОТАЕТ!Автор - PORTANDREW Дата добавления - 30.09.2019 в 08:33