Метод Worksheet.Delete (Excel)
Выражение Переменная, представляющая объект Worksheet .
Возвращаемое значение
Boolean
Примечания
При удалении объекта Worksheet этот метод отображает диалоговое окно, в котором пользователю предлагается подтвердить удаление. Это диалоговое окно отображается по умолчанию. При вызове для объекта Worksheet метод Delete возвращает логическое значение , равное False , если пользователь выбрал отмену в диалоговом окне, или True , если пользователь выбрал удалить.
Чтобы удалить лист без отображения диалогового окна, задайте для свойства Application.DisplayAlerts значение False.
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.
Обратная связь
Были ли сведения на этой странице полезными?
Метод Range.Clear (Excel)
выражение: переменная, представляющая объект Range.
Возвращаемое значение
Пример
В этом примере формулы и форматирование очищается в ячейках A1:G37 на Листе1.
Worksheets("Sheet1").Range("A1:G37").Clear Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.
Обратная связь
Были ли сведения на этой странице полезными?
Обратная связь
Ожидается в ближайшее время: в течение 2024 года мы постепенно откажемся от GitHub Issues как механизма обратной связи для контента и заменим его новой системой обратной связи. Дополнительные сведения см. в разделе https://aka.ms/ContentUserFeedback.
Отправить и просмотреть отзыв по
Как очистить лист Excel на VBA
Иногда есть необходимость перед какими-то действиями сначала очистить лист Excel от всех данных, которые на нем есть, чтобы заполнить его новыми данными. Я предлагаю 3 варианта как можно очистить лист.
Способ 1
Очистка всех ячеек на листе
' Очистка всех ячеек от данных, а так же оформления ячеек (шрифт, фон и т.п.) Sheets("Лист1").Cells.Clear
Либо, если нужно очистить только данные на листе Excel, не затрагивая формат ячеек, можно сделать так:
' Очистка всех ячеек только от данных Sheets("Лист1").Cells.ClearContents
Способ 2
Чтобы очистить все данные и при этом определение последней строки SpecialCells(xlCellTypeLastCell) работало правильно, можно воспользоваться таким вариантом:
Sheets("Лист1").Cells.Delete Shift:=xlUp ThisWorkbook.Saved = True
Способ 3
Если лист содержит очень преочень много данных, тогда чтобы очистить лист Excel самым быстрым способом будет удалить его и создать заново.
' Отключаем предупреждение об удалении данных на листе Application.DisplayAlerts = False ' Удаляем лист Sheets("Лист1").Delete ' Включаем предупреждения обратно Application.DisplayAlerts = True ' Добавляем лист Set Sheet = Sheets.Add ' Переименовываем как он назывался перед удалением Sheet.Name = "Лист1"
Предложенных 3 вариантов удаления всех данных на листе Excel я думаю будет достаточно для решения повседневных задач на VBA.
LodestaRgr / VBA Очистить лист полностью
Save LodestaRgr/882d4ad6e45a52c61efd to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters. Learn more about bidirectional Unicode characters
| Function ClearSheet(shName) ‘— Очистить лист полностью |
| With Sheets(shName) |
| .Activate ‘активировать лист |
| .Cells.Select ‘выделить все ячейки |
| Selection.Delete Shift:=xlUp ‘удалить все ячейки со сдвигом вверх |
| Range(«A1»).Select ‘активировать самую первую ячейку |
| End With |
| End Function |
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Footer
© 2024 GitHub, Inc.
You can’t perform that action at this time.