عبد الفتاح كيرة قام بنشر يونيو 17, 2010 مشاركة قام بنشر يونيو 17, 2010 السلام عليكم عندنا فورم به مربع تحرير وسرد و قد عينت فى خصائصه أنه مرتبط بنطاق اسمه names النطاق عبارة عن 500 صف أول 150 خلية منها بها بيانات و الباقى خلايا فارغة لكنه قابل للزيادة أو النقص عند البحث بالكود التالى لو حددنا عنصرا فارغا فى مربع التحرير تظهر رسالة خطأ كيف نجعل مربع التحرير مرتبطا بالخلايا غير الفارغة فقط داخل النطاق names و هذا هو الكود Sub ComboBox1_Change() TextBox1.Value = ComboBox1.Value Dim Snum As Long Dim Lastr As Long Lastr = Sheets("All").Range("b" & Rows.Count).End(xlUp).Row Snum = WorksheetFunction.Match(ComboBox1.Text, Sheets("All").Range("b5:b" & Lastr), 0) TextBox2.Value = Sheets("All").Cells(Snum + 4, 3).Value TextBox3.Value = Sheets("All").Cells(Snum + 4, 16).Value TextBox4.Value = Sheets("All").Cells(Snum + 4, 21).Value TextBox5.Value = Sheets("All").Cells(Snum + 4, 22).Value TextBox6.Value = Sheets("All").Cells(Snum + 4, 26).Value End Sub رابط هذا التعليق شارك More sharing options...
أيسم إبراهيم قام بنشر يونيو 17, 2010 مشاركة قام بنشر يونيو 17, 2010 السلام عليكم الأخ الكريم اجعل مربع التحرير و السرد يأخذ بياناته من مدى ديناميكي يزداد و ينكمش مع البيانات المتعلقة بها أوممكن ترفق ملف به نموذج نساعد بعضنا البعض دمت بخير أيسم إبراهيم رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر يونيو 17, 2010 الكاتب مشاركة قام بنشر يونيو 17, 2010 أفعل إن شاء الله وشكرا لسرعة ردك زر الأمر المسمى " البحث عن بيانات طالب " فى الورقة " data" برنامج شئون الطلاب للرفع 2003.zip رابط هذا التعليق شارك More sharing options...
أيسم إبراهيم قام بنشر يونيو 17, 2010 مشاركة قام بنشر يونيو 17, 2010 السلام عليكم الأخ الكريم تفضل المرفق به _إن شاء الله _ ما طلبت أضف إسما جديدا في النطاق و ستجد أنه تمت إضافته لمربع التحرير و السرد و أيضا لا يوجد أماكن فارغة دمت بخير أيسم إبراهيم برنامج شئون الطلاب للرفع 2003.zip رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر يونيو 17, 2010 الكاتب مشاركة قام بنشر يونيو 17, 2010 ممتاز جدا أخ أيسم مفهوم مشكلة أخرى صغيرة حقل تاريخ الميلاد يظهر فى الفورم بصيغة التاريخ الأمريكى الشهر فى البداية من اليسار ثم اليوم ثم السنة وبأرقام عربية ( يعنى إنجليزية ) مع أن الحقل الذى يستدعى منه التاريخ أرقام هندية و بصيغة تاريخ معتادة انظر الصورة رابط هذا التعليق شارك More sharing options...
أيسم إبراهيم قام بنشر يونيو 17, 2010 مشاركة قام بنشر يونيو 17, 2010 السلام عليكم الأخ الكريم أضف السطر التالي بعد السطر السابع في كودك TextBox2.Value = Format(Sheets("All").Cells(Snum + 4, 3).Value, "Medium Date") ] أو السطر التالي TextBox2.Value = Format(Sheets("All").Cells(Snum + 4, 3).Value, "DD/MMMM/YYYY") كلاهما يحقق ما تريد لكن بشكلين مختلفين في نمط الشرطة التي بين أجزاء التاريخ دمت بخير أيسم إبراهيم رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر يونيو 17, 2010 الكاتب مشاركة قام بنشر يونيو 17, 2010 جزاك الله خيرا وبارك فيك أنا اخترت هذا التنسيق "YYYY/MM/DD" و هذا هو الشكل المناسب المطلوب رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر يونيو 20, 2010 الكاتب مشاركة قام بنشر يونيو 20, 2010 (معدل) تم تعديل يونيو 20, 2010 بواسطه kemas رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان