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

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

قام بنشر

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

برفقه جزء من برنامجي وبه مشكلة اتعبتني ولم أجد لها حل . وهي باختصار :

في خانة التاريخ قمت بجعلها ( نص ) وقمت بتغيير قناع الإدخال لكي أستطيع ادخال التاريخ الهجري وهذا بالنسبة لي ضروري جدا . ولكني أريد المساعدة في عمل زر يعرض لي التقرير بالتاريخ الهجري بمعنى أوضح أريد مثلا عرض جميع الذين ادخلتهم في 1434/01/01 فقط . وهكذا .

اتمنى مساعدتي بارك الله فيكم .

B1.rar

قام بنشر

للأسف اخي أبو خليل . التقرير مايفتح معي ولا حتى الإستعلام . ياليت تتأكد من الملف الله يبارك فيك .

قام بنشر

كل شيء سليم

تم تحويل الحقل النصي الى تاريخ

بالاستعانة بالوحدة النمطية

انظر الاستعلام وانظر الحقل mydate

عند النقر على الزر ادخل تاريخ البداية وتاريخ النهاية

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

عزيزي أبو خليل بارك الله فيك . انا ماعندي مشكلة في التاريخ فهو يعمل عندي بشكل جيد ولكن المشكلة في طريقة عرض التقرير أريده بشكل شهري بمعنى أوضح أريد مثلا عرض جميع الذين ادخلتهم في 1434/01/01 فقط . وهكذا .

وعند تشغيل الاستعلام تظهر الصورة التالية :

13584203901.jpgالعاب بنات

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

هذه هي الوحدة النمطية التي لم يتعرف عليها جهازك

وهي تعمل عندي على اكمل وجه


Public Function YMDToDate(varDate As Variant) As Variant

    Dim strDMY As String

     strDMY = Mid(varDate, 5, 2) & "/" & Left(varDate, 4)

    If Len(varDate) = 8 Then strDMY = Mid(varDate, 7, 2) & "/" & strDMY

    YMDToDate = Null

    If IsDate(strDMY) Then YMDToDate = CDate(strDMY)

End Function

وعلى كل حال اليك طريقة اخرى للتحويل باستخدام تجزئة النص ثم اعادة تنسيقه كتاريخ

تحويل نص الى تاريخ بالدالة فقط.rar

قام بنشر

معليش يابو خليل الله لا يحرمك الأجر . مثالك رائع واقتربنا من الحل لأني اريد من تاريخ إلى تاريخ يعني أريده يعرض التقرير لجميع المدخلات لشهر واحد من 1 / 12 / 1433 حتى 30 / 12 / 1433 فهل هذا ممكن ؟

اكرر اسفي على تعبك

قام بنشر

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

للأسف والله ماضبطت معي . مرة يعطيني التواريخ صحيحة ومرة لا علما بأني متأكد من كتابة التواريخ ؟

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information