اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

2saad

04 عضو فضي
  • Posts

    931
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل منشورات العضو 2saad

  1. السادة اعضاء المنتدي الذي تعلمنا منه كثيرا بعد سلام الله عليكم ورحمة الله وبركاته..نرجو من حضراتكم تصحيح الخطأ في هذا الكود المرفق ... ولكم جزيل الشكر ووافر الاحترام انتبه من فضلك ... مشاركة مكررة .. تــــم بالفعل حذف المشاركة الأخرى هذا هو الكود وهذه رسالة الخطأ الذى تظهر , يجب عليك التوضيح هكذا Sub Test() Dim a, ws As Worksheet, sh As Worksheet, s As String, i As Long, ii As Long, k As Long Application.ScreenUpdating = False Set ws = ThisWorkbook.Worksheets("مجمع الشيتات") Set sh = ThisWorkbook.Worksheets("قوائم الفصول") With ws a = .Range("C10:P" & .Cells(Rows.Count, 3).End(xlUp).Row).Value a = Application.Index(d, Evaluate("ROW(4:" & UBound(d, 4) & ")"), [{3,4,5,7,9,11,12,15,16}]) ReDim b(1 To UBound(a, 1), 1 To UBound(a, 2)) s = sh.Range("F4").Value sh.Range("C10").CurrentRegion.Offset(1).ClearContents If IsEmpty(s) Then Exit Sub sh.Columns(3).NumberFormat = "@" sh.Columns(8).NumberFormat = "@" For i = LBound(a, 1) To UBound(a, 1) If a(i, 7) = s Then k = k + 1 b(k, 1) = k For ii = 3 To UBound(a, 2) b(k, ii) = a(i, ii) Next ii End If Next i If k > 0 Then sh.Range("C10").Resize(k, UBound(d, 4)).Value = b End With End Sub مجمع الشيتات.rar
  2. بارك الله فيك وأكثر الله من امثالك
  3. اخواني اعضاء المندي الكرام بعد سلام الله عليكم ورحمة الله وبركاته اريد ان اعرف ما الخطأ في كود الترحيل هذا ولكم جزيل الشكر ووافر الاحترامالصف الأول.xlsm
  4. شكرا جزيلا يا استاذ ابراهيم ..وربنا يجزيك خير
  5. اخواني اعضاء المنتدي الكرام بعد سلام الله عليكم ورحمة الله وبركاته اريد التعديل علي هذا الكود بحيث نضيف عليه السن في اول اكتوبر وهو من عمل الاخ الفاضل الاستاذ ابراهيم ...وشكرا جزيلا الرقم _القومى.xlsm
  6. لو سمحتم محتاج اعرف ايه المقصود ( e5 ) في هذا الكودتوزيع اللجان.xls
  7. اريد نفس المطلوب في المشاركة بعنوان تصدير جميع الشهادات في ملف واحد بصيغة pdf
  8. انا مسئول احصاء باحدي المدارس ومحاتج كود يقوم بجلب بيانات التلاميذ بالمدرسة من قاعدة بيانات الوزارة من النت ( عن طرق كتابة ايميل الدخول والباسورد ) ولكم جزيل الشكر ووافر الاحترام
  9. شكرا علي رد حضرتك والله يبارك فيك ولكن حضرتك انا عايز اعدل في الكود بحيث يحول كل شهادات الناجحين او الراسبين الي ملف pdf سواء بمدي معين او غير مدي الكود اللي حضرتك وضعته يحول نموذج واحد ( 4 شهادات ) فقط
  10. اعضاء المنتدي الكرام بعد السلام الله عليكم ورحمة الله وبركاته ..لدي استفسار من حضراتكم وارجو الحل ..هل يمكن تحويل الشهادات الي ملف pdf بمعني عندما اضغط علي شهادات الناجحين يتم تحويل الشهادات دفعة واحدة الي ملف pdf ...ارجو الحل من حضراتكم شهادات ,والراسبين 4 تعريق متغيرات.xlsm
  11. شكرا جزيلا وربنا يجعله في ميزان حسناتك
  12. اخي ابراهيم الف شكر علي مجهود وكل عام وانت طيب وبصحة جيدة ...معلش انا هتعبك معاي لو اعمدة المواد بعيدة عن بعض ايه اللي اغيره في الجزء الاول من المعادلة ..انا مرسل لحضرتك الملف test.xlsx
  13. اعضاء المنتدي الموقر بعد سللم الله عليكم ورحمة الله وبركاته وكل عام وانتم بخير عايز معادلة تعطينا اسماء مواد الرسوب في العمود ( h ) يعني اذا كان الطالب دون المستوي في العربي يكتبلي اسم المادة ، وهكذا في المواد الأخري واذا لم يحصل علي دون المستوي في اي مادة يكتبلي (منقول للصف السادس ) عنوان مخالف جداً .. تــم تعديل عنوان المشاركة ليعبر عن طلبك test.xlsx
  14. شكرا جزيلا وربنا يجعله في ميزان حسناتك وكل عام وانت طيب
  15. السلام عليكم ورحمة الله وبركاته لدي نموذج لعمل الشهادات المدرسية للنابغة ساجدة العزاوي من العراق ..هل يمكن وضع كود للبحث بالاسم ورقم الجلوس لاحضار شهادة معينة .. وشكرا لاعضاء المنتدي الموقر ..انا عايز اعمل قائمة منسدلة بارقام الجلوس او الاسم واجلب شهادة معينة بناء علي الاسم او رقم الجلوس شهادات ,والراسبين 4 تعريق متغيرات.xlsm
  16. شكرا لرد حضرتك الترحيل من شيت data الي شيت moholon علي حسب الملف المرفق
  17. اخواني الأفاضل بعد السلام عليكم ورحمة الله وبركاته عايز اعدل علي كود الترحيل بحيث يرحل البيانات من a14 وبدون الشرط الموجود في القائمة h6 ولكم جزيل الشكر ووافر الاحترام سها.xlsm
  18. شكرا جزيلا وربنا يجعله في ميزان حسناتك
  19. اعضاء المنتدي الكرام كل عام وانتم طيبون لو سمحتم عايز معادلة اذا كان في خلايا العمود ( a) غ يديني غ وإذا كان درجة يقسم الدرجة علي 2 سعد.xlsx
  20. اشكركم جميعا وكل عام وانتم طيبون
  21. اخواني اعضاء المنتدي الكرام بعد سلام الله عليكم ورحمة الله وبركاته لي طلبين من فضلكم 1 - عايز اعرف الخطأ في كود الترحيل من شيت ( ملف وتحريري نصف العام صف رابع ) الي شيت (سجل) ابتداء من b14 2- عايز كود يحدث البيانات اتوماتيك يعني عندما اغير بيانات في ( ملف وتحريري نصف العام صف رابع ) يتغير في شيت (سجل) ارجو الأهتمام ولكم جزيل الشكر ووافر الاحترام razan.xlsm
  22. هل من مجيب ؟ محتاج المطلوب ضروري أين استاذنا الكبير إبراهيم ؟
  23. شكرا جزيلا لحضرتك وربنا يجعله في ميزان حسناتك ولكن محتاج شيت كنترول رئيسي الصف الخامس الابتدائي 2022 الترم الثاني يكون مشروح فيه المعادلات المستخدمة لدرجات للمواد الدراسية لاني أريد أعرف كيف تحسب ربع الدرجة في امتحان آخر العام لجميع المواد
  24. إخواني الأعزاء خبراء المنتدي السلام عليكم ورحمة الله وبركاته محتاج شيت كنترول رئيسي الصف الخامس الابتدائي 2022 الترم الثاني يكون مشروح فيه المعادلات المستخدمة لدرجات للمواد الدراسية ارجو الاهتمام لاني محتاجه ضروري ولكم جزيل الشكر ووافر الاحترام
  25. انا أسف يا أستاذ إبراهيم أتمني أن يتسع صدرك .. انا عايز لما أطبع الشهادات تتغير الشهادة مع الصورة علي حسب رقم الجلوس زي ما حضرتك ذكرت أو بالاسم ,,شكرا لحضرتك
×
×
  • اضف...

Important Information