husain alhammadi

السلام عليكم و رحمة الله و بركاتة استاذ محمد هشام لساني يعجز عن شكرك، والكلمات والحروف لا تكفي أن أقدم لك جزيل الشكر والعرفان فجزاك الله خير الجزاء تم ارفاق sheet2 للاسماء و بالنسبة للبيانات بعد الترحيل هل يتم تكرار التاريخ ورقم الفاتورة والبيانات الاخرى كما في الصورة التالية نعم فاتورة كاملة.xlsm

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

السلام عليكم و رحمة الله و بركاتة فاتورة كاملة.xlsm

اخواني هل يوجد خطاء في كود الترحيل و التعديل و البحث و فاتورة جديدة فاتورة كاملة.xlsm

السلام عليكم و رحمة الله و بركاتة استاذ محمد هشام.جزاك الله خير الجزاء

اخواني هل يوجد خطاء في كود الاستعلام و التعديل بيانات الموظفين.xlsm

السلام عليكم و رحمة الله و بركاتة ارجوا منكم تعديل الكود UserForm1 الى UserForm100 يتغير حسب مدة الزمنية مكتب امام كل UserForm و يكون مل اشاشة Private Sub CommandButton1_Click() UserForm1.Show.("00:00:30:00") UserForm2.Show.("00:00:30:00") UserForm3.Show.("00:00:30:00") UserForm4.Show.("00:00:30:00") UserForm5.Show.("00:00:30:00") UserForm6.Show.("00:00:30:00") End Sub 111.xlsm

السلام عليكم و رحمة الله و بركاتة برنامج شاشة الدخول مع صلاحيات المستخدمين جاهز للاستخدام و بها صفحات عمل جاهزة فقط ادخل و اضف اليه اعمالك مهما كان العمل . شكرا لك استاذى محمد هشام الذي قام بتعديل الاكواد. استاذى محمد هشام إنه لمن دواعي فخري وامتناني الكبير أن أقول للجميع كم نحن محظوظون لوجودك معنا، حقا لقد ابدعت و تميزت ، فأنت أهل للشكر، ولك منى كلّ الثناء! وجزاك الله خير الجزاء و جعله الله فى موازين حسناتك و صدقة جارية لى و لك اسم المستخدم : حسين كلمة المرور :123 شاشة الدخول مع صلاحيات المستخدمين.xlsb

السلام عليكم و رحمة الله و بركاتة اخواني ارفق لكم برنامج تعليم الصلاة للاطفال على ان يربط البرنامج في صفحة الرئيسية A8 و ينقل المعلومات الى من a جميع الصفحات بحسب اختيار صفحة الرئيسية A8 و وضعها في صفحة الرئيسية E3 تعليم الاطفال الصلاة.xlsm

السلام عليكم و رحمة الله و بركاتة تعليم الاطفال الصلاة.xlsm

السلام عليكم و رحمة الله و بركاتة تعليم الاطفال الصلاة.xlsm

السلام عليكم و رحمة الله و بركاتة في حديث أبي هريرة رضي الله عنه أن رسول الله صلى الله عليه وسلم قال : ( إذَا مَاتَ الإِنْسَانُ انْقَطَعَ عَمَلُهُ إلاَّ مِنْ ثَلاَثٍ : صَدَقَةٍ جَارِيَةٍ ، أَوْ عِلْمٍ يُنْتَفَعُ بِهِ ، أَوْ وَلَدٍ صَالِحٍ يَدْعُو لَهُ ) رواه مسلم (1631). وأنواع الصدقات الجارية وأمثلتها كثيرة ، منها : بناء المساجد ، وغرس الأشجار ، وحفر الآبار ، وطباعة المصحف وتوزيعه ، ونشر العلم النافع بطباعة الكتب والأشرطة وتوزيعها .

السلام عليكم و رحمة الله و بركاتة استاذى محمد هشام إنه لمن دواعي فخري وامتناني الكبير أن أقول للجميع كم نحن محظوظون لوجودك معنا، حقا لقد ابدعت و تميزت ، فأنت أهل للشكر، ولك منى كلّ الثناء! وجزاك الله خير الجزاء و جعله الله فى موازين حسناتك و صدقة جارية لى و لك

