Как изменить порядок листов на обратный?
Если в вашей книге много листов, пробовали ли вы когда-нибудь мгновенно изменить их порядок на обратный — как показано на следующем снимке экрана? Сегодня я поделюсь несколькими быстрыми способами выполнить эту задачу.
 |
 |
 |
Изменение порядка всех листов на обратный с помощью кода VBA
Изменение порядка всех листов на обратный с помощью Kutools для Excel
Изменение порядка всех листов на обратный с помощью кода VBA
Если вы знакомы с кодом VBA, приведённый ниже код вам пригодится. Выполните следующие действия:
1. Удерживая нажатыми клавиши ALT + F11, откройте окно Microsoft Visual Basic для приложений.
2. Нажмите Вставка > Модуль и вставьте следующий код в окно Модуль.
Код VBA: Изменение порядка листов на обратный
Sub ReverseSheets()
'Update 20140526
Dim xCount As Integer
xCount = Application.ActiveWorkbook.Worksheets.Count
For i = 1 To xCount - 1
Application.Worksheets(1).Move After:=Application.Worksheets(xCount - i + 1)
Next
End Sub
3. Затем нажмите клавишу F5, чтобы запустить этот код, и порядок всех листов немедленно изменится на обратный.
Совет: снова нажмите клавишу F5, и все листы вернутся в исходный порядок.
Изменение порядка всех листов на обратный с помощью Kutools для Excel
Возможно, приведённый выше код покажется вам сложным в использовании. В таком случае воспользуйтесь удобным инструментом — Kutools для Excel, который с помощью функции Сортировать все листы позволяет быстро и легко изменить порядок листов на обратный.
Kutools для Excel включает более 300 удобных инструментов для Excel. Бесплатная пробная версия без ограничений на 30 дней. Получить сейчас.
После установки Kutools для Excelвыполните следующие действия:
1. Нажмите KUTOOLS PLUS > Лист > Сортировать все листы.
2. Затем в диалоговом окне Сортировать все листы нажмите кнопку Обратный порядок в правом нижнем углу окна (см. снимок экрана):
3. После этого нажмите кнопку ОК, и все вкладки листов в книге «Текущая книга» перевернутся именно так, как вам нужно. См. снимки экрана:
|
|
|
Совет: с помощью функции «Сортировать все листы» из Kutools для Excel вы можете сортировать листы по цвету, в алфавитном порядке и многое другое.
Нажмите, чтобы узнать больше о функции «Сортировать все листы».
Связанные статьи:
Как отсортировать листы в алфавитном или буквенно-цифровом порядке в Excel?
Как сортировать листы по цвету в Excel?
Лучшие инструменты повышения продуктивности в Office
Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…
Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
- Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!
Все надстройки Kutools — один установщик
Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.
- Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
- Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
- Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
- 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек