Excel'de sayfa nasıl kopyalanır ve otomatik olarak yeniden adlandırılır?
Excel'de, her zamanki gibi adı yazmadan bir çalışma sayfasını nasıl kopyalayıp otomatik olarak yeniden adlandırabilirsiniz? Bu yazıda, bir sayfanın bir veya birden çok kez nasıl kopyalanacağından ve aynı anda onlara belirli adlar verileceğinden bahsedeceğim.
Bir çalışma sayfasını birden çok kez kopyalayın ve Kutools for Excel kullanarak bunları özel adlarla yeniden adlandırın
Bir çalışma sayfasını birden çok kez kopyalayın ve bunları VBA kodunu kullanarak artımlı sekme adlarıyla yeniden adlandırın
Bir çalışma sayfasını birden çok kez kopyalamanız ve onlara KTE-1, KTE-2, KTE-3, KTE-4… gibi seri adları vermeniz gerekiyorsa, aşağıdaki VBA kodu size bir iyilik yapabilir.
1. Basılı tutun ALT + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.
2. tıklayın Ekle > modülve aşağıdaki kodu modül Pencere.
VBA kodu: Bir çalışma sayfasını birden çok kez kopyalayın ve aynı anda yeniden adlandırın:
Sub Create()
'Updateby Extendoffice
Dim I As Long
Dim xNumber As Integer
Dim xName As String
Dim xActiveSheet As Worksheet
On Error Resume Next
Application.ScreenUpdating = False
Set xActiveSheet = ActiveSheet
xNumber = InputBox("Enter number of times to copy the current sheet")
For I = 1 To xNumber
xName = ActiveSheet.Name
xActiveSheet.Copy After:=ActiveWorkbook.Sheets(xName)
ActiveSheet.Name = "KTE-" & I
Next
xActiveSheet.Activate
Application.ScreenUpdating = True
End Sub
3. Daha sonra tuşuna basın. F5 Bu kodu çalıştırmak için anahtar ve bir komut kutusu size kopyalamak istediğiniz mevcut çalışma sayfasının kaç kopyasını hatırlatacaktır, ekran görüntüsüne bakın:
4. Açılan iletişim kutusuna kopya sayısını girin ve ardından OK düğmesi, mevcut çalışma sayfanız 5 kopya çoğaltıldı ve aşağıda gösterilen ekran görüntüsü gibi sıra adıyla yeniden adlandırıldı:
not: Yukarıdaki kodda, çalışma sayfası adı metnini değiştirebilirsiniz "KTE-"İhtiyacınıza göre.
Bir çalışma sayfasını birden çok kez kopyalayın ve Kutools for Excel kullanarak bunları özel adlarla yeniden adlandırın
Belki yukarıdaki VBA kodlarını başvurmanız zordur, burada kolay bir araç sunacağım- Kutools for Excel, Onun ile Sıra Çalışma Sayfaları Oluşturun yardımcı program, bu görevi hiçbir çaba harcamadan gerçekleştirebilirsiniz.
Kutools for Excel : 300'den fazla kullanışlı Excel eklentisi ile 30 günde sınırlama olmaksızın ücretsiz deneyin. |
Kurduktan sonra Kutools for Excellütfen aşağıdaki işlemleri yapın:
1. tıklayın Kutools Artı > Çalışma Sayfası > Sıra Çalışma Sayfaları Oluşturun, ekran görüntüsüne bakın:
2. In Sıra Çalışma Sayfaları Oluşturun iletişim kutusu:
(1.) Kopyalamak istediğiniz çalışma sayfası adını seçin. Temel Çalışma Sayfası açılır liste;
(2.) Ardından kopyalamak istediğiniz çalışma sayfası sayısını belirtin. Yaratma sayısı Metin kutusu;
(3.) Ve sonra kontrol edin Sıra Numaraları altında Şuna göre sayfa adları Bölüm;
(4.) Sonunda, istediğiniz sağ bölmede dizi çalışma sayfası adlarını oluşturun, ekran görüntüsüne bakın:
3. Ayarları tamamladıktan sonra lütfen tıklayın Ok düğmesi ve belirli çalışma sayfası birden çok kez kopyalandı ve yeni bir çalışma kitabında oluşturduğunuz sıraya göre yeniden adlandırıldı, ekran görüntüsüne bakın:
Şimdi Excel için Kutools'u Ücretsiz İndir'i tıklayın!
Demo: Bir çalışma sayfasını birden çok kez kopyalayın ve Kutools for Excel kullanarak bunları özel adlarla yeniden adlandırın
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!