السلام عليكم و رحمة الله و بركاتة اخواني ارفق لكم برنامج تعليم الصلاة للاطفال على ان يربط البرنامج في صفحة الرئيسية C8 و ينقل المعلومات الى من a جميع الصفحات بحسب اختيار C8 و وضعها في G3 و كذلك ينقل المعلومات من b جميع الصفحات بحسب اختيار C8 و وضعها في J13 و كذلك اضافة الصوت ان امكن حتى يستفيد الاطفال منه واسال الله ان يجعل ذلك في موازين حسناتكم و صدقة جارية لي و لمن ساهم فى هذا البرنامج و لكم الحرية المطلقة في التطوير على ان يتم نشرها تعليم الاطفال الصلاة.xlsm

السلام عليكم ورحمة الله تعالى وبركاته استاذ محمد هشام شكرا لك على المرور الطيب و الاهتمام اقصد بالصلاحيات هي اظهار او اخفاء اوراق معينة على مستخدم حسب صفحة الصلاحيات وجزاك الله خير الجزاء و جعله الله فى موازين حسناتك و صدقة جارية لى و لك و لكل من ساهم في هذا البرنامج و هذا البرنامج من تصميمي خاص و لم اقل بنقله

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

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

السلام عليكم و رحمة الله و بركاتة اخواني الخبراء ارجوا منكم ارجوكم مساعدتى في تعديل الاكواد برنامج شاشة الدخول مع صلاحيات في صفحة الصلاحيات اسم المستخدم (d6 :d30) و كلمة المرور (e6 :e30) مع اضافة الصلاحيات من (Z30:g7) و اضافة خاصية اظهار اسم المستخدم فى الصفحة الرئيسية J9 مع كود تقرير دخول المستخدمين بمعنى كل من يدخل البرنامج يسجل فى التقرير اسم المستخدم : husain و كلمة المرور :123 واسم المستخدم : 2 و كلمة المرور :2 واسم المستخدم : 3 و كلمة المرور :3 للعلم بان البرنامج حاليا يعمل بصورة ممتازة و لكن يفتح للمستخدمين الثلاثة فقط وجزاكم الله خير الجزاء Private Sub CommandButton1_Click() If UserForm1.TextBox1.Value = "husain" And UserForm1.TextBox2.Value = 123 Or UserForm1.TextBox1.Value = "2" And UserForm1.TextBox2.Value = 2 Or UserForm1.TextBox1.Value = "3" And UserForm1.TextBox2.Value = 3 Or UserForm1.TextBox1.Value = "4" And UserForm1.TextBox2.Value = 4 Or UserForm1.TextBox1.Value = "5" And UserForm1.TextBox2.Value = 5 Then Application.Visible = True Range("b1").Select Selection.End(xlDown).Select ActiveCell.Offset(2, 0).Range("b1").Select ActiveCell.Value = UserForm1.TextBox1.Value Sheets("Sheet2").Select Range("c1").Select Selection.End(xlDown).Select ActiveCell.Offset(2, 0).Range("b1").Select ActiveCell.Value = UserForm1.TextBox2.Value Range("d1").Select Selection.End(xlDown).Select ActiveCell.Offset(2, 0).Range("b1").Select ActiveCell.Value = Date Range("e1").Select Selection.End(xlDown).Select ActiveCell.Offset(2, 0).Range("b1").Select ActiveCell.Value = Time If UserForm1.TextBox1.Value = "husain" And UserForm1.TextBox2.Value = 123 Or UserForm1.TextBox1.Value = "2" And UserForm1.TextBox2.Value = 2 Or UserForm1.TextBox1.Value = "3" And UserForm1.TextBox2.Value = 3 Or UserForm1.TextBox1.Value = "4" And UserForm1.TextBox2.Value = 4 Or UserForm1.TextBox1.Value = "5" And UserForm1.TextBox2.Value = 5 Then Application.Visible = True UserForm1.Hide Else MsgBox "يرجى التحقق من ادخال اسم المستخدم وكلمة المرور بصورة صحيحة", , " " Label5.Caption = Label5.Caption - 1 If Label5.Caption = 0 Then ThisWorkbook.Save Application.Quit End If End If End Sub الدخول.xlsm

