عبدالله المجرب قام بنشر يناير 6, 2011 قام بنشر يناير 6, 2011 خبراءنا الكرام السلام عليكم ورحمة الله وبركاتة انشاء الله ان يكون شرحي في المرفق مفهوماً وكلي ثقه انه باذن الله ساجد الحل لديكم فمنتدنا الغالي زاخر بالخبراء الذين لا يدخرون جهداً في مساعدة من طلب المساعدة والتعلم. ابواحمد ابواحمد.rar
عبد الفتاح كيرة قام بنشر يناير 6, 2011 قام بنشر يناير 6, 2011 (معدل) ما فهمته هو نقل الأعمدة التى باللون الأصفر إلى شيت " الكشف " للأعمدة الصفراء بما أن الأسماء ترتيبها واحد استخدم الكود التالى : Dim myrng1 As Range Set myrng1 = Sheets(1).Range("g13:i100") With myrng1 .Copy Sheets("الكشف").Range("e8") End With Application.CutCopyMode = False ابواحمد.rar تم تعديل يناير 6, 2011 بواسطه kemas
عبدالله المجرب قام بنشر يناير 7, 2011 الكاتب قام بنشر يناير 7, 2011 استاذي العزيز كيماس اشكرك على تجاوبك انا اسف ولكني لم اوصل الفكرة في الشرح النقل والاستبدال الموجود هو بالفعل الطريقة التي اقصدها ولكن ليس هناك ترتيب في الاسماء وانما انا قمت بالخطاء بوضعهم مرتبين لذا المطلوب ربط التغيير بالرقم الوظيفي ((للعلم الكشف قد يكون فيه اكتر من 200 اسم ))حيث ان الاسم قد يكون في موضع ي الجدول ابواحمد
عبدالله المجرب قام بنشر يناير 7, 2011 الكاتب قام بنشر يناير 7, 2011 (معدل) استاذي الكريم المعطاء كيماس انا اعتذر على الاطالة فهذا عيب في طريقة شرحي وعدم مقدرتي على ايصال طلبي من المرة الاولى هذا هو المطلوب ولكن شاهد الشرح في المرفق ومرة اخرى اقدم خالص شكري على تجاوبك واتمنى ان اكون وفقت هذه المرة في الشرح ولي سوال اخر (اذا كان لدي رقم مكون من 8 ارقام مثل ((891513095)) واردت ان اطرح تاريخ اليوم من اخر رقمين والذين يمثلان سنة الميلاد (1989)) ابواحمد.zip تم تعديل يناير 7, 2011 بواسطه ولد المجرب
عبد الفتاح كيرة قام بنشر يناير 7, 2011 قام بنشر يناير 7, 2011 أخى أبا أحمد أعتقد أنه يجب الآتى فى الشيت الأول 1- الإدارة الحالية و النوبة الحالية تغير اسمها إلى الإدارة السابقة و النوبة السابقة لأن بجوارهما خانتان للحالية ثانيا تمسح المعادلات من هاتين الخانتين وتكتب المعلومات فيهما يدويا والله أعلم و معذرة لزر الأمر من بقايا الكود الأول نسيت مسحه وشكرا
عبدالله المجرب قام بنشر يناير 7, 2011 الكاتب قام بنشر يناير 7, 2011 شكراً لك استاذي العزيز كيماس واتمنى الاجابة على السئوال الثاني ابواحمد
عبد الفتاح كيرة قام بنشر يناير 7, 2011 قام بنشر يناير 7, 2011 نعم السؤال الثانى ضع الرقم فى a4 فى b4 ضع المعادلة التالية =DATEDIF(DATE(("19" &MID(A4;1;2));MONTH(NOW());DAY(NOW()));NOW();"y") المرفقات حساب kemas.zip
عبدالله المجرب قام بنشر يناير 7, 2011 الكاتب قام بنشر يناير 7, 2011 شكراً جزيلا استاذنا الفاضل بارك الله لك في علمك وزادك الله من نعيمه ابواحمد
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.