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

Вход

Регистрация

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

 

= Мир MS Excel/Как управлять размером листа из макроса - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Как управлять размером листа из макроса (Макросы/Sub)
Как управлять размером листа из макроса
Andy_NTG Дата: Среда, 15.07.2015, 15:03 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

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

[vba]
Код
sheetLength = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row
[/vba]

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

[vba]
Код
sheetLength = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row
[/vba]

Как сделать так, чтобы размер книги определялся адекватно через вышеуказанную формулу?
Автор - Andy_NTG
Дата добавления - 15.07.2015 в 15:03
SLAVICK Дата: Среда, 15.07.2015, 15:10 | Сообщение № 2
Группа: Модераторы
Ранг: Старожил
Сообщений: 2290
Репутация: 766 ±
Замечаний: 0% ±

2019
Так :D

[vba]
Код
sheetLength  =  ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row
[/vba]

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

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

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

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

[vba]
Код
sheetLength  =  ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row
[/vba]

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

Только это не размер листа а количество строк в листе
Автор - SLAVICK
Дата добавления - 15.07.2015 в 15:10
_Boroda_ Дата: Среда, 15.07.2015, 15:13 | Сообщение № 3
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16675
Репутация: 6481 ±
Замечаний: 0% ±

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
 
Ответить
Сообщениеесли Вы не знаете, в каком столбце искать, то
Перед этой строкой
Цитата 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_
Дата добавления - 15.07.2015 в 15:13
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Как управлять размером листа из макроса (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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