Excel'de bir klasörün birden çok dosyasını nasıl yeniden adlandırabilirim?
Çoğumuz, bir klasördeki birden fazla dosyayı yeniden adlandırmamız gereken bu sorundan muzdarip olabiliriz, dosya adlarını tek tek yeniden adlandırmak, o klasörde yüzlerce veya binlerce dosya varsa bizi çıldırtacaktır. Bu görevin üstesinden gelmemiz için iyi işlevler var mı?
Excel için kutools ile çalışma sayfasındaki belirli bir klasördeki tüm dosya adlarını listeleyin
Excel'de bir klasörün birden çok dosyasını VBA kodu ile yeniden adlandırın
Excel için kutools ile çalışma sayfasındaki belirli bir klasördeki tüm dosya adlarını listeleyin
Yeniden adlandırmak istediğiniz birden çok dosya varsa, önce eski dosya adlarını bir çalışma sayfası sütununda listeleyebilir ve ardından değiştirmek istediğiniz yeni dosya adlarını girebilirsiniz. Çalışma sayfasındaki tüm dosyaları hızlı bir şekilde listelemek için, Kutools for Excel'S Dosya Adı Listesi Yarar.
Kurduktan sonra Kutools for Excellütfen şunları yapın :( Kutools for Excel'i Şimdi Ücretsiz İndirin )
1. tıklayın Kutools Artı > İthalat ihracat > Dosya Adı Listesi, ekran görüntüsüne bakın:
2. In Dosya Adı Listesi iletişim kutusunu tıklayın Dosyaları listelemek istediğiniz dosya klasörünü seçmek için düğmesine ve ardından Tüm dosyalar itibaren Dosya türü, ekran görüntüsüne bakın:
3. Sonra tıklayın OK düğmesi, tüm dosya adları yeni bir çalışma sayfasının bir sütununda ve bazı dosya özniteliklerinde listelenmiştir ve artık diğer istenmeyen sütunları silebilir ve yalnızca Dosya Adı sütun, ekran görüntüsüne bakın:
Bu Dosya Adı Listesi özelliği hakkında daha fazla bilgi edinmek için tıklayın…
Kutools for Excel'i Şimdi Ücretsiz İndirin
Excel'de bir klasörün birden çok dosyasını VBA kodu ile yeniden adlandırın
Tüm orijinal dosya adlarını bir sütun A'da listeledikten sonra, aşağıdaki ekran görüntüsü gibi B sütununa yeni dosya adlarını yazmalısınız:
Ve burada eski dosya adlarını yeni dosya adlarıyla değiştirmenize yardımcı olabilecek bir VBA kodundan bahsedeceğim. Lütfen aşağıdaki adımları uygulayın:
1. Basılı tutun ALT + F11 anahtarlar ve açılır Uygulamalar için Microsoft Visual Basic Penceresi.
2. tıklayın Ekle > modülve aşağıdaki makroyu Modül penceresi.
VBA kodu: Bir klasördeki birden çok dosyayı yeniden adlandırın
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 lütfen F5 bu kodu çalıştırmak için anahtar ve Araştır penceresinde, dosya adlarını değiştirmek istediğiniz klasörü seçin, ekran görüntüsüne bakın:
4. Ve sonra tıklayın OK, tüm eski dosya adları hemen yeni dosya adlarıyla değiştirilmiştir. Ekran görüntülerine bakın:
Notlar:
1. Eski ve yeni dosya adlarınızı listelediğinizde, dosya uzantısı dahil edilmelidir.
2. Yukarıdaki kodda, referans A: A yeniden adlandırmak istediğiniz eski dosya adları listesini ve referans B kullanmak istediğiniz yeni dosya adlarını içerir, bunları ihtiyacınıza göre değiştirebilirsiniz
Demo: Excel'de bir klasörün birden çok dosyasını yeniden adlandırın
İlgili yazılar:
Excel'de bir dizi hücreden sıra çalışma sayfaları nasıl oluşturulur?
Excel'de birden çok çalışma sayfasını nasıl yeniden adlandırabilirim?
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!