أبو چيداء قام بنشر فبراير 17, 2015 قام بنشر فبراير 17, 2015 بالمرفقات فورم اريد عندما اختار اسم الدورة من الكومبوبوكس تاريخين لفترة معينة يظهر في الليست بوكس كل الدورات التي تمت في هذه الفترة لهذه الدورة وشكرا form2.zip
أبو چيداء قام بنشر فبراير 17, 2015 الكاتب قام بنشر فبراير 17, 2015 اخي ابراهيم. اشكرك اولا. الكود يعمل تمام ولكن لو اخترت اسم دورة فقط بدون كتابة تواريخ نظهر كل الدورات ولكني اريد ان تظهر الدورة المختارة فقط وشكرا
أبو چيداء قام بنشر فبراير 17, 2015 الكاتب قام بنشر فبراير 17, 2015 ListBox1.AddItem .Cells(A, 4): ListBox1.List(C, 2) = Format(.Cells(A, 2), "dd-mm-yyyy") ListBox1.List(C, 1) = .Cells(A, 3) ListBox1.List(C, 3) = .Cells(A, 1) اخي الفاضل ابراهيم الداتا عندي فيها اكتر من 50 عمود وانا اريد ان يظهر في الليست بوكس ثمانية فقط ولكنهم غير متتالين فاريد انا اغير الكود يكون العمود الاول في الليست بوكس يساوي مثلا العمود الرابع في الشيت وهكذا الثمانية ممكن الطريقة على نفس المثال ده وشكرا
إبراهيم ابوليله قام بنشر فبراير 18, 2015 قام بنشر فبراير 18, 2015 اخى اليك التوضيح على حسب مقدتى فى فهم الاكواد ListBox1.AddItem .Cells(A, 4) هذا السطر عباره عن ان قيمة اول عمود فى الليست من ناحيه اليسار = قيمة العمود الرابع فى الشيت ListBox1.List(C, 1) = .Cells(A, 3) هذا السطر عباره عن ان قيمة ثانى عمود فى الليست من ناحيه اليسار = قيمة العمود الثالث فى الشيت ListBox1.List(C, 2) = Format(.Cells(A, 2), "dd-mm-yyyy") هذا السطر عباره عن ان قيمة ثالث عمود فى الليست من ناحيه اليسار = قيمة العمود الثانى فى الشيت مع عمل مع عمل فورمات للعمود على ان تظهر القيم على انها تاريخ سنه-شهر-يوم ListBox1.List(C, 3) = .Cells(A, 1) هذا السطر عباره عن ان قيمة رابع عمود فى الليست من ناحيه اليسار = قيمة العمود الاول فى الشيت وهكذا بمعنى ان اذا اردت اضاف سطر سيكون بالشكل الاتى ListBox1.List(C, 3) = .Cells(A, 1) ولكن سنقوم بتغير الرقم ListBox1.List(C, 3) الى الرقم 4 لان الرقم اربعه سوف يشير الى العمود الخامس فى الليست سم نقوم بتغير الرقم Cells(A, 1 الى رقم العمود الذى نريده من الشيت وهكذا ملحوظه لاتنسى زياده عدد اعمده الليست بوكس الى الرقم 8 1
أبو چيداء قام بنشر فبراير 18, 2015 الكاتب قام بنشر فبراير 18, 2015 اريد اضافة زر اخر يأخذ نتيجة الليست بوكس ويضعها في شيت جديد
طلعت محمد حسن قام بنشر فبراير 18, 2015 قام بنشر فبراير 18, 2015 السلام عليكم بعد اذن استاذنا ابراهيم ابو ليله تم اضافه زر تصدير نتائج مخرجات اللست بوكس على شيت جديد اخي الكريم ابو جيداء شاهد المرفق لعله يكون طلبك اقبل تحياتي واحترامي form2.rar
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.