مهند محسن

وعليكم السلام-جرب الملف الأن
 
 
حضور وإنصراف.xlsb

طالما انك لم تقم برفع ملف مدعوم بشرح كافى عن المطلوب , فكان عليك لزاماً استخدام خاصية البحث بالمنتدى فطلبك تكرر كثير جداً ؟!!!
محتاج تصحيح كود قوائم الفصول
برنامج عمل قوائم الفصول

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

تفضل وشكراً  واى خدمة
وده بطريقة أخرى
 

انتبه من فضلك فهذا مخالف لمبادىء وقواعد المنتدى .. فهذه حقوق ملكية خاصة فقط بصاحب العمل .. فعليك بعمل اتصال مباشر به وطلب كلمة السر منه وشكراً لكم !!!

بما ان هذه المشكلة لا تواجهك الا فى العمل ومن مخزى الرسالة التى تظهر لك ان خاصية الأكواد بالإكسيل لديك مغلقة وغير مفعلة من قبل مسؤل الكمبيوتر لديك IT .. فلابد ان تطلب منه فتحها وجعلها متاحة للإستخدام لك وليس هناك حل نهائياً سوى ذلك وشكراً

2saad من فضلك استخدم خاصية البحث بالمنتدى قبل رفع المشاركة تجنباً لإهدار وقت الأساتذة فى موضوعات تـــم تناولها ومناقشتها بالمنتدى سابقاً
 
 

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

وعليكم السلام ..هل هذا ما تقصده ؟! ولكن كل هذا بمقابل مادى وليس ببلاش !!
https://superuser.com/questions/351494/show-excel-sheet-tab-in-≥-2-rows

وعليكم السلام..تفضل على الرغم انك لم تقم برفع ملف تصورى لما تريد مع وضع شكل النتائج المرجوة ,, حتى تتمكن الأساتذة من مساعدتك 
 

وبما انك لم تقم برفع الملف فسيتم الرد عليك أيضاً بدون ملف ... يمكنك مشاهدة هذا الفيديو
وهذا فيديو أخر
How to Create Barcodes in Excel - الطريقة الأسهل على الإطلاق لإنشاء الباركود في الإكسل

وعليكم السلام-انتبه من فضلك فلا يمكن مشاركة اى ملف اكسيل على جوجل طالما يحتوى على أكواد VBA وشكراً !!!

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

وعليكم السلام .. لا يوجد اى برنامج لذلك وان وجد يكون بمقابل مادى وأعتقد انه غير دقيق وليس مأكد لإستراجاع ما فقد !!!

وعليكم السلام-بما انك لم تقم برفع ملف ... فكان عليك استخدام خاصية البحث بالمنتدى قبل رفع مشاركتك . فبها طلبك , تفضل :
print listbox
وهذا أيضاً فيديو للشرح
وهذه مواقع لكاتب الأكواد
https://www.patreon.com/posts/47615393
http://vbawriter.com/vba/

وعليكم السلام-مبدئياً لا يمكن لأى أحد مساعدتك بدون رفع الملف وتوضيح المشكلة بكل دقة فلا يمكن العمل على التخمين ... ومن تالواضح من هذه الرسالة ان الكود لا يعمل عند وجود الخلايا المدمجة .. يجب ان تعود نفسك ان تبتعد قدر المستطاع عن عمل الخلايا المدمجة فهذه دائماً تقف عائقاً امام تنفيذ اى كود وشكرا

من فضلك اجعل التحية دائماً أول ما تكتب فى المشاركة ... السلام عليكم ,ثانياً لابد من رفع ملف مدعوم بشرح كافى عن المطلوب حتى تتمكن الأساتذة من مساعدتك وذلك تجنباً لإهدار أوقاتهم الثمينة .. فلا يمكن العمل على التخمين كما لا يمكن تقديم الحل أكثر من مرة , فربما يقوم احد بالإجابة عليك ولكن هذه الإجابة لا تتناسب مع طلبك فبالتالى قمت بإهدار المزيد من الوقت وتحتاج بالفعل إجابة أخرى!! وبما انك لم تقم برفع الملف فستكون الإجابة أيضاً بدون ملف
 

