hema_hn

كنت عامل برنامج اجور على قدى للعماله وكان المطلوب سابقا اى فئات من 1 قرش الى 49 قرش يكون 50 قرش و من 51 قرش الى 99 قرش يبقى 1 جنيه

ودى سهله وتمت الحمد لله

حاليا فيه ازمة فى الجنيهات والنصف جنيه

فطلب منى انى اجبر من 1 الى 4.5 للخمسة جنيها

ومن 6 جنيه الى 9.5 للعشرة جنيها

الحل فى اكسس

استخدام دالة round (total ; 0)

ليكون الرقم صحيح

استخدمت دالة right safy: Right(total;1)

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

5or10: IIf([right safy]<=1;0;IIf([right safy]<=5;5;IIf([right safy]<=6;5;IIf([right safy]<=9;10;0))))

وبعدها يتم خصم الـ 

Right

واضافة الـ

5or10

هكذا

final total: [total]-[right safy]+[5or10]

قشطة

الحمد لله تم التغلب عليها بدالة 

Right 

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

شكرا لك اخى

نرجو من السادة الافاضل معرفة دالة التقريب لأعلى

المطلوب من سيادتكم 

تقريب من 152.1 حتى 152 الى 150

تقريب الرقم 152.1 حتى 154.9  الى 155

تقريب الرقم 155.1حتى 156.9 الى 155

تقريب الرقم 157 حتى 159.9 الى 160

اكثر من اثنين جنيها يكون خمسة

واقل من اثنين جنيها يحدذف الاثنين

ـــــ

فى اكسل يوجد دالة

floor

وهى تعطينى مضاعف العشرة مثلا وبعدها يحتسب الفرق بين مضاعف العشرة 

وبالتالى يمكننى التعامل مع الفرق

اما فى اكسس لا يمكننى ذلك

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

مشكوريييييييييين

هل يوجد طريقة لوضع هذا الكود فى الـ personal  ليتم تطبيقة على أى ملف يفتح

بالنسبة للصفوف نعم نفس الطريقة المتبعة تصلح للعدد الذى تريدة لكن ال ( check box ) لازم يتم رسمة وربطة بالخلية التى تريدها والله أعلم

شكرا لسرعة الاجابة 

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

أخى الحبيب ( HEMA )

هل قرأت شرح عمل ال ( CHECK BOX ) جيدا

الطريقة سهلة جدا

1 - قم بتظليل الصف الذى يسبق الصف الذى تريد إدراجة ( الصف الجديد )

2- قف على أول خلية فى الصف الذى تريد إدراجة ثم كليك بيمين الماوس ثم ( PAST SPECIAL ) ثم إختر ( FORMATS ) لتقوم بنقل المعادلة التى تقوم بتلوين الصف عند تعليم ال ( CHECK BOX )

ثم نقوم بنسخ ال ( CHECK BOX ) ثم كليك علية بيمين الماوس ونختار ( FORMAT CONTROL ) ثم نربطة بالخلية الجديدة التى سنضعة فيها

وهكذا نكون صف جديد أو خلية جديدة مرتبطة بال ( CHECK BOX )

أرجو أن يكون الشرح بالأضافة للشرح السابق قد أوضح الأأمور بالنسبة لحضرتك

تقبل : تحياتى

نعم اخى انا فعلا نفذت عملية النسخ مع ربط الـ check box ولكن المطلوب نسخ أكثر من الف صف مثلا هل اقوم بنفس الخطوات صف تلو الآخر ام يوجد طريقة لعملية past لكل الصفوف مرة واحدة

تقبل تحياتى

أخوتى وأحبائى

الأستاذ ( BLOOD )

الأستاذ  ( HEMA_HN )

الأستاذ  ( رشراش )

المهندس ( ياسر  )

أستاذى ومعلمى  ( عبد الله المجرب )

أستاذ ( أحمد يونس )

شكرا على مروركم وكلماتكم الجميلة ، إللى بجد شرفتنى وأسعدتنى

بارك الله فيكم

تقبلوا : تحياتى

نرجو معرفة كيف يتم نسخ الصف لأسفل حيث عند النسخ الـ check box لا يتم تنفيذه للصف المنسوخ

نرجو معرفة كيف يتم نسخ الصف لأسفل حيث عند النسخ الـ check box لا يتم تنفيذه للصف المنسوخ

لا شكر على واجب اخى العزيز ... وشكرا على ردك وعلى اهتمامك .... زادك الله من فضله

الشكر موصول لك اخى 

 

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

اخى العزيز

قم بالضغط على كلمة كتاباتى من خلال اسمك الموجود بالمنتدى

واليك الرابط الخاص بجميع كتاباتك فى المنتدى

 

http://www.officena.net/ib/index.php?app=core&module=search&do=user_activity&mid=109418

 

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

