Hoe alle werkbladen van de werkmap synchroniseren met hetzelfde bereik dat is geselecteerd in Excel?

Wanneer we een Excel-werkmap gebruiken, moeten we soms dezelfde reeksen van meerdere werkbladen in een werkmap selecteren en deze synchroniseren om de informatie gemakkelijk en gemakkelijk te bekijken. Met de volgende methoden kunt u werkbladen snel en gemakkelijk synchroniseren om dezelfde bereiken in een werkmap te hebben.

Selecteer dezelfde bereiken in alle werkbladen met Alle bladen selecteren;

VBA-code gebruiken om werkbladen te synchroniseren;

Synchroniseer snel alle werkbladen van hetzelfde bereik met één klik.

---

Selecteer dezelfde bereiken in alle werkbladen met Alle bladen selecteren

U kunt als volgt ervoor zorgen dat alle werkbladen hetzelfde bereik hebben geselecteerd in een werkmap:

1. Selecteer een bereik in het actieve werkblad dat u in alle werkbladen wilt selecteren. Bijvoorbeeld het bereik A103: C112

2. Klik vervolgens met de rechtermuisknop op het werkbladtabblad en kies Selecteer Alle bladen uit het menu. Zie screenshot:

3. Alle werkbladen in de werkmap hebben hetzelfde bereik dat wordt geselecteerd.

Opmerking: om op deze manier hetzelfde bereik in alle werkbladen te selecteren, kan het alleen hetzelfde bereik in alle werkbladen selecteren, maar het kan niet alle geselecteerde bereiken op dezelfde positie van het venster weergeven.

---

VBA-code gebruiken om werkbladen te synchroniseren

Met behulp van de volgende VBA-code kunt u snel voor alle werkbladen hetzelfde bereik selecteren en het geselecteerde bereik op dezelfde positie van het venster weergeven.

1. Selecteer een bereik in één werkblad en klik vervolgens op Ontwikkelaar >Visual Basic, Een nieuw Microsoft Visual Basic voor toepassingsvenster zullen worden tentoongesteld,

2. Klik Invoegen > Module, en kopieer en plak de volgende codes in de module:

VBA: synchroniseer alle werkbladen van een werkmap

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. Dan klikken  knop of F5 toets om de code uit te voeren, zullen alle werkbladen hetzelfde bereik hebben en de geselecteerde bereiken op dezelfde positie van het venster weergeven.

---

Synchroniseer snel alle werkbladen naar hetzelfde bereik met één klik

Als je hebt geïnstalleerd Kutools for Excel, kunt u de Synchroniseer werkbladen functie om eenvoudig alle werkbladen te synchroniseren om hetzelfde bereik als volgt te hebben:

Kutools for Excel: met meer dan 300 handige Excel-invoegtoepassingen, gratis te proberen zonder beperking in 30 dagen. Get it Now

1. Activeer een werkblad en selecteer het bereik dat u wilt gebruiken.

2. Klikken Enterprise > Werkbladhulpmiddelen > Synchroniseer werkbladen, zie screenshot:

3. En er verschijnt een promptvenster om u eraan te herinneren dat alle werkbladen in de werkmap hetzelfde geselecteerde bereik en de cel linksboven hebben.

4. Dan klikken OK, alle werkseets zijn gesynchroniseerd, wanneer u tussen alle werkbladen navigeert, wordt elk werkblad met hetzelfde bereik geselecteerd. Zie screenshots:

Opmerking:: Als je het controleert Laat het me de volgende keer niet zien functie in het Synchroniseer werkbladen promptvenster, zal dit venster niet verschijnen wanneer u deze functie de volgende keer toepast.

Voor meer gedetailleerde informatie over Synchroniseer werkbladenKunt u terecht op hier.