Подсчет строк в таблице

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

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

Подсчет строк в таблице (Макросы/Sub)

Espada

Дата: Пятница, 25.03.2022, 13:26 | Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 121

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

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

Доброго дня, пишу макрос, по редактированию таблицы, затык на одном моменте, может сможете помочь... как посчитать количество строчек в таблице? точнее, таблица всегда начинается с 13-й строки и до первой пустой. не могу сообразить, как задать цикл...

Ответить

RAN

Дата: Пятница, 25.03.2022, 13:28 | Сообщение № 2

Группа: Друзья

Ранг: Экселист

Сообщений: 5660

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

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

2010

А зачем цикл? № последней строки - 13.

Быть или не быть, вот в чем загвоздка!

Ответить

Espada

Дата: Пятница, 25.03.2022, 13:30 | Сообщение № 3

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 121

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

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

Цитата RAN, 25.03.2022 в 13:28, в сообщении № 2 (

)

А зачем цикл? № последней строки - 13.

Почему 13? 13-я первая

Ответить

_Boroda_

Дата: Пятница, 25.03.2022, 13:45 | Сообщение № 4

Группа: Админы

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

Сообщений: 16714

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

Замечаний: ±

2003; 2007; 2010; 2013 RUS

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

Код

nr_ = Cells(13, 1).End(4).Row - 13 + 1

[/vba]
для 1 столбца
первая пустая вниз. без проверки на заполненность таблицы
То же самое
[vba]

Код

nr_ = Cells(13, 1).End(xlDown).Row - 13 + 1

[/vba]
Заметьте, это первая пустая, а не последняя заполненная. В общем случае это могут быть разные ячейки

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