اعلن هنا
أكاديمية الصقر للتدريب
أعلن هنا
أعلن هنا
صفحتنا على الفيس بوك
أعلن هنا



أهلا وسهلا بك زائرنا الكريم في أكاديمية الصقر للتدريب، لكي تتمكن من المشاركة ومشاهدة جميع أقسام المنتدى وكافة الميزات ، يجب عليك إنشاء حساب جديد بالتسجيل بالضغط هنا أو تسجيل الدخول اضغط هنا إذا كنت عضواً .





عمل تنسيق شرطي في الفورم

المرفق هعبارة عن يوزر فورم لترحيل البيانات وتعديلها يوجد كود يمنع ترحيل البيانات اذا كان اشي منها فارغ محتاج تطوير هذا ..



17-02-2018 10:00 صباحا
khaled alborene
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 16
المشاركات : 432
الجنس : ذكر
تاريخ الميلاد : 9-9-1990
الدعوات : 1
يتابعهم : 7
يتابعونه : 6
قوة السمعة : 421
الاعجاب : 164
 offline 





المرفق هعبارة عن يوزر فورم لترحيل البيانات وتعديلها 
يوجد كود يمنع ترحيل البيانات اذا كان اشي منها فارغ محتاج تطوير هذا الكود بحيث عند وجود text box فترغ يقوم بتلوينه بلون مختلف 
واظهار ملاحظة يرجى ملي البيانات الفارغة ويحط اسم كل بيان فارغ بالملاحظة 
مثال كالتالي
يرجى ملئ البيانات التالية
- اسم العميل..............
- رقم العميل..............
لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
 
 
  tracking.rar   تحميل rar مرات التحميل :(13)
الحجم :(33.326) KB







17-02-2018 03:55 مساء
مشاهدة مشاركة منفردة [1]
khaled alborene
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 16
المشاركات : 432
الجنس : ذكر
تاريخ الميلاد : 9-9-1990
الدعوات : 1
يتابعهم : 7
يتابعونه : 6
قوة السمعة : 421
الاعجاب : 164
 offline 
look/images/icons/i1.gif عمل تنسيق شرطي في الفورم
up.......





18-02-2018 04:37 صباحا
مشاهدة مشاركة منفردة [2]
snoopyrem
menu_open
عضو
معلومات الكاتب ▼
تاريخ الإنضمام : 04-09-2017
رقم العضوية : 343
المشاركات : 2
الجنس : ذكر
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 10
الاعجاب : 0
 offline 
look/images/icons/i1.gif عمل تنسيق شرطي في الفورم
COMING SOON إن شاء الله


تم تحرير المشاركة بواسطة :snoopyrem
بتاريخ:18-02-2018 04:42 صباحا






18-02-2018 05:28 صباحا
مشاهدة مشاركة منفردة [3]
snoopyrem
menu_open
عضو
معلومات الكاتب ▼
تاريخ الإنضمام : 04-09-2017
رقم العضوية : 343
المشاركات : 2
الجنس : ذكر
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 10
الاعجاب : 0
 offline 
look/images/icons/i1.gif عمل تنسيق شرطي في الفورم
Private Sub CommandButton1_Click()
Dim MissingData  As Boolean
MissingData = False
For d = 1 To 14
If Controls("textbox" & d).Text = "" Then
    Controls("textbox" & d).BackColor = vbRed
    MissingData = True
Else
    Controls("textbox" & d).BackColor = vbWhite
End If
Next
If MissingData = True Then
    MsgBox "1 or more are blank, filled in red, etc.", vbInformation, "Missing Data": Exit Sub
End If
lrow = Sheet1.Cells(Rows.Count, 2).End(xlUp).Row
If Application.WorksheetFunction.CountIf(Range("B2:B" & lrow), TextBox2.Text) > 0 Then MsgBox "Repeated Name": Exit Sub
For j = 1 To 14
If j = 5 Or j = 6 Then
 Sheet1.Cells(lrow + 1, j) = CDate(Controls("textbox" & j).Value)
 Else
 Sheet1.Cells(lrow + 1, j) = Controls("textbox" & j).Text
 End If
 Next j
 For i = 1 To 14
 Controls("textbox" & i).Text = ""
 Next i
 ListBox1.AddItem
 ListBox1.List(ListBox1.ListCount - 1, 0) = Sheet1.Cells(lrow + 1, 2).Value
 ListBox1.List(ListBox1.ListCount - 1, 1) = lrow + 1
 TextBox1.Value = Application.WorksheetFunction.Max(Sheet1.Range("a:a"wink_3 ) + 1
 TextBox2.SetFocus
 MsgBox "Data Transfered Successfully ..."
End Sub


تم تحرير المشاركة بواسطة :snoopyrem
بتاريخ:18-02-2018 06:08 صباحا







المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
التنسيق الشرطي عن طريق الكود نصر الإيمان
5 97 YasserKhalil
اريد تعديل الكود لكي يحسب عدد الخلايا الملون حسب تنسيق شرطي وهي تاريخ بدل رقم  ابوعلي الحبيب
11 81 YasserKhalil
شرح البحث بواسطة التنسيق الشرطي Yasser Elaraby
14 1081 Yasser Elaraby
جعل تنسيق شرطي في التكست بوكس رمضان بكري
0 105 رمضان بكري
التنسيق الشرطي داخل الفورم باللون رمضان بكري
4 293 رمضان بكري

الكلمات الدلالية
تنسيق ، شرطي ، الفورم ،


 







اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.



الساعة الآن 06:00 مساء

أعلن هنا
أعلن هنا
أعلن هنا