اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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

قام بنشر

السلام عليكم 

اريد تحويل تاريخ الى عدد مثل دالة datevalue في الاكسل

ما اسم الدالة التي تقوم بنفس العمل على الاكسس 

قام بنشر

لدي مشكل في الفورمات 

عندما استعملها في الفلترة لا تعمل بشكل صحيح 

لدي دالة بهاذا الشكل

dusm("عمود";''جدول";"date1<=date and date<date2 ")

المشكلة هي عندما يكون التاريخ بين سنتين مختلفتين مثلا

date1=01/12/2021

date=02/12/2021

date2=01/01/2022

البرنامج يفهمها بهاذا الشكل date1< date <date2

 

 

 

 

قام بنشر

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

بالاضافة الى ما تفضل به الاخوة الكرام ولهم الشكر

اولاً لديك مشكلة انك تستخدم حقل باسم date وهذا الاسم محجوز لتاريخ اليوم  الا اذا كنت تسخدمه لعرض اليوم الحالي

ثانياً جرب الكود التالي

dusm("عمود";"جدول";"Format([date1];"yyyy/mm/dd")<=date and date<Format([date2];"yyyy/mm/dd")")

تحياتي

قام بنشر
  في 9‏/8‏/2021 at 22:11, Eng.Qassim said:

هل تقصد جمع الحقل بشرط التواريخ

جرب المرفق

Calc_Q.accdb 608 kB · 2 downloads

Expand  

نعم لكن بدالة dsum

  في 10‏/8‏/2021 at 00:36, محمد أبوعبدالله said:

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

بالاضافة الى ما تفضل به الاخوة الكرام ولهم الشكر

اولاً لديك مشكلة انك تستخدم حقل باسم date وهذا الاسم محجوز لتاريخ اليوم  الا اذا كنت تسخدمه لعرض اليوم الحالي

ثانياً جرب الكود التالي

dusm("عمود";"جدول";"Format([date1];"yyyy/mm/dd")<=date and date<Format([date2];"yyyy/mm/dd")")

تحياتي

Expand  

date وضعته كمثال فقط 

والكود نفسه الذي استعملته في برنامجي ولم اجد حلا لمشكل اختلاف السنوات

قام بنشر

تفضل هذه الدالة التي انقذني بها اخي @jjafferr

Function DateFormat(varDate As Variant) As String

    If IsDate(varDate) Then
        If DateValue(varDate) = varDate Then
            DateFormat = Format$(varDate, "\#mm\/dd\/yyyy\#")
        Else
            DateFormat = Format$(varDate, "\#mm\/dd\/yyyy hh\:nn\:ss\#")
        End If
    End If
End Function

للاستدعاء

DateFormat([Date1])

 

قام بنشر
  في 9‏/8‏/2021 at 21:17, AliAli47 said:

البرنامج يفهمها بهاذا الشكل date1< date <date2

 

Expand  

وهل هذا الفهم خطأ؟

أليس 1 ديسمبر 2021 اصغر من 2 ديسمبر 2021 وهما معا أصغر من 1 يناير 2022

؟؟

  • Thanks 1
قام بنشر
  في 10‏/8‏/2021 at 10:46, د.كاف يار said:

تفضل هذه الدالة التي انقذني بها اخي @jjafferr

Function DateFormat(varDate As Variant) As String

    If IsDate(varDate) Then
        If DateValue(varDate) = varDate Then
            DateFormat = Format$(varDate, "\#mm\/dd\/yyyy\#")
        Else
            DateFormat = Format$(varDate, "\#mm\/dd\/yyyy hh\:nn\:ss\#")
        End If
    End If
End Function

للاستدعاء

DateFormat([Date1])

 

Expand  

لا استطيع استعمال الدوال لاني استعمل الكويري وبها الكثير من العمليات 

  في 10‏/8‏/2021 at 10:48, أ / محمد صالح said:

وهل هذا الفهم خطأ؟

أليس 1 ديسمبر 2021 اصغر من 2 ديسمبر 2021 وهما معا أصغر من 1 يناير 2022

؟؟

Expand  

هناك اخطأ اسف 

البرنامج يفهم 2 ديسمبر 2021 اكبر من 1يناير 2022

المشكلة عند اختلاف السنوات فقط

قام بنشر
  في 10‏/8‏/2021 at 11:09, AliAli47 said:

البرنامج يفهم 2 ديسمبر 2021 اكبر من 1يناير 2022

 

Expand  

ليس منطقيا ابدا 

الكلام النظري في هذه الحالة لا يفيد

يفضل إرفاق الجزء الخاص بالمشكلة من ملفك

افضل من التخمينات وعدم الوضوح 

  • Like 1
قام بنشر
  في 10‏/8‏/2021 at 11:09, AliAli47 said:

لا استطيع استعمال الدوال لاني استعمل الكويري وبها الكثير من العمليات 

  في 10‏/8‏/2021 at 10:48, أ / محمد صالح said:
Expand  

لا يهم جرب استخدم المرفق و ستجد النتيجة

 

NewData.mdbFetching info...

  • Like 2
قام بنشر
  في 10‏/8‏/2021 at 11:20, أ / محمد صالح said:

ليس منطقيا ابدا 

الكلام النظري في هذه الحالة لا يفيد

يفضل إرفاق الجزء الخاص بالمشكلة من ملفك

افضل من التخمينات وعدم الوضوح 

Expand  

نعم كما ذكرت هذا غير منطقي المشكلة حدثت في الكويري فقط 

جربتها في الجدول اشتغلت بشكل عادي 

سأحاول ارفاق مثال لكي تضح الصورة

  • Like 1
قام بنشر
  في 10‏/8‏/2021 at 10:46, د.كاف يار said:

تفضل هذه الدالة التي انقذني بها اخي @jjafferr

Function DateFormat(varDate As Variant) As String

    If IsDate(varDate) Then
        If DateValue(varDate) = varDate Then
            DateFormat = Format$(varDate, "\#mm\/dd\/yyyy\#")
        Else
            DateFormat = Format$(varDate, "\#mm\/dd\/yyyy hh\:nn\:ss\#")
        End If
    End If
End Function

للاستدعاء

DateFormat([Date1])

 

Expand  

السلام عليكم استاذي @د.كاف يارمالذي سنستفيده من هذه الدالة فهي اعادت لنا التاريخ بين هاشتاك؟ هل ستعتبر لرقم في هذه الحالة

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