Çalışma kitabının tüm çalışma sayfalarını Excel'de seçilen aynı aralıkla nasıl senkronize edebilirim?

Bir excel çalışma kitabı kullandığımızda, bazen, bir çalışma kitabındaki birden çok çalışma sayfasının aynı aralıklarını seçmemiz ve bilgilere kolay ve rahat bir şekilde bakmak için bunları senkronize etmemiz gerekir. Aşağıdaki yöntemler, bir çalışma kitabındaki aynı aralıklara sahip olmak için çalışma sayfalarını hızlı ve kolay bir şekilde senkronize etmenizi sağlayacaktır.

Tüm Sayfaları Seç ile tüm çalışma sayfalarında aynı aralıkları seçin;

Çalışma sayfalarını senkronize etmek için VBA kodunu kullanma;

Aynı aralıktaki tüm çalışma sayfalarını tek bir tıklama ile hızlı bir şekilde senkronize edin.

---

Tüm Sayfaları Seç ile tüm çalışma sayfalarında aynı aralıkları seçin

Bir çalışma kitabında aşağıdaki gibi tüm çalışma sayfalarının aynı aralığın seçilmesini sağlayabilirsiniz:

1. Tüm çalışma sayfalarında seçmek istediğiniz aktif çalışma sayfasında bir aralık seçin. Örneğin, A103: C112 aralığı

2. Ardından çalışma sayfası sekmesine sağ tıklayın ve Tüm Sayfaları Seç menüden. Ekran görüntüsüne bakın:

3. Çalışma kitabındaki tüm çalışma sayfaları aynı aralığa sahip olacak.

Not: bu şekilde tüm çalışma sayfalarında aynı aralığı seçmek için, tüm çalışma sayfalarında yalnızca aynı aralığı seçebilir, ancak seçilen tüm aralıkları pencerenin aynı konumunda görüntüleyemez.

---

Çalışma sayfalarını senkronize etmek için VBA kodunu kullanma

Aşağıdaki VBA kodunu kullanarak, tüm çalışma sayfalarını aynı aralığın seçilmesini ve seçilen aralığı pencerenin aynı konumunda görüntülemesini hızlı bir şekilde yapabilirsiniz.

1. Bir çalışma sayfasında bir aralık seçin ve ardından Geliştirici >Visual Basic, Yeni bir Uygulamalar için Microsoft Visual Basic penceresi görüntülenecek

2. Tıklayın Ekle > modülve ardından aşağıdaki kodları modüle kopyalayıp yapıştırın:

VBA: bir çalışma kitabının tüm çalışma sayfalarını senkronize edin

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. Sonra tıklayın  düğmesi veya F5 tuşuna bastığınızda, tüm çalışma sayfaları aynı aralığa sahip olacak ve seçilen aralıkları aynı pencere konumunda görüntüleyecektir.

---

Tek bir tıklama ile tüm çalışma sayfalarını aynı aralıkta hızlı bir şekilde senkronize edin

Yüklediyseniz Kutools for Excelkullanabilir, Çalışma Sayfalarını Eşitle aşağıdaki gibi aynı aralığa sahip olmak için tüm çalışma sayfalarını kolayca senkronize etme özelliği:

Kutools for Excel: 300'den fazla kullanışlı Excel eklentisi ile 30 günde sınırlama olmaksızın ücretsiz deneyin. Şimdi alın

1. Bir çalışma sayfasını etkinleştirin ve kullanmak istediğiniz aralığı seçin.

2. tıklayın kuruluş > Çalışma Sayfası Araçları > Çalışma Sayfalarını Eşitle, ekran görüntüsüne bakın:

3. Ve çalışma kitabındaki tüm çalışma sayfalarının aynı seçilen aralığa ve sol üst hücreye sahip olacağını hatırlatmak için bir istem kutusu açılır.

4. Sonra tıklayın OK, tüm çalışma sayfaları senkronize edildi, tüm çalışma sayfaları arasında gezinirken, her çalışma sayfası aynı aralığa sahip seçilecektir. Ekran görüntülerine bakın:

not: Kontrol ederseniz Bir dahaki sefere bana gösterme içinde Çalışma Sayfalarını Eşitle komut istemi kutusunda, bu özelliği bir dahaki sefere uyguladığınızda bu kutu görünmeyecektir.

Hakkında daha ayrıntılı bilgi için Çalışma Sayfalarını EşitleZiyaret edin okuyun.