kkhalifa1960

تفضل استاذ @بوكفوس عبدالسلام حسب مافهمت . ووافني بالرد . 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