وليد المصرى 1

اسف اخى هذا هو المرفق New Folder.rar

ارجو الرد للاهمية

السلام عليكم كيف الطريقة لجلب بيانات من قاعدة بيانات اكسيل الى ملف اكسيل علما ان الملف شير بين الموظفين هل هناك طريقة اشكركم هذا ملف لتوضيح طلبى New Folder.rar

السلام عليكم ورحمة الله \ ارجو توضيح شىء عندما ادخل للكود ارى هذا وهو ليس بالغة العربية فماذا افعل 'Option Compare Database Public ÇáÑÞã_ÑÞãÇð2, ÇáÑÞã_ßÊÇÈÉ2 Public Sub ÊÍæíá_ÇáÑÞã_ßÊÇÈÉ2() ÇáÑÞã_ÑÞãÇð2 = Round(ÇáÑÞã_ÑÞãÇð2, 2) Dim ÊÌÑÈÉ, ÑÞã_Ãæáí, ÞÑÇÁÉ_Ãæáì Dim ÇáÃÑÞÇã_ÈÚÏ_ÇáÝÇÕáÉ Dim ÑÞã_ÕÝÑí, ÇáÂÍÇÏ, ÇáÚÔÑÇÊ, ÇáãÆÇÊ, ÇáÃáæÝ, ÚÔÑÇÊ_ÇáÃáæÝ, ãÆÇÊ_ÇáÃáæÝ, ãáÇííä Dim ÇáÝÆÉ As String Const ÑíÇá = "ÑíÇá" ' ÇáÂÍÇÏ ' ÇáÔÑØ ÇáÊÇáí áÛÑÖ ÚÏã ÅÏÎÇá ÑÞã ÕÍíÍ ÚäÏ æÌæÏ ÑÞã æÇÍÏ ááåááÉ 'MsgBox ÇáÑÞã_ÑÞãÇð2 'MsgBox Fix(ÇáÑÞã_ÑÞãÇð2) * 100 'ÇáÃÑÞÇã_ÈÚÏ_ÇáÝÇÕáÉ = CInt((ÇáÑÞã_ÑÞãÇð2 - Fix(ÇáÑÞã_ÑÞãÇð2)) * 100) 'MsgBox ÇáÃÑÞÇã_ÈÚÏ_ÇáÝÇÕáÉ If Right([ÇáÑÞã_ÑÞãÇð2], 3) < 1 Then ÇáÃÑÞÇã_ÈÚÏ_ÇáÝÇÕáÉ = Right([ÇáÑÞã_ÑÞãÇð2], 3) Else ÇáÃÑÞÇã_ÈÚÏ_ÇáÝÇÕáÉ = Right([ÇáÑÞã_ÑÞãÇð2], 2) End If If ÇáÃÑÞÇã_ÈÚÏ_ÇáÝÇÕáÉ >= 1 Then ÇáÃÑÞÇã_ÈÚÏ_ÇáÝÇÕáÉ = 0 End If 'ÇáÔÑØ ÇáÊÇáí áÛÑÖ ÚÏã ÇáØÑÍ ÅÐÇ áã íæÌÏ ÃÑÞÇã ÈÚÏ ÇáÝÇÕáÉ If ÇáÃÑÞÇã_ÈÚÏ_ÇáÝÇÕáÉ < 1 Then ÇáÑÞã_ÑÞãÇð2 = ÇáÑÞã_ÑÞãÇð2 - ÇáÃÑÞÇã_ÈÚÏ_ÇáÝÇÕáÉ End If ÞÑÇÁÉ_Ãæáì = Left([ÇáÑÞã_ÑÞãÇð2], 1) ÑÞã_Ãæáí = Choose(ÞÑÇÁÉ_Ãæáì, "æÇÍÏ", "ÅËäÇä", "ËáÇËÉ", "ÃÑÈÚÉ", "ÎãÓÉ", "ÓÊÉ", "ÓÈÚÉ", "ËãÇäíÉ", "ÊÓÚÉ") ' ÑÞã æÇÍÏ If Len([ÇáÑÞã_ÑÞãÇð2]) = 1 Then ' ÊÚÏíá æÇÍÏ ÑíÇá [ÇáÑÞã_ßÊÇÈÉ2] = ÑÞã_Ãæáí

جزاكم الله الف خير اخوانى الافاضل

اذا امكن من الاخوة الاعضاء وخبراء الاكسيل حل هذا الملف المطلوب داخل الملف Jتتبع انتهاء الصلاحية.rar

اشكرك اخى الفاضل ولكن الملف لا يعمل معى اذا امكن يا اخى اشكرك

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

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

ارجو من استاذنا ابو حنين شرح كيفية تحويل الصورة الا اكسيل عمل اكثر من رائع اخى اشكرك

ارجو الحل للضرورة اشكركم

ارجو من الاخوة الاعضاء ان كان هناك فكرة او حل فى استخراج البيانات من قاعدة بيانات وطباعتها فى ملف pdf هل يوجد هذا ام لا انا لست بخير ولكن هناك ملفات pdf جاهزة هل يمكن التعديل عليها وادخل كود داخل ملف pdf ليستخرج بيانات من ملف اكسيل به بيانات ؟

السلام عليكم ورحمة الله وبركاتة ارجو المساعدة من اخواتى واحبائى فى الملف المرفق اريد كود لاظهار انتهاء صلاحية التواريخ يكون فى فورم او شيت جديد به الاسماء وتواريخ الصلاحية قبل الانتهاء بأسبوع Book1.rar

اشكرك استاذ طارق من فضلك اخر سؤال اقدر اجمع التقديرات التقدير (ضعيف متوسط جيد) اقصد على سبيل المثال كام مرة تكرار 4.4 وكام مرة تكرار 3.2 وهكذا ..... فى كل من التقدير (ضعيف متوسط جيد)

صباح الخير منتظر رد حضرتك

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

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

اولا انا اسف استاذ طارق لعدم انتبهى لقواعد المنتدى ثانيا انا لا اريد التنسيق الشرطى ولكن اريد تجميع درجات جيد وضعيف ومتوسط من اول خانة الملونة الازرق ( يمين خانة اسم الطالب ) ارجو ان ترجع الملف مرة اخرة اشكرك

السلام عليكم ورحمة الله وبركاتة ارجو من الاخواة الخبراء المساعدة المطلوب داخل الملف المرفق Book1 .rar

اشكركم جميعا اخواتى على هذا المجهود العظيم جزاكم الله خيرا

السلام عليكم ورحمة الله هل يوجد كود جمع فى خانة واحدة ( نفس الخانة ) اقصد ان يكون الجمع الى اذا وضعت رقم 10 فى خانة وبعدها وضعت رقم 30 فى نفس الخانة يعطينى المجموع40 وهكذا هل يوجد كود يقوم بهذا العمل ؟ اشكركم جميعا

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

السلام عليكم ورحمة الله وبركاتة اشكرك اخى الكريم على المجهود الاكثر من رائع وجزاك الله كل خير ولكن هل لي بمعرفة الباسوورد لإلغاء حماية المستند

جزاك الله خير اخى احمد

3s_sando اشكرك يا اخى منتظرك