اذهب الي المحتوي
أوفيسنا

عبدالله بشير عبدالله

الخبراء
  • Posts

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

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

  • Days Won

    52

كل منشورات العضو عبدالله بشير عبدالله

  1. وعليكم السلام ورحمة الله وبركاته جرب الكود في الملف المرفق 1الجرد.xlsm
  2. اعلم هذا وواضح بالملف وعملت في قطاع التعليم التقني والتوجيه الفني 39 سنة واعلم جيدا كيف عمل اللجان لم يكن الامر يتطلب كل هذا على كل حال عودة للملف اليك الملف بالتعديل الاخير مراقبة_ تحويل اللجان الى أسماء.xlsm
  3. الملف الذي ارفقته فكرته واضحة وهو ليس بنفس فكرة ملفك تحويل اللجان الى اسماء لسبب بسيط ملقك الاخير تحويل الارقام الى اسماء كل اسم له رقم فريد بمعنى لا يحمله اسم اخر ملفك الاول تحويل اللجان الى اسماء الرقم يتكرر لاكثر من اسم تحويل المعادلات الى كود والكود لاستاذنا الفاضل عبدالله باقشير جعله الله في ميزان حسناته تحويل الارقام الى اسماء.xlsb
  4. اليك ما طلبت بالتنسيق الشرطي aaaa2.xlsm
  5. اليك التعديل حسب طلبك الاخير مع ملاخظة ان :- صفوف الأسماء تكون في الصفوف = 6، 8، 10، 12، 14… وهكذا وهي التي يتم تلوينها صفوف الرواتب او الاختيار من القائمة تكون في الصفوف= 7، 9، 11، 13، 15… وهكذا aaaa1.xlsm
  6. السلام عليكم تحية صباحية طيبة وبعد، عزيزي الفاضل، اعلم أن هدفك هو تحويل الأرقام إلى أسماء، وهو موجود من عنوان مشاركتك وردودك المتتابعة. لكنني أواجه صعوبة في المضي قدماً؛ لأنك لم تحدد المعايير الدقيقة لعملية التحويل، ولم تتفضل بالإجابة عن الأسئلة التي طرحتها عليك في الردود السابقة. أقر بعجزي عن استيعاب فكرة التحويل بوضوح، وربما تكون سنواتي الـ 63 قد جعلتني أجد صعوبة في استيعاب هذا الأمر. لذلك، أعتذر عن عدم قدرتي على إفادتك في هذا الطلب. أتمنى من الأخوة الأعضاء والخبراء الذين استوعبوا آلية العمل أن يقدموا المساعدة اللازمة لك. مع خالص التقدير.
  7. ليس هناك ما يستوجب الاعتذار اخي العزيز كلنا اسرة واحدة بالمنتدى بالنسبة لي ساعة وانا احاول فهم الية تحويل الارقام الى اسماء المراقبين بالجدول الثاني ولم اصل الى نتيجة تتبعت الاسهم انت اخترت 4 من العمود C ومنها س7 . لماذا لم تختار 4 التي تحتها وتبقى س8 ؟ بمعنى ما المعيار الذي جعلك تختار 4 الاولى دون الثانية ؟ س5 في الفترة 7 في الجدول الايسر كيف جاءت ؟ الارقام في الاعمدة C و O ما هي ؟ هل هي فترات كما في في عناوين العمودين ؟ كتبت س1 الفترة الثانية امام س1 في العمود N في الجدول الثاني ارجو التوضيخ بالمختصر لم اجد رابط او معيار مشترك يجعلنى افهم الية فكرة التحويل ارجو شرح الفكرة بوضوح اكثر
  8. السلام عليكم ورحمة الله وبركاته أخانا الفاضل، بلانك ملاحظة وُدّية بسيطة بخصوص عنوان مشاركتكم ، ونثق تمامًا أنها صدرت عن غير قصد. (عذراً للإخوة المشرفين على هذا التنويه، ولكن لمّا كان الأمر يخصّني قمت به من باب حرصنا على أن نكون أسرة واحدة في هذا المنتدى.) كل التقدير لتفهّمكم وتعاونكم المثمر دائمًا. قواعد المشاركة https://www.officena.net/Tips/Questions.htm بالنسبة للملف حقيقة لم افهم فكرة تحويل اللجان الى اسماء المراقبين بعد لذلك نأمل منكم : * اخفاء اي عمود ليس له علاقة بالتحويل وهل العمود N في الجدول الايسر والذي به اسماء المراقبين له علاقة بالتحويل ام ان العمود O والذي به ارقام اللجان هو المعتمد للتوزيع . * قم بارفاق ملف به عدد اربع او خمسة اسطر مكتوبة يدويا كاملة للفترات 9 بالجدول الايسر لفهم فكرة تحويل اللجان الى اسماء المراقبين . *اعتقد ان شيت DATA1 هو المطلوب فيه التحويل واعتقد ان القائمة المنسدلة ليس لها علاقة بالتحويل ارجو تاكيد الامر او نفيه. لك كل التقدير والاحترام
  9. وعليكم السلام ورحمة الله وبركاته جرب هذا تسلسل ملئ بيانات الفورم1.xlsm
  10. وعليكم السلام ورحمة الله وبركاته جرب الملف المرفق تسلسل ملئ بيانات الفورم.xlsm
  11. وعليكم السلام ورحمة الله وبركاته خمل المرفق به مثال لتحويل نطاق نطاق معين محدد بالماوس الى pdf pdf1.xlsb
  12. قمت بالتجربة الملف يعمل جيدا تاكد من الماكرو مفعل لوجود كود في حدث الورقتين لا توجد قائمة بل عليك الكتابة باي حروف للصنف
  13. السلام عليكم ورحمة الله وبركاته بعد اذن استاذنا الفاضل hegazee وحسب فهمى لطلب الاستاذ الفاضل Alien يمكنك الكتابة بالحروف الاولى للصنف او اي جزء من حروف الصنف الملف به عدد 2 شيت وكل شيت طريقة حل Bookhisto (2) (4).xlsb
  14. السلام عليكم لم توضخ خلية البحث G1 لها علاقة بالتوزيع ام لا فيكون التوزيع فردي ام للكل على كل حال الملف فيه عدد 2 شيت الاول شيت DATA يقوم بالتوزيع الفردي للمراقب وذلك بالاختيار من الخلية G1 الثاني شيت DATA1 به كود يقوم بتوزيع اللجان على كل المراقبين جرب الملف المرفق متمنيا ان يكون فيه طلبك ملاحظة1_2026.xlsm
  15. السلام عليكم ورحمة الله وبركاته لا مشكلة اخي الفاضل جرب التعديل التالي sa1 (2).xlsb
  16. السلام عليكم ورحمة الله وبركاته الان وضحت الفكرة بارك الله فيك تم عمل كمبوبوكس به اسماء الموظفين الازار المرقمة قي القورم اكوادها موحودة كما هي اعتقد بعد الكمبوبوكس لم تعد في حاجة اليها ان اردت الغائها فابلعنى جرب الملف وان كنت تحتاج الى تعديل في الفورم فابشر تحياتى لك حضور وخروج موظفين.xlsm 4495.xlsm
  17. وعليكم السلام ورحمة الله وبركاته اليك الحل بطريقتين الاولى - بالتنسيق الشرطي Sheet1 اللون الاحمر =AND(A1<>""; OR(A2=""; A2=0)) اللون الاخضر =AND(A1<>""; A2<>""; A2<>0) الثانية - كود في حدث الورقة SHEET2 Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("A2:ZZ2")) Is Nothing Then Dim r As Range For Each r In Intersect(Target, Range("A2:ZZ2")) If r.Offset(-1, 0).Value <> "" Then If r.Value <> "" And r.Value <> 0 Then r.Offset(-1, 0).Interior.Color = vbGreen Else r.Offset(-1, 0).Interior.Color = vbRed End If Else r.Offset(-1, 0).Interior.ColorIndex = xlNone End If Next r End If End Sub الملف sa1.xlsb
  18. اذا كنت تعنى بارفاق ملف العمل الملف السابق في مشاركتك الاولى النطاق A1-A20 به معادلة ترقيم وليس اسماء او اكواد موظفين وان كنت تعنى بارفاق ملف العمل ملف جديد اخر فلا يوجد اي ملف في ردك الاخير تحياتي
  19. وعليكم السلام ورحمة الله وبركاته سبب الخطا عدم وجود رابط بين اللست والشيت في الكود يوجد عمود مخفى في ListBox وهو الرابط بين الاختيار من اللست والشيت يعنى الاعمدة 10 للشيت +عمود مخفي في اللست =11 تم التعديل والغاء العمود المخفي في اللستبكس واستخذام مصفوفة تربط كل صف في الـ ListBox برقم الصف الحقيقي في الشيت. اليك الملف ليست بوكس 4.xlsm
  20. وعليكم السلام ورحمة الله وبركاته هل يمكنك التوضيح أكثر: ما هي القيم أو مصدر البيانات للقائمة؟ في انتظار توضيحك المفصل
  21. وعليكم السلام ورحمة الله وبركاته ليست هناك اي مشكلة ComboBox المزايا: يعرض قائمة جاهزة من القيم (مثل التواريخ الفريدة من العمود B). يمنع الأخطاء الإملائية أو إدخال صيغة خاطئة للتاريخ. المستخدم يختار فقط من القائمة → أسرع وأدق. عملي جدًا إذا كانت البيانات محدودة أو متكررة (تواريخ، أسماء، أصناف) TextBox عرضة للأخطاء (مثلاً كتابة التاريخ بصيغة خاطئة). يحتاج تحقق إضافي بالكود للتأكد أن القيمة صحيحة الملف المرفق به الخياران التكستبكس والكمبوبكس لك الخيار ما يتاسب عملك تحياتي ليست بوكس2.xlsm
  22. حسب التجربة المشكلة بالمنتدى شكرا لمتابعتك واهتمامك الافاضل حسونة حسين Foksh
  23. السلام عليكم ورحمة الله وبركاته تم استبدال TextBox1 بـ COMOBOX1 يتم فيه تجميع التواريخ من العمود B التواريخ في العمود B بالنظام الفرنسى جعلتها بالنظام dd/mm/yyyy عند التعديل استخدم زر خفظ التعديل اليك الملف ليست بوكس1.xlsm
  24. وعليكم السلام ورحمة الله وبركاته الى جانب الحلول التي ارفقها استاذنا الفاضل hegazee اليك حل اخر بالكود في حدث الورقة Private Sub Worksheet_Change(ByVal Target As Range) Dim rngF As Range, rngG As Range Dim rngB As Range, rngC As Range Dim pos As Variant Set rngF = Me.Range("F2") ' Set rngG = Me.Range("G2") Set rngB = Me.Range("B2:B1000") Set rngC = Me.Range("C2:C1000") If Not Intersect(Target, rngF) Is Nothing Then Application.EnableEvents = False pos = Application.Match(rngF.Value, rngB, 0) If Not IsError(pos) Then rngG.Value = Application.Index(rngC, pos) Else rngG.Value = "" End If Application.EnableEvents = True End If rngG.Select End Sub data.xlsb
  25. عذرا لم انتبه ان قي طلبك طباعة متعددة الطريقة الاولى زر print all اكتب كود الشركة بداية الطباعة في الخلية P2 ونهاية الطباعة في Q2 الطريقة السابقة لطباعة الارقام المتسلسلة وراء بعضها الطريقة الثانية عن طريق فورم زر طباعة خسب الاختيار وهي تغنيك عن كل الازرار وعن الطريقة الاولى حيث يمكن الطباعة لموظف واخد او الطباعة للكل او الطباعة المتعددة خسب الاختيار سواء الارقام متصلة ام منفصلة اختر ما تراه متاسب لطلبك مرتبات شركة نقل البضائع فنيين عن شهر نوفمبر 2025 (1).xlsm
×
×
  • اضف...

Important Information