كود لحذف الملفات وكود لحذف المجلدات

إكسل vba/ الدرس 323 / الذكاء الاصطناعي / كود حذف الملفات والمجلدات

 

حذف ملف أو مجلد

لحذف ملف باستخدام VBA، يمكنك استخدام وظيفة "Kill". بناء الجملة لهذه الوظيفة كما يلي:

اقتل: اسم المسار

حيث "اسم المسار" هو المسار الكامل للملف الذي تريد حذفه.

فيما يلي مثال على رمز VBA الذي يستخدم وظيفة "Kill" لحذف ملف باسم "example.txt" في المجلد "C: \ Temp":

حذف ملف فرعي

اسم المسار = "C: \ Temp \ example.txt"

اقتل: اسم المسار

يحدد هذا الرمز إجراءً فرعيًا يسمى "Delete File" يقوم بتعيين متغير اسم المسار للملف الذي تريد حذفه ثم يستخدم وظيفة "Kill" لحذفه.

تجدر الإشارة إلى أن وظيفة "Kill" ستعمل فقط مع الملفات، ولا يمكنها حذف المجلدات. أيضًا، إذا حاولت حذف ملف مفتوح حاليًا أو قيد الاستخدام من قبل عملية أخرى، فإن وظيفة "Kill" ستظهر خطأ.

يمكنك استخدام Filesystem Object بدلاً من وظيفة "Kill"، ويمكنك استخدام هذا السطر من التعليمات البرمجية:

تعيين fso ككائن

تعيين fso = Create Object ("Scripting.FileSystemObject")

fso. Delete File (اسم المسار)

يستخدم هذا الرمز Filesystem Object لحذف الملف ويمكنه حذف ملفات القراءة فقط أو الملفات المستخدمة حاليًا من قبل عملية أخرى.