Skip to main content

Excel'de bir klasördeki birden fazla dosyayı nasıl yeniden adlandırabiliriz?

Author: Xiaoyang Last Modified: 2025-06-10

Belki de çoğu bizim gibi bu sorunla uğraşmışızdır: Bir klasördeki birden fazla dosyayı yeniden adlandırmamız gerekiyor. Eğer klasörde yüzlerce veya binlerce dosya varsa, dosya isimlerini teker teker değiştirmek bizi deli edebilir. Bu görevle başa çıkmak için kullanabileceğimiz iyi bir yöntem var mı?

Adım 1: Excel için Kutools ile belirli bir klasördeki tüm dosya isimlerini çalışma sayfasına listeleme

Adım 2: VBA kodu ile Excel'de bir klasördeki birden fazla dosyayı yeniden adlandırma


Excel için Kutools ile belirli bir klasördeki tüm dosya isimlerini çalışma sayfasına listeleme

Eğer yeniden adlandırmak istediğiniz birden fazla dosya varsa, önce eski dosya isimlerini çalışma sayfasının bir sütununa listeleyebilir ve ardından değiştirmek istediğiniz yeni dosya isimlerini girebilirsiniz. Çalışma sayfasındaki tüm dosyaları hızlıca listelemek için Excel için Kutools'un Dosya Adı Listesi yardımcı programını kullanabilirsiniz.

Excel için Kutools'u yükledikten sonra lütfen şu adımları izleyin:( Excel için Kutools'u Şimdi Ücretsiz İndir )

1. Kutools Plus > İçe Aktar & Dışa Aktar > Dosya Adı Listesi'ne tıklayın, ekran görüntüsüne bakın:

Filename List option on the Kutools Plus tab on the ribbon

2Şurada Dosya Adı Listesi diyalog kutusunda File explorer butonuna tıklayarak dosyaları listelemek istediğiniz dosya klasörünü seçin ve ardından Tüm dosyalar seçeneğini Dosya türükısmından seçin, ekran görüntüsüne bakın:

Filename List dialog box

3. Ardından Tamam butonuna tıklayın, tüm dosya isimleri yeni bir çalışma sayfasının bir sütununa listelenmiş olacaktır, ayrıca bazı dosya özellikleri de eklenecektir. Artık istenmeyen diğer sütunları silebilir ve yalnızca Dosya Adı sütununu bırakabilirsiniz, ekran görüntüsüne bakın:

All filenames are listed in a column in a new worksheet

Bu Dosya Adı Listesi özelliğinin daha fazla bilgi için tıklayın…

Excel için Kutools'u Şimdi Ücretsiz İndir


VBA kodu ile Excel'de bir klasördeki birden fazla dosyayı yeniden adlandırma

A sütununa tüm orijinal dosya isimlerini listeledikten sonra, aşağıdaki ekran görüntüsünde gösterildiği gibi B sütununa yeni dosya isimlerini yazmalısınız:

Original filenames in column A, and new filenames in column B

Burada size eski dosya isimlerini yeni dosya isimleriyle bir seferde değiştirmenize yardımcı olabilecek bir VBA kodundan bahsedeceğim. Lütfen aşağıdaki adımları izleyin:

1. ALT + F11 tuşlarına basılı tutun, bu Microsoft Visual Basic for Applications penceresini açar.

2. Ekle > Modül'e tıklayın ve aşağıdaki makroyu Modül penceresine yapıştırın.

VBA kodu: Bir klasördeki birden fazla dosyayı yeniden adlandırma

Sub RenameFiles()
'Updateby20141124
Dim xDir As String
Dim xFile As String
Dim xRow As Long
With Application.FileDialog(msoFileDialogFolderPicker)
    .AllowMultiSelect = False
If .Show = -1 Then
    xDir = .SelectedItems(1)
    xFile = Dir(xDir & Application.PathSeparator & "*")
    Do Until xFile = ""
        xRow = 0
        On Error Resume Next
        xRow = Application.Match(xFile, Range("A:A"), 0)
        If xRow > 0 Then
            Name xDir & Application.PathSeparator & xFile As _
            xDir & Application.PathSeparator & Cells(xRow, "B").Value
        End If
        xFile = Dir
    Loop
End If
End With
End Sub

