Очистить лист ото всех данных

@KuznetsMasha · Регистрация: 23.07.2015

Author24 — интернет-сервис помощи студентам

Помогите, пожалуйста!
В общем, есть книга Excel, в ней лист, на этом листе может содержаться 100500 строк.
Нужно удалить эти строки, то есть вообще все с листа, и вставить новые данные.
Но. Я вставляю новые данные, их 15, допустим, а бегунок продолжает пролистывать до 100500-ой строки.
Удаляю вот так:

Visual Basic

1
2
3

Sheets("Лист1").Select
Cells.Select
Selection.ClearContents

@Казанский · 07.09.2015, 15:30

KuznetsMasha, нужно обновить "последнюю ячейку", для этого можно обратиться к "использованному диапазону", но ничего с ним не делать:

Visual Basic

1	With ActiveSheet.UsedRange: End With

@Vlad999 · 07.09.2015, 15:30

в листе строки удалить нельзя, их как было 100500 так и останется, очистить можно.
Если вам нужно что бы было видно только 15 строк то остальные скрывать нужно.

Visual Basic

1	Rows("16:" & Rows.Count).Hidden = True

	07.09.2015, 15:30