نشاطركم الأحزان، للفقيد الرحمة ولكم من بعده طول البقاء، إنا لله وإنا إليه راجعون

السلام عليكم و رحمة الله و بركاتة جزاك الله خير الجزاء على التنبية و الصحيح هو sheet 4 form1.Hide Sheet4.Range("R4").Value = Application.WorksheetFunction.VLookup(rngUser.Offset(0, -1).Value, Sheet1.Range("d2:d100"), 1, False) Sheet4.Range("E4").Value = Date Sheet4.Range("I4").Value = Application.WorksheetFunction.Text(Sheet7.Range("I4").Value, "dddd") Sheet4.Range("M4").Value = Time form2.Show End If End Sub

السلام عليكم و رحمة الله و بركاتة اخواني هل يوجد خطا Private Sub CommandButton3_Click() Dim strUsername As String Dim strPassword As String Dim iRow As Integer strUsername = Me.TextBox1.Value strPassword = Me.TextBox2.Value On Error GoTo 1 iRow = Application.WorksheetFunction.Match(strUsername, Worksheets("صلاحيات").Range("d:d"), 0) 1 If Err.Number <> 0 Then MsgBox "تاكد من اسم المستخدم و كلمة المرور": Exit Sub If Worksheets("صلاحيات").Cells(iRow, 2).Value = strPassword Then MsgBox "تم تسجيل الدخول بنجاح!" Unload Me UserForm1.Show Else MsgBox "تاكد من اسم المستخدم و كلمة المرور" Me.TextBox1.Value = "" Me.TextBox2.Value = "" Me.TextBox1.SetFocus MsgBox ("أهلا وسهلا بك في برنامج "), vbOKOnly form1.Hide Sheet7.Range("R4").Value = Application.WorksheetFunction.VLookup(rngUser.Offset(0, -1).Value, Sheet1.Range("d2:d100"), 1, False) Sheet7.Range("E4").Value = Date Sheet7.Range("I4").Value = Application.WorksheetFunction.Text(Sheet7.Range("I4").Value, "dddd") Sheet7.Range("M4").Value = Time form2.Show End If End Sub فى الكود ان كان نعم ارجوا تصحيحها دخول.xlsm

السلام عليكم و رحمة الله و بركاتة اخواني المشرفين ارجو اغلاق هذا الملف

البرنامج يختلف عن الاول

السلام عليكم و رحمة الله و بركاتة لكل مهنة أدواتها التي تساعد صاحب المهنة على أداء عمله بالشكل المطلوب وكل ما كانت هذه الأدوات حديثة ، كانت نتيجة العمل أفضل و أسرع وأكثر جودة وكفاءة. كذلك المبرمج المبتدئ، يحتاج إلى مجموعة من البرامج الأدوات التي تساعده على إنجاز العمل المطلوب بالشكل المناسب ، وتعبر شاشة الدخول هي أدوات المبرمج التي يستخدمها على حسب الحاجة المطلوبة والهدف المطلوب في كل مهمة ليتم إنجازها.و المطلوب اخواني تعديل البرنامج في عدة مراحل نبدء قمت بإرفاق ملف برنامج شاشة الدخول مع صلاحيات من إعدادي وهو بسيط وقمت بتحميله لسببين : الأول : أن يستفيد منه باقي الأعضاء . الثاني : توجد به عدة مشكلات أود من أحد الخبراء مساعدتي فيه . المطلوب : 1) : تعديل اكواد الدخول للبرنامج من صفحة الصلاحيات و يسجل عملية الدخول و الخروج في صفحة تقرير الدخول و على ان يظهر اسم المستخدم في الصفحة الرئيسية R4 2): اضافة كود في الصفحة الرئيسية تغيير كلمة المرور البرنامج للجميع و يمكن اضافة اي برنامج عليه بعد الانتهاء من جميع المراحل و يمكنكم التعديل عليها و اعادة نشره ليستفيد الجميع منه و جزاكم الله خير الجزاء و جعله الله في ميزان حسناتكم دخول.xlsm

السلام عليكم و رحمة الله و بركاتة تم استخدام معادلة الاستاذ أ / محمد صالح احتساب الساعات التي قضاها بين تاريخ الخروج وتاريخ الوصول.xlsx