Normalde Excel'de çalışma sayfalarını yeniden adlandırmak için, çalışma sayfalarını yeniden adlandırmak için yeniden adlandır komutunu seçmek için sayfa sekmesine hızlıca çift tıklayabilir veya sayfa sekmesine sağ tıklayabiliriz. Excel'de bir veya iki çalışma sayfasını yeniden adlandırmak oldukça kullanışlıdır, ancak tek bir işlemde birden çok çalışma sayfasını yeniden adlandırmak istersek, nasıl yapabiliriz?

Çalışma sayfalarını yeniden adlandırmak için Yeniden Adlandır komutunu kullanma

Birden çok çalışma sayfasını rahatça yeniden adlandırmak için kullanışlı bir araç kullanma

Birden çok çalışma sayfasını yeniden adlandırmak için VBA kodunu kullanma

Çalışma sayfalarını yeniden adlandırmak için Yeniden Adlandır komutunu kullanma

İnanılmaz! Excel'de Chrome, Edge, Firefox ve Safari Gibi Verimli Sekmeler Kullanmak!
Zamanınızın% 50'sinden tasarruf edin ve her gün binlerce fare tıklamasını azaltın!

Excel'deki çalışma sayfalarını hızlı bir şekilde yeniden adlandırabiliriz. adını değiştirmek aşağıdaki prosedürlere göre komut verin:

Yeniden adlandırmak istediğiniz sayfa sekmesine sağ tıklayın ve adını değiştirmek Sağ tıklama menüsünden komut. Veya çalışma sayfasını yeniden adlandırmak için sayfa sekmesine çift tıklayın. Ardından yeni bir ad yazın ve ardından Keşfet yeniden adlandırmak için anahtar, ekran görüntüsüne bakın:

Bununla adını değiştirmek komut, birden çok çalışma sayfasını yeniden adlandırmak amacıyla bir seferde yalnızca bir çalışma sayfasını yeniden adlandırabilirsiniz, lütfen yukarıdaki işlemleri tekrarlayın.

Birden çok çalışma sayfasını rahatça yeniden adlandırmak için kullanışlı bir araç kullanma

Birden çok çalışma sayfasını yeniden adlandırmak için VBA kodunu kullanma

Burada, birden çok çalışma sayfasını yeniden adlandırmak için size iki VBA kodu tanıtacağım.

Kod 1. Birden fazla çalışma sayfasını aynı anda istediğiniz adla yeniden adlandırmak için VBA kodu

Aşağıdaki VBA kodunu kullanarak, geçerli çalışma kitabının tüm çalışma sayfalarını, çalışma sayfası adlarında aynı önekle hızlı bir şekilde yeniden adlandırabilirsiniz, örneğin: KTE-order1, KTE-order 2 ve KTE-order 3…

1. Tıklayın Geliştirici > Visual BasicVe tıklama Ekle > modül içinde Microsoft Visual Basic Uygulama Windows.

2. Lütfen aşağıdaki kodu kopyalayıp modül.

VBA: Belirli bir ad girerek tüm sayfaları yeniden adlandırın

Sub ChangeWorkSheetName()
'Updateby20140624
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
newName = Application.InputBox("Name", xTitleId, "", Type:=2)
For i = 1 To Application.Sheets.Count
    Application.Sheets(i).Name = newName & i
Next
End Sub

3.  Tıkla  düğmesine basarak kodu çalıştırın ve istediğiniz adı açılır iletişim kutusuna girin. ekran görüntülerine bakın:

4. Tıkla OK. Ardından tüm sayfaların yeniden adlandırıldığını görebilirsiniz.

2. Etkin çalışma kitabının her çalışma sayfasındaki belirli hücre değerine göre birden çok çalışma sayfasını yeniden adlandırmak için VBA kodu

Aşağıdaki VBA kodunu kullanarak, belirli bir hücrenin içeriğini kullanarak mevcut çalışma kitabının tüm çalışma sayfalarını yeniden adlandıracaktır. Örneğin, tüm çalışma kitabının A1 hücresine çalışma sayfası adını yazabilirsiniz ve ardından çalışma sayfası A1 hücre değeri olarak yeniden adlandırılacaktır.

1.  Lütfen her çalışma sayfasında çalışma sayfası adını içerecek bir hücre belirtin ve çalışma sayfası adını yazın. Bu örnekte, her çalışma sayfasındaki A1 hücresine çalışma sayfası adını yazacağım.

2.  Tıkla Geliştirici > Visual BasicVe tıklama Ekle > modül içinde Microsoft Visual Basic Uygulaması Pencereler.

3.  Lütfen aşağıdaki kodu Modüle kopyalayıp yapıştırın.

VBA: Çalışma sayfalarını belirli bir hücre içeriğine göre yeniden adlandırın

Sub RenameTabs()
'Updateby20140624
 For x = 1 To Sheets.Count
 If Worksheets(x).Range("A1").Value <> "" Then
 Sheets(x).Name = Worksheets(x).Range("A1").Value
 End If
 Next
 End Sub

4.  Tıkla  kodu yürütmek için düğmesine basın. Tüm kötü sayfalar, A1'in hücre içeriğine göre yeniden adlandırılır.

Demo: Kutools for Excel ile birden çok çalışma sayfasını yeniden adlandırın

İlgili Makaleler