أحمد فؤاد قام بنشر مايو 2, 2013 قام بنشر مايو 2, 2013 السلام عليكم ورحمة الله وبركاته اساتذتى وزملائى الاعزاء مرفق ملف ارجو المساعده وشكراً أخوكم أحمد فؤاد Book1.rar
رجب جاويش قام بنشر مايو 2, 2013 قام بنشر مايو 2, 2013 تفضل أخى Private Sub ComboBox1_Click() Me.ComboBox2.Clear i = Application.WorksheetFunction.Match(ComboBox1.Value, Range("B1:IV1"), 0) LR1 = Cells(Rows.Count, i + 1).End(xlUp).Row For T = 2 To LR1 If Cells(T, i + 1) <> "" Then Me.ComboBox2.AddItem Cells(T, i + 1) End If Next End Sub Private Sub UserForm_Initialize() LR = [A1000].End(xlUp).Row For Each cl In Range("A2:A" & LR) If cl <> "" Then Me.ComboBox1.AddItem cl End If Next End Sub Book1.rar 1
أحمد فؤاد قام بنشر مايو 2, 2013 الكاتب قام بنشر مايو 2, 2013 السلام عليكم ورحمة الله وبركاته أستاذي / رجب جاويش بارك الله فيك فعلا هو ده المطلوب زادك الله من علمه ونفع بك الإسلام والمسلمين إن شاء الله أستاذ رجب أريد تطبيق هذين الكمبوبوكس علي عدة أسطر في حدود 30 سطر هل يحدث تغير في الكود معلش طمع مني لو تطبق لي الحل في ملف وكيفية تكرار الكمية ( 30 سطر ) في الفورم شكرا لك مرة ثانية وجزاك الله خيرا تلميذك / أحمد فؤاد
رجب جاويش قام بنشر مايو 2, 2013 قام بنشر مايو 2, 2013 أخى الفاضل / أحمد فؤاد جزاك الله كل خير على هذه الكلمات الطيبة أخى الفاضل الكود يعمل على عدد من الأسطر كما تريد جرب زيادة الأسطر بأى عدد وسوف يعمل الكود بشكل سليم ان شاء الله
عادل ابوزيد قام بنشر مايو 2, 2013 قام بنشر مايو 2, 2013 الاستاذ الفاضل رجب كود رائع من استاذ رائع ارجو لاثراء الموضوع ان يتم ترتيب القائمة المنسدلة ترتيباً ابجدياً تصاعدياً لسهولة البحث وهل يمكن عمل قائمة فرعية اخرى من القائمة الفرعية بمعنى لو الاصناف بها موديلات لكل شركة فهل يمكن ذلك بمعنى أخر يتم اختيار الشركة ثم اختيار الصنف الخاص بالشركة ثم اختيار الموديل الخاص بهذا الصنف تقبل منى تحياتى واحترامى
أحمد فؤاد قام بنشر مايو 3, 2013 الكاتب قام بنشر مايو 3, 2013 (معدل) أستاذي / رجب جاويش شكرا جزيلا علي إهتمامك بارك الله فيك مرفق ملف لو سمحت كيف يتم تطبيق الكود عليه آسف أزعجتك كثيرا بارك الله فيك Book1.rar تم تعديل مايو 3, 2013 بواسطه amfouad555
رجب جاويش قام بنشر مايو 3, 2013 قام بنشر مايو 3, 2013 أخى الفاضل / أحمد لا يوجد ازعاج على الاطلاق تفضل ما تريد Book1.rar
أحمد فؤاد قام بنشر مايو 3, 2013 الكاتب قام بنشر مايو 3, 2013 أستاذي الفاضل / رجب جاويش فعلا هو ده المطلوب بشكرك كثيرا علي ماتقدمه لي ولزملائي في هذا المنتدي بارك الله فيك ونفع بك الإسلام والمسلمين وأتمني لك حياة سعيدة وهنية وربنا يبارك لك في مالك وأولادك إن شاء الله ربنا يتقبل منا ومنك الأعمال الصالحة تلميذك / أحمد فؤاد
رجب جاويش قام بنشر مايو 3, 2013 قام بنشر مايو 3, 2013 أخى الفاضل / أحمد فؤاد جزاك الله كل خير أخى الفاضل على هذا الدعاء الطيب وهو أفضل من الدنيا وما عليها
رجب جاويش قام بنشر مايو 3, 2013 قام بنشر مايو 3, 2013 أخى الحبيب / أبو سما بارك الله لك فى سما وزرقك خير الدنيا والآخرة جزاك الله كل خير أخى الحبيب على هذا المرور العطر
أبو محمد عباس قام بنشر مايو 3, 2013 قام بنشر مايو 3, 2013 السلام عليكم ورحمة الله وبركاته الاستاذ والاخ الحبيب رجب جاويش ما شاء الله تبارك الرحمن عمل رائع وتنفيذ اروع زادك الله علما ونفع بعلمك تقبل دعواتي لك بالصحة وتمام العافية
رجب جاويش قام بنشر مايو 3, 2013 قام بنشر مايو 3, 2013 أخى الحبيب / عباس السماوي شرف كبير لى أخى هذا المرور العطر جزاك الله كل خير أخى الحبيب على هذا الدعاء الطيب أخى الحبيب أدام الله هذه المحبة بيننا خالصة لوجهه الكريم
أحمد فؤاد قام بنشر مايو 6, 2013 الكاتب قام بنشر مايو 6, 2013 السلام عليكم ورحمة الله وبركاته أستاذي الفاضل / رجب جاويش لي سؤال فني لو سمحت ( بسيط بنسبة لحضرتك ) لوكانت الأصناف في صفحة ثانية مثلا sheet 3 والفورم في sheet1 آسف علي إزعاجك شكرا
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.