د.كاف يار

تفضل

s.zip

تفضل ضع هذا الكود في حدث الحالي

Dim ctl As Control
For Each ctl In Me.Controls
    If TypeName(ctl) = "TextBox" Then
        If IsNull(ctl) Or ctl = "" Then
            Form.Controls(ctl.Name).Visible = False
        End If
    End If
Next ctl

تفضل هذا التعديل

النقر المزدوج على حقل الكود لعرض القائمة

ورشة 1 - Copy.zip

في ٢٥‏/١١‏/٢٠٢١ at 22:37, User user said:

اشكرك على تعبك @د.كاف يار
من فضلك لو المستخدم له فترة راحه كيف نحسب الفرق بين الحضور والانصراف والراحه والحضور مره اخر والانصراف 
مثلا لدينا موظف هيحضر الساعه 8 ص الى 2 م  وهياخد راحه من 2 الى 4م وهيحضر من 4 م وهينصرف 8 م 
ارجوا ان تكون وضح المقصود 

اخوي افتح سؤال جديد و ارفق فيه مثال لكي يتم التعديل عليه

شكرا لك

عند الربط مع الجدول لم تقم بإختيار المفتاح الأساسي

لهذا السبب لن يستطيع الاكسس تنفيذ الأمر

قم بإعادة الربط و اختيار المفتاح الأساسي كما في الصورة و ستجد ان الجداول ستتجاوب معك من ناحية الاضافة و التعديل و الحذف

في ١٥‏/١١‏/٢٠٢١ at 22:50, abouelhassan said:

عند الدخول الى الصفحة الرئيسية للاستدعاء وحتى بكامل البيانات لم تستدعى البيانات

 

صحيح تم حل المشكلة

في ١٥‏/١١‏/٢٠٢١ at 22:50, abouelhassan said:

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

 

لم افهم المقصود

في ١٥‏/١١‏/٢٠٢١ at 22:50, abouelhassan said:

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

 

نعم صحيح و السبب لكي يكون لك مطلق الحرية في تصميم الملف

تفضل التعديل

الدائن و المدين.zip

تفضل هذا التقرير كما بالصورة

&&ساعات (1).zip

تفضل هذا التعديل

&&ساعات (1).accdb

تفضل التعديل

sendemail.zip

تفضل هذا التعديل

2222.zip

تفضل هذا التعديل 

بكود واحد فقط ...

- لن يستطيع المستخدم الإدخال الا بعد اختيار نوع الفاتورة

- جميع الحقول متاحة لكن لن يستطيع المستخدم ادخال البيانات الا بعد اختيار نوع الفاتورة

امكانية التسجيل.accdb

تفضل التعديل

Database1.accdb

يحب اضافة مكتبةزالاكسس

تفضل هذا التعديل

Database1.accdb

فقط قم بتغيير اسماء الجداول المرتبطة بقاعدة البيانات على السيرفر

تكون الاسماء بهذا الشكل

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

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

تفضل التعديل

DST.zip

حمل الاوفيس 2016 و انصحك تحمله من اكاديمية سيجما راح تحصلها مفعلة و كاملة

تفضل هذا التعديل

remain.accdb

طيب جرب هذا

تصدير اكسل.zip

هل المشكلة في نفس الملف او بعد نقل العمل الى الملف الاصلي ؟

اضف المكتبة

15 دقائق مضت, مصطفى الفيومى said:

وهل يتم التصدير من خلال التقرير 

 

التقرير لا علاقة له بالتصدير فقط جدول البيانات من خلال الكود

تفضل هذا التعديل بدون التقييد بتصميم الأكسل

و على نفس التصميم

تصدير اكسل.zip

تفضل التعديل

تصدير اكسل.zip

التصدير من داخل التقرير

تفضل هذا التعديل

ex_01.accdb

في حدث بعد التحديث ضع التالي

With [Text1]
    If .Text = "Positive" Or StrText1 = "Positive" Then
        .FontBold = True
    End If
End With