Home » , » Cách đổi, xóa tên trùng lặp nhiều file đơn giản mà không cần dùng phần mềm bên ngoài

Cách đổi, xóa tên trùng lặp nhiều file đơn giản mà không cần dùng phần mềm bên ngoài

Mỗi một file hay một thư mục sinh ra trong máy tính của bạn đều có một cái tên riêng, ai rồi cũng sẽ gặp trường hợp cần đổi tên nhiều file để dễ phân biệt hay để rút gọn tên cho dễ quản lý. Những cái tên này chúng ta đều có thể thay đổi được nhờ vào việc bấm chuột phải vào file và vào mục Rename để đổi tên.



Bạn cũng có thể đổi tên file nhanh hơn nếu bạn chọn file đó sau đó bấm phím F2. giao diện sửa tên file sẽ xuất hiện để bạn chỉnh sửa.


NHƯNG, sẽ thế nào đây nếu bạn có quá nhiều file? có quá nhiều tên trùng nhau cần đổi? chẳng lẽ cứ bấm F2 rồi sửa tên từng file? chuyện gì sẽ xảy ra nếu bạn có tới nhiều hơn 100 hay 1000 file hoặc 10000000 file cần sửa tên???? công việc sẽ khá nhiều đây.

Sau đây Delam.top sẽ hướng dẫn các bạn  chi tiết kèm hình ảnh cách sửa tên nhiều file với số lượng không hạn chế mà chỉ cần 1 cái click chuột sau đó đợi 1 giây... công việc của bạn sẽ hoàn thành tức khắc. Bắt đầu nhé!!!





Trước khi bắt đầu, bạn hãy backup hoặc coppy lại toàn bộ file hoặc thư mục bạn muốn đổi tên vào một vị trí khác để đề phòng trường hợp hi hữu hoặc tên bạn đổi không được như ý nhé.
 Đừng lo, thao tác backup chỉ là một thủ tục đơn giản mỗi khi bắt đầu bất cứ việc gì liên quan đến chỉnh sửa nhiều file trong máy bạn. Hãy làm quen nhiều với thao tác này. Trong nhiều trường hợp nó sẽ giúp bạn rất nhiều đấy.


 Bước đầu tiên để sửa tên nhiều file : bạn hãy tạo cho mình một notepad ngoài màn hình chính (hoặc ở bất kì đâu bạn  thích miễn sao bạn dễ nhớ là được) như thế này:




Sau đó hãy coppy dòng lệnh dưới đây và dán nội dung dòng lệnh vào notepad của bạn đã.
 đây là lệnh:


Set objFso = CreateObject("Scripting.FileSystemObject")
Set Folder = objFSO.GetFolder("C:\Users\Administrator\Desktop\file")

For Each File In Folder.Files
    sNewFile = File.Name
    sNewFile = Replace(sNewFile,"tên cũ muốn xóa bỏ","tên mới")
    if (sNewFile<>File.Name) then 
        File.Move(File.ParentFolder+"\"+sNewFile)
    end if

Next


Ở phần được tô đỏ chính là địa chỉ thư mục chứa file cần đổi tên. Dòng này bạn có thể lấy ở thanh địa chỉ file như trong ảnh:




Lưu ý cần coppy chính xác địa chỉ thư mục này và thay đúng vào ô mình đã đánh dấu đỏ là được (hãy chú ý 2 dấu "" những dấu đó cần để nguyên xi).

Khi đã coppy được rồi hãy điền nó vào dòng mình mô tả màu đỏ. nó sẽ như thế này:




Ở phần có màu hồng  chính là phần kí tự tên mà bạn muốn thay thế như ở dưới hình:




Mình có 2723 file có tên lẫn lộn nhau nhưng có khoảng gần 2000 file cùng mang  kí tự .thaythe  lẫn vào. Mình ghét, nó dài, nó vô tích sự nên mình sẽ thay nó hoặc xóa nó (những tên file có chứa từ .thaythe trong tên của mình) . Vậy nên mình sẽ dán y nguyên từ .thaythe  này và thay nó vào phần màu hồng để lệnh biết nó cần tìm cái gì. Ví dụ cho dễ hiểu là  như thế này:




Chú ý: cũng có vài file không có những kí tự cần thay thế như vậy lẫn vào thư mục nhưng cũng chẳng sao. Nó sẽ tự bỏ qua những file không có từ đó và chỉ đổi tên những file có đuôi được chúng ta chỉ định nằm ở trong dấu ""



Ở phần có màu xanh  là phần bạn sẽ điền tên mới hoặc những kí tự mới thay cho phần màu hồng phía trên để khi lệnh chạy, nó sẽ biết nó sẽ sửa tên các file thành cái gì vào để đúng ý bạn.

Như hình thì mình đã thay phần màu xanh thành từ tenmoi để thay cho từ .thaythe phía trước.





Lưu ý: nếu bạn chỉ muốn xóa tên file chứ không muốn đổi hoặc sửa tên file thì bạn chỉ cần bỏ đi phần màu xanh tức là không viết gì cả ở đó chỉ giữ nguyên dấu ""  trống không không có gì giữa 2 dấu "" nó sẽ như thế này:




Sau khi bạn đã thay đổi theo đúng ý rồi thì hãy lưu lại sau đó đến bước đóng gói những dòng lệnh này lại.






Hãy bấm vào file notepad của bạn và đổi tên phần đuôi nó từ ".txt" thành ".vbs" sau đó lưu lại. 





Cửa sổ hiện câu hỏi bạn có muốn đổi định dạng file .txt sang định dạng .vbs không thì bạn bấm "yes" (tất nhiên rồi)






Vậy là bạn đã hoàn thành rồi đó lúc này bạn chỉ cần chạy file bạn vừa đổi bằng cách nhấn đúp vào nó hoặc chuột phải rồi chọn Open. Vì lệnh chạy cực nhanh nên gần như ngay tức khắc số file bạn cần đổi nó đã đổi xong.


 Ở trong bài này mình có nhiều hơn 2700 file cần đổi tên mà chỉ sau 1s vào kiểm tra nó đã được đổi thành công rồi. Gần như vừa thao tác bấm chạy file lệnh .vbs để sửa thì mình vào thư mục chứa file cần đổi tên để kiểm tra thì nó đã làm xong công việc rồi. quá nhanh phải không? đó chính là sự kì diệu của lập trình.

Khi tất cả đã xong rồi hãy lưu file này vào một nơi nào đó để bạn có thể lấy ra dùng bất cứ lúc nào. Khi bạn đã đổi định dạng thành .vbs rồi thì khi muốn edit bạn hãy nhấn chuột phải vào file sau đó chọn mục Edit như hình:




Tiếp đó thì dễ rồi bạn chỉ cần lặp lại các bước như Delam.top hướng dẫn ở trên để sửa hay đổi tên nhiều file là được sau đó quay lại đây khoe cho mình vui nhé hoặc giả xử
 có chỗ nào trong bài viết khó hiểu hay thao tác không được như ý muốn, hãy coment xuống phía dưới để mình giải đáp thắc mắc cho các bạn nhé.
 Hẹn gặp các bạn ở bài tiếp theo. Nhớ ghé thăm Delam.top thường xuyên nhé. Cảm ơn các bạn.


-------------------

Thực hiện: delam.top- DIY SÁNG TẠO THAY ĐỔI CUỘC SỐNG