سلطان العبدالله قام بنشر مارس 15, 2014 قام بنشر مارس 15, 2014 السلام عليكم ورحمة الله وبركاته اساتذتي الكرام يسعدني ويشرفني الانضمام الى المنتدى وباذن الله نفيد ونستفيد حقيقة بعد محاولات عدّه ومتابعة هذا المنتدى ودروس للاستاذ عبدالله المجرب لم استطع ايجاد حل لما اقوم به ! لدي ملف بدأت بتصميمه لمتابعة رصيد الاجازات للزملاء الموظفين في القسم ولكني توقفت عند نقطه وهي موضحه في الملف المرفق الذي اريده توجيهي لكي اعمل المطلوب وليس حله في الملف بارك الله فيكم لكي استفيد كما قال الاستاذ عبدالله المجرب في احد دروسه اعطني سنارة ولا تعطني سمكة شكرا لكم :) رصيد الاجازات.rar
طارق محمود قام بنشر مارس 16, 2014 قام بنشر مارس 16, 2014 السلام عليكم تفضل أخي الكريم الملف وبه شرح سريع للكود المستخدم رصيد الاجازات1.rar
سلطان العبدالله قام بنشر مارس 16, 2014 الكاتب قام بنشر مارس 16, 2014 شاكر ومقدر متابعتك استاذي طارق محمود يبدوا اني لم اوضح المطلوب بما فيه الكفاة اعتذر منك المطلوب استاذي الكريم عندما اقوم بتعبئة التواريخ للموظف باسم سلطان على سبيل المثال والمعطيات السابقة الموجودة كالتالي الرصيد الفعلي = 10 الاجازات = 0 ( المقصود بالاجازات هو عدد ايام الاجازات خلال السنة بالكامل ) عدد الايام = الفرق بين التاريخين من و الى مثلا اصبح عدد الايام = 5 انا اللي احتاجه فقط اذا قمت بتعبئة تاريخ من والى يظهر لدي عدد الايام سواء موظف واحد او اثنين او ثلاثه .. ولا يشترط ان يكون لكل الموظفين عند ضغط زر حفظ يقوم بالتالي الاجازات + عدد الايام والناتج يكون في حقل الاجازات بمعنى اخر ان حقل الاجازات بعد ضغط زر الحفظ يتغير من صفر الى 5 . اتوقع الذي احتاجه اني انسخ حقل الاجازات وحقل عدد الايام لكل موظف ثم اقوم بجمعه وارجع الصق ناتج الجمع في حقل الاجازات مه اخرى ! اعتذر للاطاله وشكرا لك مقدما استاذي
سلطان العبدالله قام بنشر مارس 16, 2014 الكاتب قام بنشر مارس 16, 2014 اعتقد باذن الله ان وجد ضالتي بمساعدة الاستاذ طارق محمود حيث استفدت من المعادلة في استخدام الماكرو والتعديل على السطر المحدد في لصق القيم في عمود الاجازات مع الاضافة وهو ما كنت احتاجه بحيث يضيف عدد الايام مباشرة الى الرقم الموجود في الاجازة Sub AddVacation() Range("J4:J12").Select Selection.Copy Range("G4:G12").PasteSpecial Paste:=xlPasteValues, Operation:=xlAdd Range("h4:i12").ClearContents Range("n3").Select End Sub شكرا لكم رصيد الاجازات.rar
طارق محمود قام بنشر مارس 17, 2014 قام بنشر مارس 17, 2014 الحمد لله تشرفنا بك اخي الكريم في المنتدي نسيت أن أرحب بك كما هو المعتاد لأولي مشاركاتك أهلا ومرحبا بك بين إخوانك ونحمد الله أن جعلنا سبب لإيجاد ماتبحث عنه
سلطان العبدالله قام بنشر مارس 17, 2014 الكاتب قام بنشر مارس 17, 2014 الحمد لله تشرفنا بك اخي الكريم في المنتدي نسيت أن أرحب بك كما هو المعتاد لأولي مشاركاتك أهلا ومرحبا بك بين إخوانك ونحمد الله أن جعلنا سبب لإيجاد ماتبحث عنه الله يخليك استاذي طارق هذا من كرم اخلاقك .. تشرفت بالجميع شكرا لك
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.