وائل احمد المصري قام بنشر سبتمبر 29, 2015 مشاركة قام بنشر سبتمبر 29, 2015 السلام عليكم ورحمة الله وبركاتة ارفقت ملف قمت بعمل فكرة به كانت قد طلبت مني في العمل والفكرة تقوم على عمل تنبية بعد مقارنة اليوم الحالي بتاريخ اخر فأذا تطابق الشرط الموجود بالخلية "ِA1" يتم عمل تنبية بعدد تلك الحالات يشبة الموجود في الفيس بوك ثم بالضغط على أيقونة التنبيهات يتم ترحيل البيانات لصفحة التنبيهات لعلها تفيد احد الزملاء والملف مفتوح للاستفادة والتطوير بمقابل طبعا" ان تذكروني بدعواتكم تنبيهات.rar 3 رابط هذا التعليق شارك More sharing options...
أبو محمد أشرف قام بنشر سبتمبر 30, 2015 مشاركة قام بنشر سبتمبر 30, 2015 شكرا لك وجزاك الله خيرا رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر سبتمبر 30, 2015 مشاركة قام بنشر سبتمبر 30, 2015 أخي الحبيب وائل عوداً حميداً وبارك الله فيك على الموضوع ممكن تشرح الملف بمزيد من التفصيل إذا توفر لديك الوقت .. وجزاكم الله خير الجزاء 1 رابط هذا التعليق شارك More sharing options...
أسامة البراوى قام بنشر سبتمبر 30, 2015 مشاركة قام بنشر سبتمبر 30, 2015 (معدل) السلام عليكم الفكرة جميله وتنفع فى جدولة الأعمال او اعياد الميلاد لكن فيها خطأ برمجى صغير فى السطر expd = Worksheets("Notifications").Range("A2") المفروض انه يقرا من الخلية A1 فى الشيت Main expd = Worksheets("Main").Range("A1") وكمان تبقى افضل لو حدد ادنى للتاريخ انه ما يكونش اقل من تاريخ اليوم لانى لاحظت انه جايب لى تنبيهات من سنة فاتت بتغيير السطر التالى If (.Cells(irow, 7) - MyDate) <= expd Then الى If (.Cells(irow, 7) - MyDate) <= expd And (.Cells(irow, 7) - MyDate) > -1 Then تنبيهات 1.rar تم تعديل سبتمبر 30, 2015 بواسطه أسامة البراوى 4 رابط هذا التعليق شارك More sharing options...
وائل احمد المصري قام بنشر سبتمبر 30, 2015 الكاتب مشاركة قام بنشر سبتمبر 30, 2015 شكرا لك وجزاك الله خيرا اخي أبو احمد بارك الله فيكم جميعا" أخي الحبيب وائل عوداً حميداً وبارك الله فيك على الموضوع ممكن تشرح الملف بمزيد من التفصيل إذا توفر لديك الوقت .. وجزاكم الله خير الجزاء اخي ياسر حاضر بس هل تقصد الفكرة بصفة عامة ام الاكواد السلام عليكم الفكرة جميله وتنفع فى جدولة الأعمال او اعياد الميلاد لكن فيها خطأ برمجى صغير فى السطر expd = Worksheets("Notifications").Range("A2") المفروض انه يقرا من الخلية A1 فى الشيت Main expd = Worksheets("Main").Range("A1") وكمان تبقى افضل لو حدد ادنى للتاريخ انه ما يكونش اقل من تاريخ اليوم لانى لاحظت انه جايب لى تنبيهات من سنة فاتت بتغيير السطر التالى If (.Cells(irow, 7) - MyDate) <= expd Then الى If (.Cells(irow, 7) - MyDate) <= expd And (.Cells(irow, 7) - MyDate) > -1 Then تنبيهات 1.rar اخي العزيز أسامة اغفرلي هذا الخطأ فبنية الملف الاصلي مختلفة وهي تعتمد على التنبية بصفة عامة ولا ينبغي ان تجتاز الفترة اكثر من 20 يوم فقط والا لاصبحت مشكلة وقمت بعمل نسخة على عجالة للفكرة نستفيد جميعا منها وبارك الله فيك في التصويب والاضافة لعلها تتطور اكثر بمشاركاتكم العطرة طبتم وتقبلوا تحياتي رابط هذا التعليق شارك More sharing options...
وائل احمد المصري قام بنشر سبتمبر 30, 2015 الكاتب مشاركة قام بنشر سبتمبر 30, 2015 أخي الحبيب وائل عوداً حميداً وبارك الله فيك على الموضوع ممكن تشرح الملف بمزيد من التفصيل إذا توفر لديك الوقت .. وجزاكم الله خير الجزاء اخي ياسر اعلم بأنك تريد الايضاح للاخوة فأنت من أساتذة هذا المنتدى وارجوا ان يفي بذلك الشرح المرفق ادناة الفكرة تقوم على انه في حالة وضع بيانات عملاء مثلا او موردين ......الخ ووضع تاريخ زيارة او استحقاق في تاريخ معين في شيت "Machines_Card" وقمنا بتحديد المدة المدة الواجب التنبية عليه والموجودة في الخلية "A1" في شيت "Main" فسيتم حساب عدد التنبيهات وفقا لععد الحالات المطابقة واظهارها في منطقة الجرس وبالضغط على ايقونة الجرس سيتم عمل لنسخ لتلك الحالات لشيت "Notifications" حتى يسهل طباعتها او متابعتها او ايا" كان المراد منها ارجوا ان اكون وفقت وفقنا الله واياكم 1 رابط هذا التعليق شارك More sharing options...
احمد السيد سليمان قام بنشر أكتوبر 1, 2015 مشاركة قام بنشر أكتوبر 1, 2015 بارك الله فيك على الموضوع رابط هذا التعليق شارك More sharing options...
الزباري قام بنشر أكتوبر 1, 2015 مشاركة قام بنشر أكتوبر 1, 2015 أكثر من رائع.. بارك الله فيك رابط هذا التعليق شارك More sharing options...
وائل احمد المصري قام بنشر أكتوبر 1, 2015 الكاتب مشاركة قام بنشر أكتوبر 1, 2015 أكثر من رائع.. بارك الله فيك وفيكم أخي :) بارك الله فيك على الموضوع وفيكي أخي الفاضل رابط هذا التعليق شارك More sharing options...
محمد حسن المحمد قام بنشر أكتوبر 1, 2015 مشاركة قام بنشر أكتوبر 1, 2015 السلام عليكم ورحمة الله وبركاتة ارفقت ملف قمت بعمل فكرة به كانت قد طلبت مني في العمل والفكرة تقوم على عمل تنبية بعد مقارنة اليوم الحالي بتاريخ اخر فأذا تطابق الشرط الموجود بالخلية "ِA1" يتم عمل تنبية بعدد تلك الحالات يشبة الموجود في الفيس بوك ثم بالضغط على أيقونة التنبيهات يتم ترحيل البيانات لصفحة التنبيهات لعلها تفيد احد الزملاء والملف مفتوح للاستفادة والتطوير بمقابل طبعا" ان تذكروني بدعواتكم السلام عليكم...بارك الله بهمة الشباب...إبداعات تفرزها العقول العربية....أبليت حسناً ..أخي وائل. جزاكم الله خيراً. رابط هذا التعليق شارك More sharing options...
وائل احمد المصري قام بنشر أكتوبر 1, 2015 الكاتب مشاركة قام بنشر أكتوبر 1, 2015 السلام عليكم ورحمة الله وبركاتة ارفقت ملف قمت بعمل فكرة به كانت قد طلبت مني في العمل والفكرة تقوم على عمل تنبية بعد مقارنة اليوم الحالي بتاريخ اخر فأذا تطابق الشرط الموجود بالخلية "ِA1" يتم عمل تنبية بعدد تلك الحالات يشبة الموجود في الفيس بوك ثم بالضغط على أيقونة التنبيهات يتم ترحيل البيانات لصفحة التنبيهات لعلها تفيد احد الزملاء والملف مفتوح للاستفادة والتطوير بمقابل طبعا" ان تذكروني بدعواتكم السلام عليكم...بارك الله بهمة الشباب...إبداعات تفرزها العقول العربية....أبليت حسناً ..أخي وائل. جزاكم الله خيراً. وبارك فيك اخي اشكرك على كلماتك ومرورك العطر رابط هذا التعليق شارك More sharing options...
أبوعيد قام بنشر أكتوبر 1, 2015 مشاركة قام بنشر أكتوبر 1, 2015 فكرة رائعة بارك الله فيك وهنا تطوير للفكرة وبالمرفق مزيد من الشرح الماكرو تم وضعه في حدث الصفحة change تنبيهات 2.rar 3 رابط هذا التعليق شارك More sharing options...
وائل احمد المصري قام بنشر أكتوبر 1, 2015 الكاتب مشاركة قام بنشر أكتوبر 1, 2015 فكرة رائعة بارك الله فيك وهنا تطوير للفكرة وبالمرفق مزيد من الشرح الماكرو تم وضعه في حدث الصفحة change تنبيهات 2.rar بارك الله فيك اخي :) رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.