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

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

المشرفين السابقين
  • Posts

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

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

  • Days Won

    57

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

  1. اخي الحبيب/ بن عليه------حفظك ربي جزاك الله خيرا وبارك فيك واثابك بدعائك واعطاك بمثله اضعاف مضاعفة تقبل تحياتي وشكري
  2. اخي الحبيب/ عباس ------حفظك ربي جزاك الله خيرا وبارك فيك واثابك بدعائك واعطاك بمثله اضعاف مضاعفة آمين آمين آمين آمين تقبل تحياتي وشكري
  3. اخي الحبيب حمادة -----حفظه الله جزاك الله خيرا بالنسبة لااستفسارك يمكنك اولا ضبط مقاس العمود والصفوف للعمود اف حسب المقاس الذي تريده بعد حذف جميع الصفوف الموجوده حاليا وعند اضافة اي لون لاحقا سياخذ التعليق مقاس الخلية في العمود اف انا اخترت النعليق لانه كائن يحذف بحذف الخلية الموضوعه فيه اما عن الاضافة للخلية لا يصلح اي من الاكواد الناتجة لتغيير لون الخلية تقبل تحياتي وشكري
  4. اخي الفاضل ابو محمد-----حفظه الله جزاك الله خيرا تقبل تحياتي وشكري
  5. اخي الفاضل مجدي يونس----حفظك الله جزاك الله خيرا وبارك فيك تقبل تحياتي وشكري
  6. اخي الفاضل مجدي يونس----حفظك الله جزاك الله خيرا وبارك فيك تقبل تحياتي وشكري
  7. اخي الحبيب محمد----حفظك الله خبير المعادلات بجد جزاك الله خيرا تقبل تحياتي وشكري
  8. السلام عليكم دالة kh_IFERROR دالة بديلة للدالة IFERROR للاستخدام مع اوفيس 2003 Function kh_IFERROR(Value, Value_if_error) If IsError(Value) Then kh_IFERROR = Value_if_error Else kh_IFERROR = Value End If End Function تحياتي
  9. اخي الحبيب حمادة----حفظك الله انا لي الشرف بردك جزاك الله خيرا تقبل تحياتي وشكري
  10. السلام عليكم فورم اختيار لون معين ومزجه واستخراج الاكواد الخاصة به اذا اردنا لون معين نقوم بالبحث العشوائي عن هذا اللون اوما يقاربه ثم نقوم بالتغيير عليه من الارقام الخاصة RGB حتى نوصل الى ما نريده تماما الناتج: كود RGB كود HEX كود MSA ويمكنك الاحتفاظ بهذه المعلومات في الشيت من زر اضافة معمول بالاكسل وبالفيجول بيسك الاكسل 2003-2010 فورم تكوين الوان مع المعلومات.rar بالفيجوال بيسك: RGB TO HEX.rar في امان الله
  11. السلام عليكم لعبة تخمين الارقام قمت بتصميمها على الاكسل وهي لعبة معمولة بالويب لاخي محمد صالح وقد اضفت اليها اختيار الارقام بشكل عشوائي وطبقت عليها معلومة اخفاء نافذة الاكسل ولهذا الغرض تم تامينها كلمة السر : 1 المرفق 2003-2010 لعبة تخمين الارقام.rar
  12. ملحوظة : تم تعديل العنوان ليتوافق مع الطلب
  13. السلام عليكم اخي الحبيب حمادة احبك الله كما احببتني تقبل تحياتي وشكري
  14. السلام عليكم شكرا لك اخي حمادة ------حفظك ربي قد يحتاج للتعليق ولكن يغير في خصائص التعليق كما اوردته اعلاه يحدد التعليق ومن زر الفارة الايمن تنسيق تعليق خصائص يختار الخيار الاول نقل الخلايا وتغيير حجمها شاهد الصورة
  15. السلام عليكم السبب التعليقات الموجودة في العمود تي وهي عبارة عن كائنات مثلها مثل الازرار والصور وغيره تستوجب مساحة على الشيت لاظهارها او تغير تنسيقها من خصائص الكائن وتحفز على نقل الخلايا وتغيير حجمها في امان الله
  16. السلام عليكم فقط زيادة في الخير هذا سطر واحد يحقق المطلوب Me.ListBox1.List = Split(Sheet1.Range("A1"), Chr(10)) في امان الله
  17. النطاق Data انت مسميه الى آخر صف في الورقة 1048576 كم عدد صفوفه الفعلية التي ممكن تستخدمها مستقبلا ؟ غير العدد الى 20000 مثلا حتشتغل الدالة في امان الله
  18. جزاكم الله خيرا واثابكم بدعائكم واعطاكم بمثله اضعاف مضاعفة تقبل تحياتي وشكري
  19. اخي الحبيب محمدي ----حفظك ربي جزاك الله خيرا تقبل تحياتي وشكري
  20. السلام عليكم اخي محمود انت طيب واعمالك طيبة جزاك ربي خيرا تقبل تحياتي وشكري
  21. الاخ الحبيب/ عبدالله المجرب الاخ الحبيب/ دغيدي الاخ الحبيب/ احمد فضيلة
  22. السلام عليكم استبدل هذه الاكواد للفورم Private Sub CommandButton1_Click() Dim i As Integer '''''''''''''''' CommandButton1.Visible = False '''''''''''''''' With Me.MultiPage1.Pages For i = 0 To .Count - 1 If Val(.Item(i).Controls(0).Caption) Then kh_v i UserForm1.Printform End If Next End With kh_Start End Sub Private Sub kh_v(P As Integer) Dim i As Integer '''''''''''''''' With Me.MultiPage1.Pages For i = 0 To .Count - 1 If .Item(i).Index = P Then .Item(i).Visible = True Else .Item(i).Visible = False End If Next End With End Sub Private Sub kh_Start() Dim i As Integer, t As Integer '''''''''''''''' With Me.MultiPage1.Pages For i = 0 To .Count - 1 t = Val(Cells(i + 1, "A")) .Item(i).Controls(0).Caption = t .Item(i).Visible = t Next End With ''''''''''''''''''''''''''''' CommandButton1.Visible = True End Sub Private Sub UserForm_Activate() kh_Start End Sub المرفق 2003 طباعة في فورم لصفحات MultiPage.rar
  23. السلام عليكم يالنسبة للسؤال الاول امهلني شوية اما السؤال الثاني حسب علمي ان MultiPage صفحاتها حاوية مثل الفرمة ممكن تضيف بداخلها كائنات(ليبل,تاكست ,قائمة....الخ) وممكن تظهر وتخفي اي صفحة اما TabStrip تستخدم للاستدلال عن طرق تشغيل معينة لما بداخل الفورم من كائنات والله اعلم
  24. السلام عليكم شاهد المرفق طباعة في فورم لصفحات MultiPage.rar
  25. السلام عليكم حسب فهمي للطلب شاهد المرفق طباعة في فورم لصفحات MultiPage.rar
×
×
  • اضف...

Important Information