Как управлять размером листа из макроса

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

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

Как управлять размером листа из макроса (Макросы/Sub)

Andy_NTG

Дата: Среда, 15.07.2015, 15:03 | Сообщение № 1

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

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

Сообщений: 6

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

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

Excel 2013

У меня есть лист. Я его заполняю данными. Получается примерно 1500 строк. Когда я их удаляю и выполняю макрос проставления количества строк, то он проходится по тем строкам, которые уже пустые. Пробовал удалять ячейки, но это не помогает. Размер листа определяю так:

[vba]

Код

sheetLength = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row

[/vba]

Как сделать так, чтобы размер книги определялся адекватно через вышеуказанную формулу?

Ответить

SLAVICK

Дата: Среда, 15.07.2015, 15:10 | Сообщение № 2

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

Ранг: Старожил

Сообщений: 2290

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

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

2019

Так

[vba]

Код

sheetLength = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row

[/vba]

Где a - столбец, в котором в последней строке точно есть данные ^_^

Только это не размер листа а количество строк в листе

Иногда все проще чем кажется с первого взгляда.

Сообщение отредактировал SLAVICK - Среда, 15.07.2015, 15:12

Ответить

_Boroda_

Дата: Среда, 15.07.2015, 15:13 | Сообщение № 3

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

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

Сообщений: 16711

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

Замечаний: ±

2003; 2007; 2010; 2013 RUS

если Вы не знаете, в каком столбце искать, то
Перед этой строкой

Цитата Andy_NTG, 15.07.2015 в 15:03, в сообщении № 1

sheetLength = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row

напишите строку
[vba]

Код

ActiveSheet.UsedRange

[/vba]
- она переопределяет UsedRange на текущий момент
итого должно получиться вот так
[vba]

Код

ActiveSheet.UsedRange
sheetLength = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row

[/vba]

Или просто можно сохранить файл - UsedRange тоже переопределится.

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

Ответить

Как управлять размером листа из макроса (Макросы/Sub)

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