Excel'de sayfa sekmesi adlarını nasıl bulur ve değiştiririm?
Excel'de hücrelerdeki değerleri bulmak ve değiştirmek kolaydır. Ancak Excel'de sayfa adlarını bulmanın ve değiştirmenin herhangi bir yolu var mı? Örneğin, aşağıda gösterilen ekran görüntüsü gibi, sayfa adında "KTE (Satış) xxx" içeren birden fazla çalışma sayfanız var ve şimdi tüm "KTE (Satış)" ı tüm ilgili sayfa adlarında "KTE" ile değiştirmeniz gerekiyor. yapabilir misin? Bu makale, bunu başarmak için bir VBA yöntemi tanıtacaktır.
Sayfa sekme adlarını bulun ve VBA kodu ile değiştirin
Sayfa sekme adlarını bulun ve VBA kodu ile değiştirin
Excel'de sayfa sekmesi adlarını bulmak ve değiştirmek için lütfen aşağıdaki VBA kodunu uygulayın. Lütfen aşağıdaki işlemleri yapın.
1. Tuşuna basın. Ara Toplam + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.
2. içinde Uygulamalar için Microsoft Visual Basic Pencere, tıklayın Ekle > modül. Ve sonra, VBA kodunu kod penceresine kopyalayın.
VBA kodu: Excel'de sayfa sekmesi adlarını bulun ve değiştirin
Sub Find_replace_sheet_name()
'Update by Extendoffice 2018/5/24
Dim xNum As Long
Dim xRepName As String
Dim xNewName As String
Dim xSheetName As String
Dim xSheet As Worksheet
xRepName = Application.InputBox("Please type in the word you will replace：", "Kutools for Excel", , , , , , 2)
xNewName = Application.InputBox("Please type in the word you will replace with：", "Kutools for Excel", , , , , , 2)
If xRepName = "false" Or xNewName = "false" Then Exit Sub
On Error GoTo ExitLab
For Each xSheet In ActiveWorkbook.Sheets
xSheetName = xSheet.Name
xNum = InStr(1, xSheetName, xRepName)
If xNum > 0 Then
xSheet.Name = Replace(xSheetName, xRepName, xNewName)
End If
ExitLab:
Next
End Sub3. Tuşuna basın. F5 kodu çalıştırmak için anahtar.
4. Sonra a Kutools for Excel iletişim kutusu açılır, lütfen değiştireceğiniz sayfa adlarının kelimelerini girin ve OK buton. Ekran görüntüsüne bakın:
5. saniyede Kutools for Excel iletişim kutusunda, değiştireceğiniz kelimeyi girin ve ardından OK düğmesine basın.
Ardından, sayfa sekmesi adlarındaki tüm ilgili kelimeler, aşağıda gösterilen ekran görüntüsü gibi belirtilenlerle değiştirilir.
not: Yukarıdaki kod büyük / küçük harfe duyarlıdır.
İlgili yazılar:
- Tüm boş hücreleri Excel'de belirli sayı veya metinle nasıl bulur ve değiştiririm?
- Excel'deki hücrelerdeki virgülleri yeni satırlarla (Alt + Enter) nasıl değiştirebilirim?
- Excel'de metin bulmak ve değiştirmek için bir makro kodu nasıl oluşturulur?
- Excel'de virgülle ayrılmış liste içeren bir hücrede değer nasıl bulunur?
- Excel'de iki sütun listesinin kesişimini nasıl bulabilirim?
En İyi Ofis Üretkenlik Araçları
Kutools for Excel ile Excel Becerilerinizi Güçlendirin ve Daha Önce Hiç Olmadığı Gibi Verimliliği Deneyimleyin. Kutools for Excel, Üretkenliği Artırmak ve Zamandan Tasarruf Etmek için 300'den Fazla Gelişmiş Özellik Sunar. En Çok İhtiyacınız Olan Özelliği Almak İçin Buraya Tıklayın...
Office Tab, Office'e Sekmeli Arayüz Getirir ve İşinizi Çok Daha Kolay Hale Getirir
- Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
- Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
- Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!
