نبيل عبد الهادي

تفضل ....ادخل على ورقة ملاحظات ںé ©ëںê¤.xlsm

تفضل الملف موجود أم غير موجود.rar

تفضل تم وضع كلمة مرور "123" لتأكيد الدخول على هذا الاجراء iBox = Application.InputBox("ادخل كلمة المرور لهذا الاجراء", "تأكيد بكلمة المرور") If iBox <> "123" Then Exit Sub 'تغير الباس من خلال هذا السطر BBBBB.xls

تفضل مع ملاحظة الشرح في بعض الاوراق ںé ©ëںê¤ ¥« ںéêلéي .xlsm

تفضل 1- دمج الخلايا في الاوراق يؤثر على عمل الاكواد 2- سيتم حذف الشيكات المرحلة بالاعتماد على رقم الشيك البرنامج.rar

تفضل مع ملاحظة الايقونات المنقوله لم يتم ربطها بكود في الورقة الاصلية !! يعني مجرد ايقونات تم نقلها حسب طلبك تفريغ واسترجاع - نسخه.rar

تفضل 1- يكون العمل فقط في الاعمدة (A,D,E) 2- الاعمدة باللون الاصفر تحوي معادلات 3- تم عمل قائمة منسدلة في العمود ( A ) لاختيار رقم الموظف اعتمادا على ورقة Sheet1 4- تم اضافة عمود (G) لبيان الحالة عند التجاوز على رصيد الاجازات رصيد الاجازات.xlsx

تفضل test_2.xlsm

بعد اذن اخي واستاذي سليم حاصبيا واثراء للموضوع الملف المرفق 1- في ورقة2 عن طريق المعادلات 2- في ورقة3 عن طريق الكود .. وشرح طريقة الاستخدام موجود في نفس الورقة توزيع خلايا عمود على كذا عمود.xlsm

بعد اذن استاذ محمد يتم الترحيل بعد تنشيط الورقة باسم all test_2.xlsm

تفضل اكتب اي كلمة test34.xlsm

تفضل 1- ضع المجلد في القسم c 2- الخلية a1 تحتوي على مسار الملفات وهي ثابته لاتغيرها 3- الخلايا من " a2:a400 " تحوي معادلة جلب اسماء الملفات وامتدادها في المجلد المسمى "الملف موجود ام غير موجود" بالاعتماد على دالة تم وضعها في محرر الاكواد 4- اكتب اسم الملف في الخلية b1 سيتم اجراء فلترة للعمود a اذا لم ييظهر اسم الملف بعد الفلترة يعني اما مفقود من المجلد... او لم تكتب اسمه بالشكل الصحيح المطابق لاسم الملف 5- اذا رغبت بتغير اسم المجلد او نقله لمكان اخر يجب تحديث المسار الجديد ونسخه في الخلية a1 الملف موجود أم غير موجود.rar

تفضل تم وضع المعادلة في العمود E وتتم الفلترة من خلال هذا العمود =IF(AND(ISBLANK(B2);ISBLANK(C2));"إخفاء الصف";"") Filtering.xlsx

وعليكم السلام ادخل على الرابط https://www.officena.net/ib/topic/67855-مشكلة-فى-additional-controls /

بعد اذن استاذ طارق المرفقات ...مع ملاحظة 1- ضع الملفات الفرعية في مجلد باسم MyFolder في القسم c 2- ضع الملف الرئيسي 00.xlsm في اي مكان ترغب فيه بشرط ان لايكون داخل المجلد ضمن الملفات الفرعية 3- يمكن لك تغير مسار الملفات الفرعية دخل المجلد في هذا السطر داخل علامتي "" Folderpath = "C:\MyFolder\" 00.xlsm 01.xlsx 02.xlsx 03 .xlsx

الملف الذي ارفقه استاذ سليم يفي بالغرض ويشمل ترحيل الصادر والوارد اما غير ذلك.... اليك الملف وحسب طلبك الصادر.xlsm

تفضل بيانات الموظفين.xlsm

تفضل ضع مجلد صور الموظفين في القسم D يمكن تغيره في هذا السطر fName = "D:\صور الموظفين\" & r & ".jpg" بيانات الموظفين - مع صورته.xlsm صور الموظفين.rar

الارقام مخزنة لديك كنص والاكسل يعطيك تنبيه بهذا ويطلب منك تحويلها بتنسيق ارقام وعند تحويلها تظهر بالحقيقة جميعها ارقام متشابهه Book1.xlsx

تفضل... 1- على اعتبار ان الملف 1.xlsm في مجلد Files في القسم c 2- بعد انتهاء نقل الاوراق اختر "حفظ" اذا كنت لاتريد احتفاظ الملف الاصلي 1.xlsm بالاوراق المنقوله والعكس صحيح عند اختيار "عدم الحفظ" 3- يمكن لك نسخ الاوراق اكثر من مره الى ملف HR_TESTER HR_TESTER.xlsm 1.xlsm

السلام عليكم اكتب او اختر من القائمة المنسدلة في الخلية m1 اخفاء اوراق العمل بناء على معلومة في خلية.xlsm

السلام عليكم .المعذره لم استطع تحميل ملفك المرفق عموما ..ضع الكود التالي في حدث الورقة المطلوبه ويمكن لك التحكم في المدى بين علامتي "" Private Sub Worksheet_Activate() ScrollArea = "A1:N100" End Sub

انضمامك هو اثراء للمعلومات في هذا الصرح العلمي الكبير. لك كل الاحترام والتقدير

حدد الاعدادات كما في الصورة بالضبط ... تجد ماتريد

استاذ سليم ... منكم نستفيد ونتعلم ......ولكم فائق الشكر والتقدير