Удалить строки со всех листов - Мир MS Excel

Регистрация

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

= Мир MS Excel/Удалить строки со всех листов - Мир MS Excel

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

Удалить строки со всех листов (Макросы/Sub)

Удалить строки со всех листов

Дата: Понедельник, 02.06.2025, 16:59 | Сообщение № 1

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

Ранг: Новичок

Сообщений: 10

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

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

2010

всем привет.

Есть файл, в котором много листов и на каждом из них с 1 по 260 строки ненужная информация.
Есть ли макрос который удалит сразу со всех листов книги целиком строки с 1 по 260?
Спасибо заранее.

Anna

Ответить

Дата: Понедельник, 02.06.2025, 19:55 | Сообщение № 2

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

Ранг: Обитатель

Сообщений: 421

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

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

2016

Добрый вечер. Если нужно удалить не глядя на содержимое, то можно так
[vba]

Код

Sub DelRows()
  Dim Sh As Worksheet
  For Each Sh In Worksheets
    Sh.Rows("1:260").Delete
  Next
End Sub

[/vba]

Ответить

Дата: Вторник, 03.06.2025, 07:21 | Сообщение № 3

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

Ранг: Новичок

Сообщений: 10

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

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

2010

i691198, Спасибо, но почему-то удалилась информация в строках ниже, то есть листы очистились вообще.

Anna

Ответить

Дата: Вторник, 03.06.2025, 14:11 | Сообщение № 4

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

Ранг: Обитатель

Сообщений: 423

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

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

Excel 2007

Цитата ak4-87, 03.06.2025 в 07:21, в сообщении № 3 (

)

то есть листы очистились вообще.

Может ненужная информация была нужной?
Я имею ввиду, что на нее ссылались формулы ниже

Ответить

Дата: Вторник, 03.06.2025, 15:42 | Сообщение № 5

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

Ранг: Новичок

Сообщений: 10

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

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

2010

msi2102, Единственное что там было, это данные для выпадающего списка в ячейках, которые нужно оставить. Это может влиять?

Anna

Ответить

Дата: Вторник, 03.06.2025, 15:56 | Сообщение № 6

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

Ранг: Обитатель

Сообщений: 423

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

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

Excel 2007

Цитата ak4-87, 03.06.2025 в 15:42, в сообщении № 5 (

)

Это может влиять?

без файла вообще сложно сказать, что на что влияет

Ответить

Дата: Вторник, 03.06.2025, 19:31 | Сообщение № 7

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

Ранг: Обитатель

Сообщений: 421

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

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

2016

Цитата ak4-87, 03.06.2025 в 15:42, в сообщении № 5 (

)

которые нужно оставить

Это в корне меняет ситуацию. Сейчас макрос делает именно то, что вы просили в топике - удаляет строки на всех листах со всем содержимым.

Ответить

Удалить строки со всех листов (Макросы/Sub)

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

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