السلام عليكم

الاخ الكريم / hema_hn

بارك الله فيك

وعذرا للتأخير في الرد فلم اشاهد الموضوع مرة ثانية الا اليوم

تقبل اعتذاري

 

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

حيث قمت بتغيير وظيفة SAVE AS  لتكون SAVE مباشرة والغاء وظيفة حفظ باسم

حيث عند الضغط  SAVE  او  SAVE AS  يقوم الملف بالحفظ مباشرة

ارجو ان يفي بطلبك وفي انتظار ردك

تقبل خالص تحياتي

 

 

رسالة تطلب من المستخدم تمكين الماكرو مع عدم الحفظ باسم .rar

اخى حمادة 

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

انا حاولت بس كان فيه تعارض انا قد حصلت عليه من منتدانا العريق

وشكرا لك

اسم الملف.rar

بارك الله فيك وفى ذريتك

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

ماشاء الله بارك الله فيك

اخى كان لي موضوع ونرجو المساعدة

http://www.officena.net/ib/index.php?showtopic=50604

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

انا كنت شارى نسخ اصلية للاوفيس 2000 فيه مشكلة فى الكتابة لا يمكن الكتابة بالتشكيل 

هل دا عيب فونت أم ماذا

ولكم جزيل الشكر

ا

ممكن يكون التشكيل باللون الأبيض وأنت تكتب ولا يظهر التشكيل

جرب تكتب على خلفية ملونة .

وإن ظهر التشكيل

فيمكن تغيير لون التشكيل إلى اللون الأسود من الخيارات المتقدمة

نأسف على التأخير فى الرد

لم تنجح هذه الطريقة اخى الفاضل

كيفية تحضير النقدية لمجموع مرتبات الموظفين لقسم من الاقسام

بمعنى وانا بحضر اجمالى المرتبات 

اخد كام ورقة من فئة200 جنيها و  100 جنيها و 50 جنيها و 20 جنيها و 10 جنيها و 1 جنيها و 0.5 جنيها

فكنت مضطر آخذ النتائج من الاكسس وادخلها فى الاكسل لعدم حصولى على دالة الـ floor فى اكسس او دالة تعمل بنفس وظيفتها

فالشكر موصول لله ثم للاستاذ / عمرو رحيل، فى موضوعه 

http://www.officena.net/ib/index.php?showtopic=36930&hl=

وانا كنت منفذه على اكسل فى هذه المشاركة

http://www.officena.net/ib/index.php?showtopic=50276

وكان عندى مشكلة انه لا بديل لدالة  floor  فى اكسيس

وباستبدال دالة الـ trunk  فى اكسيل        بدالة    fix فى اكسس

تم عمل المرفق

table         :   table1

queries     :   فكة      -    تجميع الفكة

report       :   تقرير نهائى 

فئات نقدية.rar

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

انا كنت شارى نسخ اصلية للاوفيس 2000 فيه مشكلة فى الكتابة لا يمكن الكتابة بالتشكيل 

هل دا عيب فونت أم ماذا

ولكم جزيل الشكر

هل قمت باضافة الاكواد في الملف الاخير الي ملفك ؟؟

اخى حمادة 

مرفق ملف سيادتكم بعد اضافة الكود الأخير 

فيه رسالة بتطلعلى

ماهي طريقة الحماية  ... وما هي الاكواد الاخري التي تتعارض

فالبفعل كود رساله الماكرو ... به بعض الحواجز

 

شاهد اخي الملف التالي ع السريع هل تقصد اخي الكريم هكذا

 

 

حماية الورقة من حذف الأوراق أو زيادة أوراق.rar

اخى بارك الله فيك

بعد تشغيل الملف الى فى مشاركتك رقم 13 الملف اشتغل تماما بمعنى

ان مفيش حد من المستخدمين حيعرف يفتح الملف الا لما يقلل حماية المايكرو low وكمان مش حيعرف يعمل save as

المشكلة الى قابلتنى لما عملت للملف ده حماية للـ workbook 

حصل debug وانا عايز اعمل حماية للـ workbook عشان مسمحش لحد ينسخ ورقه او يضيف ورقة او يغير اسم 

لك منى كل حب وتقدير اخى حمادة

:)

ماشاء الله

بارك الله فيك

بس ليه انا مش عارف اعمل كوبى لأسفل

ماشاء الله والله اكبر عليك اخى حمادة 

بجد روعة 

وربنا يباركلك

هو فيه سؤال بس برحتك يعنى انا مش عايز اتقل عليك 

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

عملت حماية workbook حصل تعارض مع الملف ولقيت بجز فلغيته اكيد الاكواد هنا بتتعارض مع حماية كاملة للوركبوك

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

ولك منى كل حب واحترام

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