• اضافة إهداء
    (المعذره .. غير مسموح للزوار بإضافة الإهداءات, الرجاء التسجيل في المنتدى)


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





أختيار أيام الاسبوع تلقائي vba

السلام عليكم اخوتي الكرام اتعلمت منكم كتيييييير جدآ وبفضل الله ودروسكم قدرت اعمل برنامج خاص بنادي رياضي لصديق عزيز المه ..



30-12-2017 04:12 مساء
Rezk Ramzy
menu_open
عضو
معلومات الكاتب ▼
تاريخ الإنضمام : 04-10-2017
رقم العضوية : 884
المشاركات : 9
الجنس : ذكر
تاريخ الميلاد : 14-6-1975
يتابعهم : 4
يتابعونه : 2
قوة السمعة : 20
الاعجاب : 5
 offline 
السلام عليكم اخوتي الكرام 
اتعلمت منكم كتيييييير جدآ وبفضل الله ودروسكم قدرت اعمل برنامج خاص بنادي رياضي لصديق عزيز
المهم كنت بدور علي كود منه اقدر اختار ايام الاسبوع بدل ما اسجلهم يوم يوم ملقتش 
والحمد لله توصلت اني اعمل  اليوزفورم ده وانا قلت اشاركة مع حضرتكم لو فيه اي تعديل علي الرحب والسعة 
رابط التحميل
لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب




30-12-2017 07:13 مساء
مشاهدة مشاركة منفردة [1]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 1912
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 8
يتابعهم : 0
يتابعونه : 195
قوة السمعة : 5319
الاعجاب : 1524
 offline 
look/images/icons/i1.gif أختيار أيام الاسبوع تلقائي vba
وعليكم السلام أخي الكريم رزق
بارك الله فيك على الموضوع وعلى حرصك على إفادة الأعضاء .. 
اطلعت على الملف ووجدت أنك قمت بالمطلوب ولكن بطريقة طويلة بعض الشيء
وإليك اختصار لكودك باستخدام الحلقات التكرارية حيث يتم عمل حلقة تكرارية من 1 إلى 7 على صناديق الاختيار الموجودة على الفورم وتخزين النتائج في متغير نصي وفي النهاية وضع المتغير النصي في صندوق النص
Private Sub CommandButton1_Click()
    Dim i           As Integer
    Dim str         As String

    For i = 1 To 7
        With Me.Controls("CheckBox" & i)
            If .Value = True Then str = str & IIf(str = "", "", " ") & .Caption
        End With
    Next i

    TextBox1.Value = str
End Sub
 
 
  weekdays.rar   تحميل rar مرات التحميل :(6)
الحجم :(19.029) KB


أثارت هذه المشاركة إعجاب: Yasser Elaraby، Rezk Ramzy،



30-12-2017 08:10 مساء
مشاهدة مشاركة منفردة [2]
Rezk Ramzy
menu_open
عضو
معلومات الكاتب ▼
تاريخ الإنضمام : 04-10-2017
رقم العضوية : 884
المشاركات : 9
الجنس : ذكر
تاريخ الميلاد : 14-6-1975
يتابعهم : 4
يتابعونه : 2
قوة السمعة : 20
الاعجاب : 5
 offline 
look/images/icons/i1.gif أختيار أيام الاسبوع تلقائي vba
شكرآ أستاذي  YasserKhalil علي مرورك وتعديلك الجميل 
أنا فعلا بحاول اتعلم الحلقات التكرارية لانها بتختصر كتير من الوقت والجهد
شكرآ مرة اخري 

أثارت هذه المشاركة إعجاب: YasserKhalil،



30-12-2017 10:06 مساء
مشاهدة مشاركة منفردة [3]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 1912
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 8
يتابعهم : 0
يتابعونه : 195
قوة السمعة : 5319
الاعجاب : 1524
 offline 
look/images/icons/i1.gif أختيار أيام الاسبوع تلقائي vba
بارك الله فيك أخي الكريم ، حاول تتابع سلسلة الدروس التي قدمها أخونا محمود الشريف وأخونا حسام خطاب
كما يوجد بالمنتدى دروس كثيرة يمكن أن تفيدك إن شاء الله .. وفقك الله لما يحبه ويرضاه







الكلمات الدلالية
أختيار ، أيام ، الاسبوع ، تلقائي ،


 







الساعة الآن 03:19 صباحا