Як синхронізувати всі аркуші книги з тим самим діапазоном, вибраним у Excel?

Коли ми використовуємо книгу Excel, іноді нам потрібно вибрати однакові діапазони кількох аркушів у книзі та синхронізувати їх, щоб легко та зручно переглядати інформацію. Наступні методи змусять вас швидко та легко синхронізувати робочі аркуші, щоб мати однакові діапазони в книзі.

Виберіть однакові діапазони на всіх аркушах за допомогою команди Виділити всі аркуші;

Використання коду VBA для синхронізації робочих аркушів;

Швидко синхронізуйте всі аркуші одного діапазону одним клацанням миші.

---

Виберіть однакові діапазони на всіх аркушах за допомогою команди Виділити всі аркуші

Ви можете зробити так, щоб у всіх робочих аркушах у книзі було вибрано однаковий діапазон, як показано нижче:

1. Виберіть діапазон на активному аркуші, який ви хочете вибрати на всіх аркушах. Наприклад діапазон A103: C112

2. Потім клацніть правою кнопкою миші на вкладці робочого аркуша та виберіть Виберіть Усі аркуші з меню. Дивіться знімок екрана:

3. Для всіх робочих аркушів книги буде вибрано однаковий діапазон.

Примітка: щоб вибрати такий самий діапазон на всіх аркушах таким чином, він може вибрати лише той самий діапазон на всіх аркушах, але він не може відображати всі вибрані діапазони в однаковому положенні вікна.

---

Використання коду VBA для синхронізації робочих аркушів

Використовуючи наведений нижче код VBA, ви можете швидко зробити всі робочі аркуші вибраними в однаковому діапазоні та відобразити вибраний діапазон у тому самому положенні вікна.

1. Виберіть діапазон на одному аркуші, а потім клацніть Розробник >Візуальний Бейсік, новий Вікно Microsoft Visual Basic для програм відображатиметься,

2. натисніть Insert > Модулі, а потім скопіюйте та вставте в модуль такі коди:

VBA: синхронізуйте всі аркуші книги

Sub SynchSheets()
'Update 20130912
Dim WorkShts As Worksheet
Dim sht As Worksheet
Dim Top As Long
Dim Left As Long
Dim RngAddress As String
Application.ScreenUpdating = False
Set WorkShts = Application.ActiveSheet
Top = Application.ActiveWindow.ScrollRow
Left = Application.ActiveWindow.ScrollColumn
RngAddress = Application.ActiveWindow.RangeSelection.Address
For Each sht In Application.Worksheets
    If sht.Visible Then
        sht.Activate
        sht.Range(RngAddress).Select
        ActiveWindow.ScrollRow = Top
        ActiveWindow.ScrollColumn = Left
    End If
Next sht
WorkShts.Activate
Application.ScreenUpdating = True
End Sub

3. Потім натисніть  кнопка або F5 клавіша для виконання коду, усі робочі аркуші будуть мати однаковий діапазон, і відображатимуть вибрані діапазони в однаковому положенні вікна.

---

Швидко синхронізуйте всі робочі аркуші до одного діапазону одним клацанням миші

Якщо ви встановили Kutools для Excel, ви можете скористатись Синхронізуйте робочі аркуші функція для легкої синхронізації всіх робочих аркушів з таким самим діапазоном, як показано нижче:

Kutools для Excel: з більш ніж 300 зручними надбудовами Excel, спробуйте безкоштовно без обмежень протягом 30 днів. Отримати зараз

1. Активуйте робочий аркуш і виберіть діапазон, який ви хочете використовувати.

2. Клацання підприємство > Інструменти робочого аркуша > Синхронізуйте робочі аркуші, див. скріншот:

3. І з’явиться підказка, щоб нагадати, що всі аркуші в книзі матимуть однаковий вибраний діапазон і ліву верхню комірку.

4. Потім натисніть OK, всі робочі аркуші синхронізовані; при навігації між усіма робочими листами буде вибрано однаковий діапазон. Дивіться скріншоти:

примітки: Якщо ви перевірите Не показуй мені наступного разу в Синхронізуйте робочі аркуші підказки, це поле не з’явиться, коли ви застосуєте цю функцію наступного разу.

Для отримання більш детальної інформації про Синхронізуйте робочі аркуші, Будь ласка, відвідайте тут.