samia84

شكرا على العمل المساعد

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

السلام عليكم هل من رد على هذا الموضوع وشكرا مسبقا لكم يا من يساعد كل من يطلب المساعدة

السلام عليكم عندي مشكل على كيفية توزع الألوان على القصاصات 1- هل يكون اللون البني مثلا للقصاصات التي تحمل الأرقام الفردية و اللون الثاني للتي تحمل الأرقام الزوجية أو كل لجنة ترتب لوحدها أو هناك طرقة أخري وشكرا لكم مسبقا على المساعدة

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

السلام عليكم شكرا أخي ياسر على هذا الرد و المساعدة أخي لو تكرمتم وإعطاء كود لفصل الإسم وللقب وشكرا

اخي سعيد بارك الله فيك ولكن لم أجد الملف لفصل اللقب عن الاسم وشكرا

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

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

السلام عليكم شكرا لكم على الرد الكود موجود في modules: Tarhil_car_not من الملف المرفق سابقا وهوGESTION DES NOTES _9 وسأرفقه موة ثانية GESTION DES NOTES _9.rar

السلام عليكم شكرا أخي على الإهتمام و الإجابة أنا في الإنتظار دائما ولكن الإدارة التى أعمل فيها هي المستعجلة وشكرا

السلام عليكم هل من مساعدة أنا في أمس الحاجة إلى هذا الكود وشكرا مسبقا

شكرا لكم ياكبار الأساتذة شكرا لكم يا من يلبي نداء كل من يحتاج مساعدة

شكرا لكم ياكبار الأساتذة ودمتم عونا لنا دائما شكرا شكرا شكرا

السلام عليكم هذا الملف لأحد الزملاء الذي يوجد فيه الكود الذي أريد الشرح له يوجد في المرفقات وشكرا على المساعدة GESTION DES NOTES _9.rar

السلام عليكم لقد وجدت مساعدة كبيرة في منتدانا الغالي وخاصة من كبار أساتذتنا ولهذا ألجأإليكم في كل مرة لمساعدة وجدت هذا الكود في أحد برامج الزملاء وفد أعجبني وأريد تطبيقه في برنامجي ولكن لم أنجح لذا أرجو منكم المساعدة Sub Rappel_eleves() On Error Resume Next Dim MyRange As Range, MyR As Range Dim r As Integer, N As Integer, M As Integer, MM As Integer, K As Integer, C As Integer, CC As Integer TT = Application.WorksheetFunction.Match(Range("l2"), Feuil3.Rows("5:5"), 0) Dim Tab1(8) As Integer Tab1(1) = TT: Tab1(2) = TT + 1: Tab1(3) = IIf(TT >= 38, "", TT + 2): Tab1(4) = IIf(TT >= 38, TT + 2, TT + 3): _ Tab1(5) = IIf(TT >= 38, TT + 3, TT + 4): Tab1(6) = IIf(TT >= 38, TT + 4, TT + 5): Tab1(7) = IIf(TT >= 38, TT + 5, TT + 6): _ Tab1(8) = IIf(TT >= 38, TT + 6, TT + 7) Set MyRange = Range("bas_t" & Range("V1")) kh2_Clears Application.Calculation = xlCalculationManual 'ÚÏÏ ÇáÓØæÑ ÇáÎÇÑÌÉ Úä äØÇÞ ÇáÇÓÊÏÚÇÁ N = 7 Application.ScreenUpdating = False With MyRange For r = 1 To .Rows.Count If .Cells(r, 1) = "" Then GoTo 1 If .Cells(r, 6) = Range("d4") Then M = M + 1 MM = N + M With Cells(MM, 2) .Value = M .AddComment .Comment.Text Text:="" & r End With For K = 1 To 12 C = Choose(K, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12) CC = Choose(K, 2, 3, 8, Tab1(1), Tab1(2), Tab1(3), Tab1(4), Tab1(5), Tab1(6), Tab1(8)) If CC = 0 Then Else Cells(MM, C) = .Cells(r, CC) Next K End If 1 Next r End With 'ÊÓØíÑ ÇáÕÝæÝ ÇáãÍÊæíÉ Úáì ÇáÈíÇäÇÊ With Range("B8:n" & MM) .Borders.LineStyle = 2 End With With Range("B8:n" & MM).Font .Name = "Arial" .Size = 10 .Strikethrough = False .Superscript = False .Subscript = False .OutlineFont = False .Shadow = False .Underline = xlUnderlineStyleNone .ColorIndex = xlAutomatic End With Application.ScreenUpdating = True Range("g8").Activate MsgBox "Êã ÇáÇÓÊÏÚÇÁ ÈäÌÇÍ", vbMsgBoxRight, "ÇáÍãÏááå" On Error GoTo 0 Application.Calculation = xlCalculationAutomatic End Sub Sub Rappel.rar

السلام عليكم شكرا لك أخي حسام عيسى على الرد و المساعدة أريد أن تعمله بالأكواد ولن أنس جميلك وشكرا مسبقا

شكرا أخي علي الرد أريد شئ أخر وهو عند كتابة الحرف الأول تفتح القائمة المنسدلة أليا وتضهر جميع الأسماء التي تبدأ بذالك الحرف وشكرا لكم على المساعدة

السلام عليكم عندي سؤال أريد عندا كتابة أول حرف من إسم موجود في القائمة المنسدلة تظهر جمع الأسامي التي تبدأ بهذا الحرف وشكرا

السلام عليكم شكرا لكم على المساعدة وهو المطلوب دمتم في خدمة العلم والسلام عليكم

السلام عليكم جميعا أرجوا منكم مساعدتي في هذا المشكل والتمثل في عندنا في الجزائر عندما يكون شخصا ليس في تاريخ ميلاده الشهر واليوم نكتبه مثلا: بحكم 1998 وعندما أعمل كود لتفكيك التاريخ الى يوم وشهر وسنة لايعطيني نتيجة ونفس الشئ عندما أعمل كود لحساب السن عند تاريخ معين وشكرا على المساعدة مسبقا

للرفع

السلام عليكم عندي مشكل على كيفية توزع الألوان على القصاصات 1- هل يكون اللون البني مثلا للقصاصات التي تحمل الأرقام الفردية و اللون الثاني للتي تحمل الأرقام الزوجية أو كل لجنة ترتب لوحدها أو هناك طرقة أخري وشكرا لكم مسبقا على المساعدة

للرفع

للرفع