تعديل كود ترحيل بيانات موظف محال للمعاش

[algammal]

السادة الكرام مسئولي ومشرفي وخبراء وأعضاء وزوار منتدي أوفيسنا (إكسيل)

طبتم وطابت جميع أوقاتكم بالخير واليمن والبركات أينما كنتم وأينما حللتم

وتحيتكم: السلام عليكم ورحمة الله وبركاته

بخصوص موضوع سابق لنا هذا رابطه

الرابط

المطلوب: فقط عندما يتم في أي مرة مسح (أو إزالة) المحتويات في شيت (معاشات) أن يكون العدد (0) صفر في كل من خلية: (معاش C3؛ ذكر E3؛ أنثى H3؛ المجموع J3) 

حيث أنه تم ملاحظة أن العدد يظل كما هو في الخلايا المذكورة بعد مسح المحتويات أو إزالتها كما موضح بالصورة المرفقة

و أرجو منكم جميعا أن تلتمسوا لنا العذر حيث أن هذه أول أمرة أتعرض فيها لمثل ذلك الأمر.

ملحوظة: للسادة المشرفين الكرام تعديل اسم الموضوع بما يناسب قوانين المنتدى إن لم يكن الاسم مناسبا

ودمتم جميعا بخير وصحة وعافية

 

[عبدالله بشير عبدالله]

وعليكم السلام ورحمة الله وبركانه

 اليك الملف وبه التعديل

ترحيل بيانات الموظف المحال للمعاش إلى شيت آخر وحذفه من قاعدة البيانات 5.xlsb

وان اردت اي تعديل في الملف  فايشر

لك كل الود والاحترام

[algammal]

أستاذي الفاضل الأستاذ / عبد الله بشير عبد الله

السلام عليكم ورحمة الله وبركاته

بشرك الله بالجنة؛ وبشرت بما يسرك دوما آمين رب العالمين

عرفتكم بالقلب ولم أعرفكم بالنظر؛ تعارفنا بلا وجوه ولكن بالسطور

أحبكم في الله

ودمتم عونا لكل من أراد العون؛ ومثلا يحتذى لكل من أراد القدوة.

دمتم في حفظ الله ورعايته؛ ولا حرمنا الله من فيض علمكم

[عبدالله بشير عبدالله]

وعليكم السلام ورحمة الله وبركاته

اسعدتى جدا دعاؤكم لي  

ولكم مثل ما دعوتم لي وزيادة

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

لكم كل التقدير والاحترام

 

 

[algammal]

أستاذي الفاضل / عبدالله بشير عبدالله

السلام عليكم ورحمة الله وبركاته

لقد أسرتني بعلمك وبحوارك الراقي

والله أسأل أن يرزقكم الدرجات العلى من الجنة وأن يسقيكم من يد نبينا محمد (صل الله عليه وسلم) شربة لا تظمأ بعدها أبدا؛ وأن يظلكم الله في ظله يوم لا ظل إلا ظله

ولن أمل من الدعاء لكم ما حييت؛ ولن أمل أيضا من قولي لكم:

دمتم عونا لكل من أراد العون؛ ومثلا يحتذى لكل من أراد القدوة

والله يحفظكم ويرعاكم  

[algammal]

السلام عليكم ورحمة الله وبركاته

هل لي أن اطمع في كرم  أخلاقكم و علمكم

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

بحيث لو أردت أن أقوم بتعديل في التنسيق 

أستطيع القيام به

وجزاكم الله عنا خير الجزاء؛ ودمتم في حفظ الله ورعايته

[عبدالله بشير عبدالله]

وعليكم السلام ورحمة الله وبركاته

2 ساعات مضت, algammal said:

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

بحيث لو أردت أن أقوم بتعديل في التنسيق 

أستطيع القيام به

 

الاوامر التي يتم فيها التعديل  الملونة فقط

    .HorizontalAlignment = xlCenter

• المحاذاة الأفقية للنص داخل الخلايا إلى المنتصف (أي النص يظهر في وسط الخلية ).

    .VerticalAlignment = xlCenter

• المحاذاة العمودية للنص داخل الخلية إلى الوسط (أي النص يظهر في منتصف ارتفاع الخلية).

    .ShrinkToFit = True

• إذا كان النص طويل ولا يتسع داخل الخلية، يُصغّر تلقائيًا ليتناسب مع حجم الخلية بدلًا من أن يتجاوزها. وبمكن ايقافها بتغيير TRUE الى  FALSE

    With .Font

فتح إعدادات الخط (Font) للنطاق

.Name = "Arial"

• نوع الخط هو Aria

        .FontStyle = "غامق"

نمط الخط غامق (Bold).

        .Size = 12

• حجم الخط هو 12 نقطة.

كذلك يمكن الغاء الجزء المتعلق بالتنسيق  وحينها يمكنك النتسيق يدويا حسب رغبتك

اليك الملف  بدون اي تنسيق  عدا النسطير وان اردت الغاء التسطير ابلغنى يذلك

هذا حسب فهمى لطلبكم

وات كان المطلوب شئ اخر فارجو التوضيح اكثر

تحياتي

ترحيل بيانات الموظف المحال للمعاش إلى شيت آخر وحذفه من قاعدة البيانات 6.xlsb

تم تعديل منذ 4 ساعات بواسطه عبدالله بشير عبدالله

[algammal]

 أستاذي الفاضل / عبد الله بشير عبد الله
السلام عليكم ورحمة الله وبركاته 

بداية إن حلمكم وتواضعكم الجم وسرعة تلبيتكم لما اطلبه ليزيدني خجلا من نفسي كلما طلبت شيئا

وأسأل الله العلي العظيم أن يجزيكم فضل تعليمكم وحلمكم علينا

ومن فضلك وإن أذنت لي أستاذي الفاضل؛ لا أريد حذف التنسيقات من شيت معاشات؛ ولكني أريد التنسيق فيه كما يلي:
 أولا: بالنسبة للصفين الثالث والرابع كما هو موضح في الشيت تماما 
ثانيا: مثل الصفوف من 7:5 بالنسبة للخط والحدود والتنسيق الشرطي
وهكذا لكل صف جديد يتم إضافته لاحقا من شيت DATA بداية من الصف الثامن حتى نهاية الشيت
ولكم خالص الشكر والتقدير؛ وتقبلوا خالص اعتذاري وأسفي الشديد على ازعاجكم.

ترحيل بيانات الموظف المحال للمعاش إلى شيت آخر وحذفه من قاعدة البيانات 7.xlsb