محسن أبومحمد

استاذنا الفاضل / أحمد يوسف

التالي هو جزء من الكود الأصلي حسب شرح استاذنا ياسر أبو الخليل ويتضمن نسخ جميع أوراق العمل من داخل الملف

 Do While Filename <> ""
            'فتح المصنف
            Workbooks.Open Filename:=Path & Filename, ReadOnly:=True
                'حلقة تكرارية لكل أوراق العمل داخل المصنف النشط
                For Each SH In ActiveWorkbook.Sheets
                    'نسخ ورقة العمل ولصقها بنهاية فهرس أوراق العمل
                    SH.Copy After:=ThisWorkbook.Sheets(X)
                    'زيادة قيمة المتغير بمقدار 1
                    X = X + 1
                'الانتقال لورقة العمل التالية
                Next SH
            'إغلاق المصنف
            Workbooks(Filename).Close

ما احتاج اليه هو نسخ sheet1  فقط وليس جميع الأوراق

وجزاكم الله خير على علمكم وصبركم وعطاؤكم

بسم الله ما شاء الله

جزاك الله خير استاذنا ياسر أبو الخليل

طلب بسيط  من عمالقة المنتدى

ما التغيير في الكود اذا كنت احتاج إلى نسخ شيت معين وليس جميع الشيتات

مع خالص الشكر والتقدير

الاخ الفاضل عبدالله الصاري

مشكور على وقتك ومجهودك  لقد قمت بالمطلوب

جزاك الله كل خير 

الاساتذة الكرام بالمنتدى

ارغب في تطبيق كود التصفية على مجموعة كبيرة من الشيتات مرقمة من 1إلى 4 بحيث تظهر نتائج التصفية في شيت filter

لما بان الملف المرفق يتضمن كود تصفية من اعداد الاستاذ الرائع ياسر حليل ابو البراءAdvanced Filter VBA.xlsm

مع خالص التحية والتقدير

تحية طيبة الي جميع الأساتذة الكرام

ارغب في إضافة كود يتعرف على الأعمدة التي بها تواريخ في قاعدة البيانات على ان يقوم المستخدم بإضافة التاريخ (YYYY/MM/DD)

مع خالص التحية والاحترام لجميع الأساتذة

استاذنا العزيز

جزاك الله خير

الاستاذ الكبير  : عبدالله باقشير ... أعمالك كلها بها لمسة فنية جميلة
بارك الله فيك وبارك ولك .. وننتظر منكم المزيد ....

استاذنا

هل يمكن اظهار البيانات داخل ال frame علي شكل 4اعمدة

ولكم جزيل الشكر والاحترام

استاذنا الفاضل جزاك الله كل خير

حقيقة الأمر اني تعلمت منك الكثير

 جعله الله في ميزان حسناتك

جزاك الله خيرا

السلام عليكم خبراء المنتدى

ممكن فورم حفظ الملفات الورد أو pdf في قاعدة البيانات أكسس أو أكسيل .. كذلك لو امكن كيف أستعرض ملف الورد أو الpdf داخل الفورم حيث يمكن قراءة محتواه وطباعته .. ياريت مساعدة الله يخليكم ..

من كل قلبي اتمنى لكم مزيد من العلم والتوفيق