3. Kodu yapıştırdıktan sonra, kodu çalıştırmak için F5 tuşuna basın ve Gözat penceresinde, dosya isimlerini değiştirmek istediğiniz klasörü seçin, ekran görüntüsüne bakın:

Browse window

4. Ve ardından Tamam'a tıklayın, tüm eski dosya isimleri anında yeni dosya isimleriyle değiştirilecektir. Ekran görüntüleri:

Files with old filenames Arrow Files with new filenames

Notlar:

1. Eski ve yeni dosya isimlerini listelerken, dosya uzantısının mutlaka dahil edilmesi gerekir.

2. Yukarıdaki kodda, A:A referansı yeniden adlandırmak istediğiniz eski dosya isimlerini temsil eder ve B referansı ise kullanmak istediğiniz yeni dosya isimlerini içerir, bunları ihtiyaçlarınıza göre değiştirebilirsiniz.


Demo: Excel'de bir klasördeki birden fazla dosyayı yeniden adlandırma

Kutools for Excel: Parmaklarınızın ucunda 300 kadar kullanışlı araç! Sürekli ücretsiz AI özellikleriyle çalışın! Hemen İndirin!

İlgili makaleler:

Excel'de bir hücre aralığından sıra çalışma sayfaları nasıl oluşturulur?

Excel'deki birden fazla çalışma sayfasını nasıl yeniden adlandırabiliriz?


En İyi Ofis Verimlilik Araçları

🤖 Kutools AI Asistanı: Veri analizinde devrim yaratın: Akıllı Yürütme   |  Kod Oluştur  |  Özel Formüller Oluştur  |  Verileri Analiz Et ve Grafikler Oluştur  |  Geliştirilmiş İşlevleri Çağır
Popüler Özellikler: Yinelenenleri Bul, Vurgula veya İşaretle   |  Boş Satırları Sil   |  Sütunları veya Hücreleri Verileri Kaybetmeden Birleştir   |   Formül Olmadan Yuvarla ...
Süper ARA: Çok Kriterli Düşeyara    Çoklu Değer Düşeyara  |   Çoklu sayfa araması   |   Bulanık Eşleme ....
Gelişmiş Açılır Liste: Hızlıca Açılır Liste Oluştur   |  Bağımlı Açılır Liste   |  Çoklu Seçimli Açılır Liste ....
Sütun Yöneticisi: Belirli Sayıda Sütun Ekle  |  Sütunları Taşı  |  Gizli Sütunların Görünürlük Durumunu Değiştir  |  Aralıkları ve Sütunları Karşılaştır ...
Öne Çıkan Özellikler: Izgara Odaklama   |  Tasarım Görünümü   |   Gelişmiş formül çubuğu    Çalışma Kitabı & Çalışma Sayfası Yöneticisi   |  Otomatik Metin Kütüphanesi (Auto Text)   |  Tarih Seçici   |  Veri Birleştir   |  Hücreleri Şifrele/Şifre Çöz    Listeye Göre E-posta Gönder   |  Süper Filtre   |   Özel Filtre (kalın/italik/üstü çizili filtrele...) ...
En İyi15 Araç Seti12 Metin Aracı (Metin Ekle, Belirli Karakterleri Sil, ...)   |   50+ Grafik Türü (Gantt Grafiği, ...)   |   40+ Pratik Formül (Doğum tarihine dayanarak yaş hesapla, ...)   |   19 Ekleme Aracı (QR Kodu Ekle, Yoldan Resim Ekle, ...)   |   12 Dönüşüm Aracı (Kelimeye Dönüştür, Para Birimi Dönüştürme, ...)   |   7 Birleştir & Böl Aracı (Gelişmiş Satırları Birleştir, Hücreleri Böl, ...)   |   ... ve daha fazlası

Kutools for Excel ile Excel becerilerinizi geliştirin ve daha önce hiç olmadığı kadar verimli olun. Kutools for Excel, üretkenliğinizi artırmak ve zamanınızı kaydetmek için300'den fazla gelişmiş özellik sunar.  En çok ihtiyacınız olan özelliği almak için buraya tıklayın...


Office Tab, Office'e sekmeli arayüz getirir ve işinizi çok daha kolaylaştırır

  • Word, Excel, PowerPoint'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
  • Aynı pencerenin yeni sekmelerinde birden fazla belge açın ve oluşturun, yeni pencerelerde değil.
  • Verimliliğinizi %50 artırır ve her gün yüzlerce fare tıklamasını azaltır!