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

نايف - م

03 عضو مميز
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    343

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

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

 نوع المحتوي 

كل منشورات العضو نايف - م

  1. نايف - م
    شرح ممتاز - بسيط و واضح شكرا
  2. نايف - م
    الملف لا يعمل عندي
  3. نايف - م
    أخي الكريم طلبي لا يمكن تضمينه في ملف لكن شرحته بالتقصيل شكرا
  4. نايف - م
    أخي الكريم : يبدو أني غلبتك بطلباتي المهم حصلت على أجابة من موقع أجنبي و كان الكود فاعل : s = TextBox7.Text If TextBox7.Text = "" Then 'nothing typed Exit Sub End If For i = 0 To ListBox1.ListCount - 1 'use the LIKE operator to compare 'convert both to Uppercase as well so case does not matter 'set the Selected(i) property for each row in the list ListBox1.Selected(i)=(UCase(ListBox1.List(i, 0)) Like UCase(s) & "*") flg = flg Or ListBox1.Selected(i) Next i If Not flg Then MsgBox "Not in the list" لكن بقيت خطوة إن أمكن حلها الكود في حال وجود أكثر من نتيجة يختار آخر نتيجة أنا أريد عند الضغط مرة أخرى على الزر أن ينتقل للنتيجة التالية و هكذا شكرا
  5. نايف - م
    تمام يا أخي الكريم لكن المطلوب و بما أن عدد الأعمدة كثير - البحث عن قيمة بعمود آخر و ليكن عمود الأسم ليس الرقم
  6. نايف - م
    أخوتي عندي يوسرفورم فيه : 1- ليست بوكس فيه عدة أعمدة 2- تكست بوكس 3 - زر أمر البيانات في الليست بوكس كثيرة هل يمكن البحث ضمن الليست بوكس بحثا عن قيمة أحددها في التكست بوكس بحيث يتم الأنتقال لهذا السطر الذي يحتوي القيمة المبحوث عنها بحثت في المنتدى عن مشاركات بهذا الخصوص فلم أجد شكرا
  7. نايف - م
    شكرا عالردود لكن ما في و لا مشاركة بتعلم كيف منغير الصوت اللي بتم فيه القراءة حدا ممكن يساعد
  8. نايف - م
    شكرا شكرا سأبحث فورا بحثت سابقا عن Speech.Speak و لم أجد نتيجة
  9. نايف - م
    أما من مجيب وااااااااااااا أحباء
  10. نايف - م
    السلام عليكم يمكن للأكسيل أن يقرأ الكلمات الموجودة بالخلية باللغة الأنكليزية بالأمر البرمجي Speech.Speak الأستفسار 1- هل يمكن قراءة الكتابة العربية 2- هل يمكن تغيير الصوت الذي تتم به القراءة علما أنه يوجد برامج يتم من خلالها تغيير الصوت مثل e speak لكن في الأكسيل لا أعلم
  11. نايف - م
    شكرا للأخ الحبيب ابن مصر ((فقد كان و مازال)) يشكل لنا عونا هاما في حل مشاكلنا التقنية
  12. نايف - م
    أخوتي شكرا لكما لهذه الحلول الناجحة
  13. نايف - م
    السلام عليكم : كيف أستطيع أن أجعل عنوان أو أسم زر أمر (( caption )) من عدة أسطر بمعنى لوكان يتألف من ثلاث كلمات و أرغب بوضعها في ثلاثة أسطر بدلا من وضعها بجانب بع بمعنى لوكان يتألف من ثلاث كلمات و أرغب بوضعها في ثلاثة أسطر بدلا من وضعها بجانب بعضها مثال : أنتقل للصفحة الرئيسية أريدها : أنتقل للصفحة الرئيسية
  14. نايف - م
    شكرا للرد بس الصورة ما عم تقبل تفتح شو العمل
  15. نايف - م
    طيب أخي استخدمت الكود التالي من وحي حلك و مشي الحال If Not Intersect(Target, Range("AP9:AP8000")) Is Nothing And Target.Count = 1 Then With ActiveSheet.Shapes("nyefhello") .Top = Target.Top + 20 .Left = Target.Left With .TextFrame2.TextRange.Characters .Text = Target.Value End With End With End If لكن ببعض الخلايا التي يوجد بها داتا كبيرة الشكل لا يتوسع تلقائيا ليحتويها ممكن كود شكرا
  16. نايف - م
    ماذا تعني هذه الرسالة عند القيام بعملية جمع باستخدام الكود
  17. نايف - م
    بالضبط هي المطلوب لكن أريدها باستخدام شكل يمكنني تنسيقه و تنسيق خطه إذا ممكن
  18. نايف - م
    أخي الكريم شكرا ل لطفك لكني لم أفهم رجاء عندي عمود AP9:AP8000 أريد عند الضغط على أي خلية أن يظهر محتواها بتلميح تماما كما فعلت حضرتك شكرا
  19. نايف - م
    شكرا للفكرة الحلوة بس إذا ممكن كيف استطيع أن أجعل الرسالة التلميحية تعطي قيمة الخلية التي أقف عليها استفيد هنا في حالة كانت الداتا في الخلية كبيرة
  20. نايف - م
    موضوع جميل و حرفي تمام شكرا أخي أبو تراب بارك الله بك
  21. نايف - م
    عمل جميل و مفيد بارك الله فيك
  22. نايف - م
    بالضبط - هو المطلوب بارك الله فيك و سلمت يداك و أدامك عزا لما قدمت لنا من خير
  23. نايف - م
    هذا ما اريده لكن بالكود والنتيجة بالتكست بوكس
  24. نايف - م
    بارك الله بجهودك
  25. نايف - م
    اريد الجمع بشرطين الاسم و شهر البيع والناتج في تكست بوكس ملف مرفق جمع بشرطين.rar
×
×
  • اضف...

Important Information

  I accept