Excel. Последняя ячейка в таблице. / Microsoft Office

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel. Последняя ячейка в таблице.

9 сообщений из 9, страница 1 из 1

Excel. Последняя ячейка в таблице.

#33362864

Ярило

Гость

Как программно определить последнюю ячейку в таблице Excel?

...

Рейтинг:

0 / 0

06.11.2005, 16:20:29

| Ответить | Цитировать | Написать

Excel. Последняя ячейка в таблице.

#33363247

Пользователь2

Гость

Какой-то расплывчатый вопрос. Если есть таблица диапазона A1:B5, то что по вашему должно быть последней ячейкой?

...

Рейтинг:

0 / 0

07.11.2005, 08:18:15

| Ответить | Цитировать | Написать

Excel. Последняя ячейка в таблице.

#33365164

Ярило

Гость

Извините за не очень понятную формулировку вопроса.
Как программно определить последнюю заполненную ячейку в таблице?

...

Рейтинг:

0 / 0

07.11.2005, 20:20:35

| Ответить | Цитировать | Написать

Excel. Последняя ячейка в таблице.

#33365256

White Owl

Участник

Сообщения: 12 726

Рейтинг: 0 / 0

Worksheet.UsedRange

...

Рейтинг:

0 / 0

07.11.2005, 22:05:06

| Ответить | Цитировать | Написать

Excel. Последняя ячейка в таблице.

#33374707

glazz_gms

Участник

Сообщения: 108

Рейтинг: 0 / 0

ДА очень просто n=cells(65536,1).end(xlup).row в переменной n будет последняя заполненная ячейка в столбце 1.

...

Рейтинг:

0 / 0

11.11.2005, 21:45:09

| Ответить | Цитировать | Написать

Excel. Последняя ячейка в таблице.

#33378179

dbf97

Гость

ну или так
Set TransRowRng = .Cells(1, 1).CurrentRegion
Endrow = TransRowRng.Rows.Count

...

Рейтинг:

0 / 0

15.11.2005, 10:21:15

| Ответить | Цитировать | Написать

Excel. Последняя ячейка в таблице.

#33839049

Ivan33

Участник

Откуда: Оттуда! А куда? Туда!

Сообщения: 948

Рейтинг: 0 / 0

This procedure selects the last used cell in a worksheet.

Код: plaintext

1.
2.
3.
4.
5.
6.
7.

Sub GotoLast()
    On Error Resume Next
    Application.ScreenUpdating = False
    Cells(Cells.Find("*", Range("A1"), , , xlByRows, xlPrevious).Row, _
    Cells.Find("*", Range("A1"), , , xlByColumns, xlPrevious).Column).Select
    If Err.Number <>  0  Then MsgBox "No data in sheet"
    Application.ScreenUpdating = True
End Sub

...

Рейтинг:

0 / 0

07.07.2006, 16:41:16

| Ответить | Цитировать | Написать

Excel. Последняя ячейка в таблице.

#33839366

betepon

Гость

Мне в свое время посоветовали следующий метод

Код: plaintext

1.
2.
3.
4.

Dim iRow As integer ' последняя строка
Dim iClm As integer ' последний столбец

iRow = ActiveSheet.UsedRange.row + ActiveSheet.UsedRange.Rows.Count -  1 
iClm = ActiveSheet.UsedRange.Column + ActiveSheet.UsedRange.Columns.Count -  1

работает 100%. Реально получаешь координаты последней заполненной ячейки из последнего столбца и последней строки (даже если в ячейке пробел).

С уважением BETEPON
---------------------------
Ну вот собственно и ВСЕ.
Подпись:Смерть

...

Рейтинг:

0 / 0

07.07.2006, 17:50:55

| Ответить | Цитировать | Написать

Excel. Последняя ячейка в таблице.

#33839513

Letter_D

Участник

Сообщения: 389

Рейтинг: 0 / 0

Есть же специальное свойство SpecialCells .

Код: plaintext

MsgBox ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row
MsgBox ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Column

...

Рейтинг:

0 / 0

07.07.2006, 18:41:24

| Ответить | Цитировать | Написать

9 сообщений из 9, страница 1 из 1

Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel. Последняя ячейка в таблице.

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=61&gotonew=1&tid=2184658]:	0ms
get settings:	8ms
get forum list:	15ms
check forum access:	3ms
check topic access:	3ms
track hit:	49ms
get topic data:	12ms
get first new msg:	6ms
get forum data:	3ms
get page messages:	64ms
get tp. blocked users:	2ms
others:	202ms

total:	367ms

	Необходимые cookie
	Cookie для сбора статистики
	Cookie для маркетинга и рекламы