جمال الفار قام بنشر نوفمبر 12, 2011 مشاركة قام بنشر نوفمبر 12, 2011 بسم الله الرحمن الرحيم السلام عليكم ورحمة اله وبركاته لقد قمت بعمل بسيط جدا ارجو ان ينال استحسانكم وقبولكم وهو عبارة عن ملف قمت بعمله ليسهل على السائل حيث وجدت السؤال فى هذا الموضوع كثير وهو حساب السن ففكرت فى تجميع اشهر المعادلات والاكواد عن حساب السن ورفعها ليستفيد منها السائل وهى اهداء الى اخوانى الاعزاء فى اوفيسنا لا تنسونا من دعائكم ملحوظة لابد من تنخفيض الماكرو من قائمة ادوات ثم ماكرو ثم الامان ثم منخفض واذا كانت الاوفيس انجليزى فسندخل tools -----macro ------security---low كلمة المرور 146 ELFAR2.rar 1 رابط هذا التعليق شارك More sharing options...
عبدالله المجرب قام بنشر نوفمبر 12, 2011 مشاركة قام بنشر نوفمبر 12, 2011 السلام عليكم ملف تحفة تسلم يدك اخي جمال على هذا الملف الروعة بصراحة هداياك قيمة شكراً لك رابط هذا التعليق شارك More sharing options...
الزير قام بنشر نوفمبر 12, 2011 مشاركة قام بنشر نوفمبر 12, 2011 أحسنت أستاذ جمال الفأر على هذا الملف القيم شكرا لك تقبل مروري أبووائل رابط هذا التعليق شارك More sharing options...
جمال الفار قام بنشر نوفمبر 12, 2011 الكاتب مشاركة قام بنشر نوفمبر 12, 2011 السلام عليكم ملف تحفة تسلم يدك اخي جمال على هذا الملف الروعة بصراحة هداياك قيمة شكراً لك توقعت اخى المايسترو /عبدالله المجرب ان تكون اول من يرد على لانك دائما سباق بالوجب والعطاء وهذا الملف لا يساوى شى بجانب تحفك وابداعاتك جزاك الله خيرا اخى المايسترو/ عبدالله المجرب :signthankspin: رابط هذا التعليق شارك More sharing options...
عبدالله المجرب قام بنشر نوفمبر 12, 2011 مشاركة قام بنشر نوفمبر 12, 2011 تم تثبيت الموضوع لعموم الفائدة رابط هذا التعليق شارك More sharing options...
هشام شلبى قام بنشر نوفمبر 12, 2011 مشاركة قام بنشر نوفمبر 12, 2011 السلام عليكم ======= تجميعة هايلة لايمكن معها السؤال ثانيا ودليل على ان المنتدى مليان متفجرات ويحتاج الى search شكرا اخى جمال واتوقع منك فى التجميعة المقبلة القوائم المنسدلة وكيفية جلب البيانات بواسطتها او بواسطة قوائم التحقق من الصحة Validation LIST شكرا ابو احمد على التثبيت رابط هذا التعليق شارك More sharing options...
edkawy قام بنشر نوفمبر 12, 2011 مشاركة قام بنشر نوفمبر 12, 2011 جزاك الله خير استاذ جمال وجعلة الله فى ميزان حسناتك محمد سعد رابط هذا التعليق شارك More sharing options...
mhrrd قام بنشر نوفمبر 12, 2011 مشاركة قام بنشر نوفمبر 12, 2011 ودليل على ان المنتدى مليان متفجرات ويحتاج الى search لالا يا اخي عمليه البحث ليست على مايرام في هذا المنتدى الرائع رابط هذا التعليق شارك More sharing options...
جمال الفار قام بنشر نوفمبر 12, 2011 الكاتب مشاركة قام بنشر نوفمبر 12, 2011 أحسنت أستاذ جمال الفأر على هذا الملف القيم شكرا لك تقبل مروري أبووائل اخى العزيز الغالى ابو وائل جزيت خيرا على الكلام النابع من القلب وجزاك الله خيرا على المرو الطيب رابط هذا التعليق شارك More sharing options...
جمال الفار قام بنشر نوفمبر 12, 2011 الكاتب مشاركة قام بنشر نوفمبر 12, 2011 تم تثبيت الموضوع لعموم الفائدة اخى المايسترو /عبدالله المجرب لفته جميلة من شخص اجمل بارك الله فيك وسدد خطاك رابط هذا التعليق شارك More sharing options...
دغيدى قام بنشر نوفمبر 12, 2011 مشاركة قام بنشر نوفمبر 12, 2011 أخى الفاضل / جمال الفار ذوق .. فن .. علم .. خلق .. هدف .. رائع رابط هذا التعليق شارك More sharing options...
الجزيرة قام بنشر نوفمبر 12, 2011 مشاركة قام بنشر نوفمبر 12, 2011 رائع بروعتك :) رابط هذا التعليق شارك More sharing options...
ابو الآء قام بنشر نوفمبر 12, 2011 مشاركة قام بنشر نوفمبر 12, 2011 اخى الحبيب جمال بارك الله فيك عمل متميز من انسان متميز مبدع بحق نتظر التجميعة التالية ولتكن سلسلة تعليمية ومرجعية نحتفظ بها للرجوع اليها وقت الحاجة رابط هذا التعليق شارك More sharing options...
احمد غانم قام بنشر نوفمبر 12, 2011 مشاركة قام بنشر نوفمبر 12, 2011 اخ جمال ......كل الجمال :fff: رابط هذا التعليق شارك More sharing options...
naderwatfa قام بنشر نوفمبر 13, 2011 مشاركة قام بنشر نوفمبر 13, 2011 أخي جمال توقعت قبل أن أفتح الملف أن يكون كاملاً و كانت توقعاتي في محلها بارك الله جهدك الرائع و أثابك به خير الثواب رابط هذا التعليق شارك More sharing options...
جمال الفار قام بنشر نوفمبر 13, 2011 الكاتب مشاركة قام بنشر نوفمبر 13, 2011 السلام عليكم ======= تجميعة هايلة لايمكن معها السؤال ثانيا ودليل على ان المنتدى مليان متفجرات ويحتاج الى search شكرا اخى جمال واتوقع منك فى التجميعة المقبلة القوائم المنسدلة وكيفية جلب البيانات بواسطتها او بواسطة قوائم التحقق من الصحة Validation LIST شكرا ابو احمد على التثبيت اخى الستاذ العلامة الاستاذ الخلوق هشام شلبى وجودك فى الموضوع اسعدنى وكللامك اخجلنى جزيت خيرا وانشاء الله فى القرريب العاجل ساقوم بعمل الذى توقعته منى رابط هذا التعليق شارك More sharing options...
جمال الفار قام بنشر نوفمبر 13, 2011 الكاتب مشاركة قام بنشر نوفمبر 13, 2011 جزاك الله خير استاذ جمال وجعلة الله فى ميزان حسناتك محمد سعد اخى فى الله محمد سعد جزاك الله خيرا على الدعوة الطيبة وجزاك الله خيرا على مرورك الطيب بوركت وبورك مسعاك رابط هذا التعليق شارك More sharing options...
أ / محمد صالح قام بنشر نوفمبر 13, 2011 مشاركة قام بنشر نوفمبر 13, 2011 ما شاء الله تجميعة رائعة أخي جمال وفقك الله وأضيف لابداعات الإخوة دالة بسيطة للفرق بين تاريخين بالطريقة المتبعة عندنا في مصر (وبها بعض الاختلاف عن datedif الموجودة في الإكسل) حيث يتم حساب السن عندنا بطرح أيام التاريخ الأحدث - أيام التاريخ الأقدم وإذا كان الناتج بالسالب يتم استلاف شهر (30 يوم كقاعدة ثابتة) ونفس الكلام مع الشهور مع استلاف 12 شهر في حالة شهور التاريخ الأحدث أقل من شهور التاريخ القديم والناتج مجمع كله في خلية واحدة Function date_diff(oldd As Date, newd As Date) As String Dim years, months, days As Integer years = Year(newd) - Year(oldd) If Month(newd) < Month(oldd) Then years = years - 1 months = (Month(newd) + 12) - Month(oldd) Else months = Month(newd) - Month(oldd) End If If Day(newd) < Day(oldd) Then months = months - 1 days = (Day(newd) + 30) - Day(oldd) Else days = Day(newd) - Day(oldd) End If date_diff = Format(years, "00") & " عام و " & Format(months, "00") & " شهر و " & Format(days, "00") & " يوم" End Function بارك الله في كل من ساهم في هذا الموضوع 1 رابط هذا التعليق شارك More sharing options...
saad abed قام بنشر نوفمبر 13, 2011 مشاركة قام بنشر نوفمبر 13, 2011 استاذ جمال الفار اعمالك قيمة زادك الله من العلم ونفع بك تحياتى سعد عابد رابط هذا التعليق شارك More sharing options...
محمد يحياوي قام بنشر نوفمبر 13, 2011 مشاركة قام بنشر نوفمبر 13, 2011 الاخ الحبيب "جمال الفار" عمل مميز و جهد عظيم بارك الله فيك رابط هذا التعليق شارك More sharing options...
جمال الفار قام بنشر نوفمبر 13, 2011 الكاتب مشاركة قام بنشر نوفمبر 13, 2011 أخى الفاضل / جمال الفار ذوق .. فن .. علم .. خلق .. هدف .. رائع الاخ اطيب والحبيب المبدع/ العميد دغيدى كلامكم فيه تهذيب ورقة المشاعر وسمو النفس وطهارة القلب وصدق الموقف وهكذا عهدناك وتعودنا عليك اخيك الاصغر /جمال الفار رابط هذا التعليق شارك More sharing options...
جمال الفار قام بنشر نوفمبر 13, 2011 الكاتب مشاركة قام بنشر نوفمبر 13, 2011 رائع بروعتك :) اخى قى الله الجزيرة فبك اروع الخصال ورقة المشاعر فانت رائع بمعنى كل هذه الكلمة لمرورك الطيب الذى اسعدنى رابط هذا التعليق شارك More sharing options...
جمال الفار قام بنشر نوفمبر 13, 2011 الكاتب مشاركة قام بنشر نوفمبر 13, 2011 اخى الحبيب جمال بارك الله فيك عمل متميز من انسان متميز مبدع بحق نتظر التجميعة التالية ولتكن سلسلة تعليمية ومرجعية نحتفظ بها للرجوع اليها وقت الحاجة اخى الحبيب الرقيق /ابو الاء كلمات رقيقة من انسان حساس ومبدع ومتالق جزيت خيرا حبيبى وصديقى ابو الاء جزالك الله خيرا فى الدنيا والاخرة رابط هذا التعليق شارك More sharing options...
جمال الفار قام بنشر نوفمبر 13, 2011 الكاتب مشاركة قام بنشر نوفمبر 13, 2011 ما شاء الله تجميعة رائعة أخي جمال وفقك الله وأضيف لابداعات الإخوة دالة بسيطة للفرق بين تاريخين بالطريقة المتبعة عندنا في مصر (وبها بعض الاختلاف عن datedif الموجودة في الإكسل) حيث يتم حساب السن عندنا بطرح أيام التاريخ الأحدث - أيام التاريخ الأقدم وإذا كان الناتج بالسالب يتم استلاف شهر (30 يوم كقاعدة ثابتة) ونفس الكلام مع الشهور مع استلاف 12 شهر في حالة شهور التاريخ الأحدث أقل من شهور التاريخ القديم والناتج مجمع كله في خلية واحدة Function date_diff(oldd As Date, newd As Date) As String Dim years, months, days As Integer years = Year(newd) - Year(oldd) If Month(newd) < Month(oldd) Then years = years - 1 months = (Month(newd) + 12) - Month(oldd) Else months = Month(newd) - Month(oldd) End If If Day(newd) < Day(oldd) Then months = months - 1 days = (Day(newd) + 30) - Day(oldd) Else days = Day(newd) - Day(oldd) End If date_diff = Format(years, "00") & " عام و " & Format(months, "00") & " شهر و " & Format(days, "00") & " يوم" End Function بارك الله في كل من ساهم في هذا الموضوع اخى فى الله / محمد صالح اسعدنى تواجدك فى الموضوع ولا استطيع ان اقول الا جزاك الله خيرا رابط هذا التعليق شارك More sharing options...
جمال الفار قام بنشر نوفمبر 13, 2011 الكاتب مشاركة قام بنشر نوفمبر 13, 2011 استاذ جمال الفار اعمالك قيمة زادك الله من العلم ونفع بك تحياتى سعد عابد اخى الحبيب سعد عابد كنت هزعل لول لم ارى تشجيعكم المعهود زادنا الله من علمه وقوى صداقتنا وجمع شمل اسرتنا اوفيسنا ولا تنسى اننا هنا نكمل بعضنا البعض رابط هذا التعليق شارك More sharing options...
الردود الموصى بها