kkhalifa1960

أخي @fuadco اذا كان هذا طلبك اضغط على افضل اجابة .ووافني بالرد .

تفضل أخي @fuadco حسب مافهمت .ووافني بالرد . test4-1.rar

تفضل أخي @عمار العبيدي حسب مافهمت .جرب المرفق ووافني بالرد . Database1-2.rar

تفضل استاذ @شامل2 . لجعل التاريخ في نموذج فرعي يحتوي على مبيعات للمواد مفهرسًا بشكل تصاعدي عند فتح النموذج الرئيسي، يمكنك اتباع الخطوات التالية: إنشاء حقل التاريخ في الجدول الفرعي: تأكد من أن الجدول الفرعي يحتوي على حقل تاريخ (مثلاً "تاريخ المبيعات"). ترتيب البيانات في الاستعلام: يمكنك ترتيب البيانات في الاستعلام الذي يمد النموذج الفرعي بمبيعات المواد. لتكون النتائج مرتبة بشكل تصاعدي حسب التاريخ، قم بتعديل الاستعلام المستخدم في النموذج الفرعي ليكون ترتيبه حسب الحقل "تاريخ المبيعات" بشكل تصاعدي. يمكن ذلك عبر تحديد "ترتيب حسب" في استعلام البيانات. إضافة ترتيب إلى النموذج الفرعي: افتح النموذج الفرعي، وانتقل إلى خصائص النموذج. في خاصية "البيانات"، تأكد من أن الاستعلام الذي يجلب البيانات يحتوي على ترتيب تصاعدي حسب تاريخ المبيعات. تحديث البيانات عند فتح النموذج الرئيسي: لاجبار النموذج الفرعي على إعادة تحميل البيانات وترتيبها كلما تم فتح النموذج الرئيسي، يمكنك إضافة كود في الحدث On Open للنموذج الرئيسي لتحديث النموذج الفرعي. في هذا الكود، يمكن استخدام تعليمة VBA التالية لتحديث البيانات في النموذج الفرعي Private Sub Form_Open(Cancel As Integer) Me![اسم النموذج الفرعي].Requery End Sub

شكراً أستاذي @Eng.Qassim .

تفضل استاذ @بوكفوس عبدالسلام حاولت اعمل على نموذجك ولم أفلح فعملت طلبك بالمرفق. ووافني بالرد . DDComboTest.rar

وبطريقة أخرى . تفضلوا . المرفق به نموذجان النموذج الأول هي الطريقة السابقة والنموذج الثاني به الطريقة الجديدة . Chose(small-large) and Save Icon From Shell32.Dll.rar

تفضل استاذ @بوكفوس عبدالسلام حسب مافهمت . ووافني بالرد . Private Sub CommandButton_Click() With Me.ComboBox .Top = Me.CommandButton.Top + Me.CommandButton.Height .Visible = True .SetFocus .Dropdown End With End Sub 'ComboBox : اسم القائمة المنسدلة لديك 'CommandButton :اسم الزر لديك

تفضل استاذنا @ابوخليل حسب مافهمت حفظ الصورة حسب الاختيار . Chose and Save Icon From Shell32.Dll.rar

أستاذنا @ابوخليل . أما عن استخراج الايقونة حسب الحجم . لاحظ الأيكونات المستخرجة كلها حجمها (766bits) . أستاذ @Foksh وأستاذ @Moosak أنا أعمل على (windows 10 32-bit) و أوفيس (10) أيضاً . اخواني أشكركم جميعاً .

تكتب بنهاية كود البحث . Me.ComboBox.Dropdown

اختيار صورة من (Shell32.Dll) وحفظها بمجلد وبجدول وعرضها . Chose and Save Icon From Shell32.Dll.rar

شكراً استاذ @ابوخليل واستاذ @Foksh تم الحل وسأعرضه في موضوع منفصل .

استاذنا @الحلبي الحل بسيط جداً . أمسح الجدولان أو غير اسماء الجداول (Items) إلى (Items111) والجدول الثاني كذلك وأعمل الاستيراد أنا جربت عندي على ملفك . ووافني بالرد . New folder-1 (2).rar

تفضل أخي @husseinharby حسب مافهمت . هناك الجدول (tbl_AveragePrice)عدل السعران كما تريد . أما الجدول (tbl_Main) عند الحقل (AveragePrice) اختار السعر . ووافني بالرد . DDTwoPrice.rar

ممكن ترسل مشروعك ؟

الحمد لله .

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

تفضل استاذنا @الحلبي حسب مافهمت . المرفق والشرح . ووافني بالرد . New folder-1.rar

تفضل أخي @abofayez1 اما تعمل سورت على (ID) أو تضيف حقل (Sortby) وتعمل السورت عليه كما بالشرح ..

؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

تفضل أخي @husseinharby والباسوورد (1001) ويمكن تغييره بمحرر أكواد الفورم تحت زر التنقل . اليك المرفق ووافني بالرد . DDPassStars.rar

ولماذا تعطي لنفسك افضل اجابة ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

تفضل أخي @tharwt حسب مافهمت . ووافني بالرد . New Microsoft Access Database (2-1).rar