اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

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

فورم للتقويم الميلادي والهجري لادراج التاريخ في الخلية النشطة

يعمل على اكسل 2003 و 2007
حسب المرفق
و يعمل على 2010
حسب بشارة الاخ رجب
==================================
تستطيع نقل الفورم الى اي ملف
من نافذة الاكواد اسحب الفورم الى ملفك

واستخدم الكود التالي لاظهار الفورم
 

Sub kh_ShowFormCalendar()
FormCalendar.Show
End Sub

====================================


ودمتم في حفظ الله

ميلادي هجري1.rar

  • Like 1
قام بنشر

الأخ الفاضل والمبدع الأستاذ / عبد الله باقشير

أفضل تحية على هذا الإبداع والتميز

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

الملف يعمل تمام على اكسل 2010

380245183.gif

قام بنشر

الأخ الفاضل والمبدع الأستاذ / عبد الله باقشير

أفضل تحية على هذا الإبداع والتميز

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

الملف يعمل تمام على اكسل 2010

380245183.gif

بشرك الله بالخير

في الدنيا والآخرة

و جزاك خيرا وبارك فيك

تقبل تحياتي وشكري

قام بنشر

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

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

لان هذا الزر بعمل للخلية النشطة

والا سيعمل خطا

تقبل تحياتي وشكري

  • 2 weeks later...
قام بنشر

السلام عليكم

الاستاذ القدير خبور خير حفظك الله ورعاك

تقويم ولااروع جزاك الله خير

ملاحظة بسيطة في حال اختيار الهجري واستعراض الاشهر يظهر مسمى شهر محرم في BoxMonth فقط

تقبل مروري

قام بنشر

السلام عليكم

الاستاذ القدير خبور خير حفظك الله ورعاك

تقويم ولااروع جزاك الله خير

ملاحظة بسيطة في حال اختيار الهجري واستعراض الاشهر يظهر مسمى شهر محرم في BoxMonth فقط

تقبل مروري

اولا

جزاك الله خيرا واثابك بدعائك واعطاك بمثله اضعاف مضاعفة

ام بخصوص ملاحظتك

اي اوفيس تستخدم 2010 ؟

بالنسبة لاوفيس 2003 و 2007

عندي لا توجد هذه المشكلة بتاتا

اما اوفيس 2010

لم اتشرف به بعد

تقبل تحياتي وشكري

قام بنشر

بارك الله لك أخي عبد الله

وإذا سمحت لي بهذه الإضافة

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

Private Sub UserForm_Initialize()

    Me.StartUpPosition = 0

    Me.Top = Application.Top + ((Application.Height - Me.Height) / 2)

    Me.Left = Application.Left + ((Application.Width - Me.Width) / 2)

End Sub

قام بنشر

بارك الله لك أخي عبد الله

وإذا سمحت لي بهذه الإضافة

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

Private Sub UserForm_Initialize()

Me.StartUpPosition = 0

Me.Top = Application.Top + ((Application.Height - Me.Height) / 2)

Me.Left = Application.Left + ((Application.Width - Me.Width) / 2)

End Sub

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

تقبل تحياتي وشكري

  • Like 2
قام بنشر

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

كنت ابحث عن هذا البرنامج ياليت تشرحوا الطريقه لنقله الى ملفي

من نافذة الفيجوال بيسك

اسحب الفورم الى ملفك

لنفرض ان ملفك Book1

شاهد المرفق و لاتنسى الدعاء للاخ يحياوي

قام بنشر

السلام عليكم

استخدم اوفيس 2010

ملاحظتك سليمة استاذ عبدالله

جربت الملف على جهاز به 2007 عملت القائمة كما لابد ان تكون

جزاك الله خير

تقبل تحياتي وشكري

قام بنشر (معدل)

الاخ عبدالله باقشير

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

تسلم يابن العم

تم تعديل بواسطه ابوعمر75
قام بنشر

السلام عليكم

استخدم اوفيس 2010

ملاحظتك سليمة استاذ عبدالله

جربت الملف على جهاز به 2007 عملت القائمة كما لابد ان تكون

جزاك الله خير

تقبل تحياتي وشكري

اخي ابو انصار ----حفظه الله

انا اظنه من فورمات التاريخ

حاول تغير الجزئية هذه

في الكود kh_Start

.AddItem Format(DateValue("1/" & iii), "mmmm")
الى
.AddItem Format(DateValue(iii & "/01"), "mmmm")

اخبرنا بالنتيجة

في التقويمين الميلادي والهجري في اوفيس 2010

انا في انتظارك

قام بنشر

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

في المرفق2003

تقويم ميلادي يفتح من خلال فورم

ويضع النتيجة في التاكست النشط

فتح فورم التاريخ من فورم اخر.rar

قام بنشر

السلام عليكم

الاستاذ الحبيب خبور خير حفظك الله

الملف يعمل 100%

اتضحت المشكلة عندي من الجهاز

لاني جربت في جهاز اخر به 2010 غير السابق

وعمل بكفائه

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

تقبل تحياتي وشكري

زائر
هذا الموضوع مغلق.
×
×
  • اضف...

Important Information