استدعاء بيانات و ثم الترحيل - في الرواتب

[saad abed]

برنامج بسيط للمرتبات استخدمه فى عملى لا اريد التغيير فيه ولكن اريد ترحيل البيانات من صفحة الترحيل الى صفة المرتبات

والمعادلات تقوم بالباقى

هل اجد من يساعدن فى تنفيذ ذلك

مرتبات الجديد.rar

[احمدزمان]

السلام عليكم

آمل ان يكون هذا المطلوب

مرتبات_الجديد.rar

[هشام شلبى]

السلام عليكم

========

اخى العالى " احمد يعقوب "

والله كود ما شاء الله

لكن ينفصه سطر صغير ليعمل بنجاح

علينا استبدال السطر

msg box " الحمد لله    -     تم نقل البيانات بنجاح"

9

بالسطر

MsgBox "تم نقل البيانات بنجاح", vbMsgBoxRight, "الحمد لله"

9

شاهد المرفق

مرتبات الجديد بعد التعديل.rar

[احمدزمان]

السلام عليكم

اخي هشام

جزاك الله كل خير على التوضيح

وشكرا لك

[saad abed]

شكرا لكم جميعا على سرعة الرد وجودته اشكركم اشكركم

شكرا لاحمد يعقوب (احمد زمان)

شكرا لهشام شلبى

ما قدمتموه هو المطلوب بالضبط

الا ان عدد ايام الاضافى تكتبها 2

تجدها فى صفحة المرتبات 900 وهى المرتب الاساسى

هل اج منكم صدرا متسعا وقوة تحمل لاخيكم وتعديل الملف مرة اخرى لتذهب ايام الاضافى فى مكانها الصحيح

وصفحة الترحيل بعد ترحيل البيانات تختفى البيانات المرحلة

واطلب منكم حماية للمعادلات فى الصفحات يمكن لى انا وحدى ان ارفعها

وشكرا

تم تعديل أبريل 13, 2010 بواسطه سعد عابد

[هشام شلبى]

السلام عليكم

========

بعد اذن اخى احمد

الاخ الكريم

عملت لك فى الخلية D10 قائمة منسدلة تختار منها ارقام العمال " وذلك للتسهيل "

اما بالنسبة للحماية " رقم فك الحماية 123" كما طلبت انت

اما بالنسبة لاختفاء البيانات بعد الترحيل فيجب اضافة السطر الاتى لاخر الكود

[f11:f14].ClearContents

Range("d10").Select

On Error GoTo 0

End Sub

اما بالنسبة لكتابة العدد 2 يظهر فى الترحيل 900 فيجب استبدال السطر

Cells(r, 7) = Cells(10, 6)

بالسطر

Cells(r, 7) = Cells(11, 6)

وشاهد المرفق

ان شاء الله تظبط معاك

تقبل تحياتى لك ولاستاذى " احمد يعقوب"

مرتبات الجديد بعد التعديل.rar

تم تعديل أبريل 13, 2010 بواسطه هشام شلبى

[saad abed]

اخى هشام شلبى شكرا جزاك الله كل خير وبارك الله فيك

كل كلمات الشكر تعجز عن التعبير عن شكرك

للاستجابة السريعه هو ده المطلوب بالضبط ولكنك لفت نظرى

وزدت طمعى فى المساعده هل ممكن نعمل قائمة منسدلة للاسم

[هشام شلبى]

اخى هشام شلبى شكرا جزاك الله كل خير وبارك الله فيك

كل كلمات الشكر تعجز عن التعبير عن شكرك

للاستجابة السريعه هو ده المطلوب بالضبط ولكنك لفت نظرى

وزدت طمعى فى المساعده هل ممكن نعمل قائمة منسدلة للاسم

السلام عليكم

========

هل تريد ذلك مكان الرقم فى ضفحة الترحيل

ام ماذا واذا كان سيكون الاسم مكان رقم العامل ويكون مكان الاسم رقم العامل هل هذا ما تريد

[هشام شلبى]

السلام عليكم

========

الاخ سعد

شاهد المرفق

مرتبات الجديد بعد التعديل.rar

[saad abed]

اخى هشام شلبى لك منى كل تحية

وشكرا لك شكرا لك

هذا اكثر مما تصورت انا فلك الف تحية

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

وبارك فيك وفى علمك

عجزت الكلمات للتعبير عن شكرى

[saad abed]

ده اعتبره سؤال مش طلب العمال يتبعون اماكن كثيره

اسم المحجر رقم 1 ورقم 2 وهكذا هل يصح ان اختار اسم المحجر فيظهر العمال المقابلين له فى صفحة الداتا فقط

انا لا اطلب تنفيذها والله خجلا من استجابتك السريعه

[احمدزمان]

السلام عليكم

اخي الكريم و المعطاء دائما هشام

ارجو ان تسمح لي بأن ارد على الطلب الأخير للأخ سعد

اخي سعد

في المرفق يوجد قائمتين منسدلة

اختار اسم المحجر يظهر لك في القائمة الثانية كل اسماء العاملين في هذا المحجر

اضف البيانات التي تريد ثم اضغط ترحيل

مرتبات الجديد بعد التعديل.rar

[saad abed]

الاخ العزيز احمد يعقوب (احمد زمان)

شكرا لك على مجهودك الكبير معى وليس هذا غريب على كل المشريفين الذين تعودنا منهم كل مساعده

اشكرك اشكرك

[احمدزمان]

جزاك الله كل خير اخي سعد

لا شكر على واجب

اخوك

احمد يعقوب زمان