وعليكم السلام -طبعاً وبالتأكيد هذا مجهد ومتعب حتى لو كان الشخص محترف الإكسيل -أقترح عليك من الأفضل طبعاً عمل وفتح 12 صفحة بعدد شهور السنة ثم عمل صفحة أساسية للمدخلات اليومية ومنها يتم ترحيل كل مدخلات للشهر الذى يخصه وأعتقد ان هذا سيكون أفضل وأسهل بكثير وليس هناك داعى طبعاً لعمل صفحة لكل يوم لأنك بالتالى ستحتاج فتح أكثر من 360 صفحة بالملف مما سيجعل العمل على هذا الملف بطىء جداً وشكراً لكم-وذلك بإستخدام هذه المعادلة بجميع شيتات الشهور ... كما ان هناك صفحة تسمى Summary بها تجميع لكل شهر على حده
=IFERROR(INDEX(Input!$A$5:$I$1000,AGGREGATE(15,6,(ROW(Input!$B$1:$B$1000)/(Input!$H$5:$H$1000=MID(CELL("filename",$A$1),FIND("]",CELL("filename",$A$1),1)+1,LEN(CELL("filename",$A$1))-FIND("]",CELL("filename",$A$1),1)))),ROWS(January!$A$1:A1)),MATCH(January!A$5,Input!$A$5:$I$5,0)),"") جميع مبيعات السنة-بالمعادلات.xlsm

بسيطة وسهلة طبعاً غير بناءاً على الخلايا الموجود بالفعل البيانات بها وشكراً !!!!
بمعنى ستصبح المعادلة هكذا , طبعاً بعد اذن استاذنا الكبير ابراهيم الحداد له منا  كل الإحترام وبارك الله فىه
=IF(COUNTIF($B2:$L2,"دون المستوي")=0,"منقول للصف السادس ",IF(B2="دون المستوي",$B$1&" - "&IF(E2="دون المستوي",$E$1&" - "&IF(G2="دون المستوي",$G$1&" - "&IF(J2="دون المستوي",$J$1&" - "&IF(K2="دون المستوي",$K$1&" - "&IF(L2="دون المستوي",$L$1,""))))))) test1.xlsx

بسيطة جداً a.kawkab .. كل ما عليك تغيير Private Declare  Function بهذا الموديول ModuleRibbon الى Private Declare PtrSafe Function
Ahmed Saad 2017 .. المشكلة من عندك انت فالكود يعمل تمام وليس به أى مشكلة
The-Magic-Form.rar

بسيطة جداً a.kawkab .. كل ما عليك تغيير Private Declare  Function بهذا الموديول ModuleRibbon الى Private Declare PtrSafe Function
Ahmed Saad 2017 .. المشكلة من عندك انت فالكود يعمل تمام وليس به أى مشكلة
The-Magic-Form.rar

بسيطة جداً a.kawkab .. كل ما عليك تغيير Private Declare  Function بهذا الموديول ModuleRibbon الى Private Declare PtrSafe Function
Ahmed Saad 2017 .. المشكلة من عندك انت فالكود يعمل تمام وليس به أى مشكلة
The-Magic-Form.rar

أخى الكريم المعادلة عادية وليست مصفوفة أى معادلة بسيطة وخفيفة ولا ترهقك .. فبالتالى ليس هناك داعى لعمل كود لها وهذا غير مهم.. ولكن اذا كنت تريد الكود فيجب استخدام هذا وتطويعه لما تريد
Sub Ceiling() Range("B1") = Application.WorksheetFunction.Ceiling(Range("A1"), 1) End Sub ceiling 1.xlsm

أخى الكريم المعادلة عادية وليست مصفوفة أى معادلة بسيطة وخفيفة ولا ترهقك .. فبالتالى ليس هناك داعى لعمل كود لها وهذا غير مهم.. ولكن اذا كنت تريد الكود فيجب استخدام هذا وتطويعه لما تريد
Sub Ceiling() Range("B1") = Application.WorksheetFunction.Ceiling(Range("A1"), 1) End Sub ceiling 1.xlsm

اخى الكريم هذه هى المعادلة بالفعل الصحيحة فغير منطقى ان يصل بها الشهور الى 12 شهر لأنه سيتحول تلقائى الى السنة ونفس الحال بالنسبى لعدد الأيام فلا يصل أبداً الى 30 يوم لأنه سيتحول تلقائياً الى الشهر ... وشكراًُ 
=(YEAR(C3)-YEAR(B3))+(MONTH(C3)-MONTH(B3))/12+(DAY(C3)-DAY(B3))/365 تحليل1.xlsx