Як сортувати аркуші за значенням комірки в Excel?
Коли ми використовуємо файл Excel, ми завжди сортуємо аркуші за алфавітом, цифрами або кольорами вкладок, але чи доводилося вам коли-небудь пробувати сортувати вкладки аркушів за певним значенням комірки?
Припустимо, у вас є книга з десятками аркушів, на кожному аркуші комірка А1 має певне значення, і тепер вам потрібно відсортувати всі аркуші в цій книзі на основі значення комірки А1 на кожному аркуші за зростанням. За допомогою цієї статті ви отримаєте рішення.
Сортувати всі аркуші на основі значення комірки за кодом VBA
Сортувати всі аркуші на основі значення комірки за кодом VBA
Щоб відсортувати всі аркуші на основі значення комірки в Excel, для нас немає прямого шляху, але наступний код VBA може зробити вам послугу.
1. Утримуйте клавішу ALT + F11 і відкриває Вікно Microsoft Visual Basic для програм.
2. Клацання Insert > Модуліта вставте наступний код у Вікно модуля.
Код VBA: сортування всіх аркушів на основі значення комірки
Sub SortWksByCell()
'Update 20141127
Dim WorkRng As Range
Dim WorkAddress As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range (Single)", xTitleId, WorkRng.Address, Type:=8)
WorkAddress = WorkRng.Address
Application.ScreenUpdating = False
For i = 1 To Application.Worksheets.Count
For j = i To Application.Worksheets.Count
If VBA.UCase(Application.Worksheets(j).Range(WorkAddress)) < VBA.UCase(Application.Worksheets(i).Range(WorkAddress)) Then
Application.Worksheets(j).Move Before:=Application.Worksheets(i)
End If
Next
Next
Application.ScreenUpdating = True
End Sub
3. Після вставки коду натисніть F5 клавішу для запуску цього коду, і з'явиться підказка, щоб нагадати вам вибрати комірку, за якою ви хочете сортувати аркуші, див. знімок екрана:
4. І тепер ви можете бачити, що всі аркуші відсортовані відповідно до текстового значення комірки А1 на кожному аркуші за зростанням.
Примітки:
1. Якщо у вибраних комірках є як числа, так і текстові рядки, аркуші містять номери, які будуть відсортовані перед аркушами текстових рядків.
2. Якщо в одній з комірок А1 немає порожнього місця, відповідний робочий аркуш буде відсортовано на передній частині всіх аркушів.
Статті по темі:
Як сортувати аркуші в алфавітному / буквено-цифровому порядку в Excel?
Як сортувати вкладки робочих аркушів за кольором у програмі Excel?
Як змінити порядок вкладок на робочому аркуші?
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!