السلام عليكم ورحمة الله وبركاته

إخواني وأحبابي في الله

يمكن فعل الكثير والكثير باستخدام الأكواد ، ومن هذه الأشياء التي يمكن لأكواد الـ VBA فعلها هو تنزيل أو تحميل ملف من الإنترنت إلى جهازك



الملف المرفق عبارة عن واجهة بسيطة عليها زر أمر ، وعند الضغط على زر الأمر سيقوم الكود في أقل من دقيقة بتحميل الملف .. والملف هدية مني لكم (مكتبة الأكواد التي قدمتها من فترة ، وهي تجميعة كبيرة من الأكواد قمت بوضعها في شكل فهرس ليسهل الوصول إلى الكود المطلوب)

دعنا من مكتبة الأكواد ولنركز على موضوعنا ...

كل ما يلزم تغييره في الكود هو أن تقوم بتحديد عنوان الملف الذي ستقوم بتحميله ، و المجلد الذي سيتم التنزيل فيه ، وكتابة اسم الملف الذي سيتم تنزيله بالامتداد .. هذا كل ما في الأمر ، وسيقوم الكود بعمل اللازم وتنزيل الملف إلى جهازك

في الكود المستخدم هذه هي الأسطر التي ستقوم بالتعديل فيها

    url = "https://techno7asry.com/Up/do.php?down=130"
    strFolder = Environ("USERPROFILE") & "Desktop"
    strFile = "VBA Codes Library By YasserKhalil.rar"

وأخيراً إليكم الملف المرفق

تحميل الملف من هنا

تقبلوا وافر تقديري واحترامي