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

ibn_egypt

الخبراء
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    764

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

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

  • Days Won

    18

 نوع المحتوي 

كل منشورات العضو ibn_egypt

  1. ibn_egypt
    من قائمة ملف ( او زر الاوفيس في 2007 ) File خيارات Options خيارات متقدمة Advanced في الاسفل قم بإزالة علامة الصح بجانب " تجاهل التطبيقات الأخري التى تستخدم تبادل البيانات الديناميكي DDE تحياتي
  2. ibn_egypt
    اخى الفاضل تفضل .. مرفق الملف به طلبك تحياتي data.rar
  3. ibn_egypt
    اخى الفاضل استبدل الكود الموجود في حدث ListBox1_DblClick بهذا الكود .. وان شاء الله تزبط معاك If Me.ComboBox1.ListIndex = 0 Then Me.TextFind1.Value = Me.ListBox1.Column(0) Else Me.TextFind2.Value = Me.ListBox1.Column(0) End If Me.ListBox1.Visible = False تحياتي
  4. ibn_egypt
    حتى يتفضل أ.حسام بحل هذه المشكلة اضغط End ثم اغلق البرنامج ... ستظهر رسالة حفظ أو عدم حفظ ... اختر حفظ وحدد مسار اخر بالجهاز وافتحه من المسار الذى تم حفظه به .. سيفتح معك تحياتي
  5. ibn_egypt
    طب مش هنقولك رأينا بقي الا في 01/01/2015 الساعة 12ص .. هههههه حبيبي أ.حسام ، كل سنة وانت طيب أولاً وسنة جديدة سعيدة عليك وعلينا وعلى أعضاء المنتدي الكرام وعلي الامة الإسلامية .. اللهم آمين أكيد عمل رائع من أستاذ قدير ومبدع وجزاك الله خيرا لمشاركتنا مثل هذه الأعمال القيمة .. ادعوا الله أن يجعل عملك في ميزان حسناتك تقبل تحياتي
  6. ibn_egypt
    اخى الفاضل جرب المرفق .. تغيير حجم العمود ولكن ليس على قدر حجم الكلمة ولكن بحجم مسميات الأعمدة والموجودة اعلى كل عمود ربما يفي بالغرض اعمل عرض المسمي للعمود على عرض اكبر اسم عندك .. هتزبط معاك تحياتي ListBox-Width.rar
  7. ibn_egypt
    اخى الفاضل الجموعي جرب الملف المرفق لربما به طلبك تحياتي data.rar
  8. ibn_egypt
    اخى الفاضل أ.ياسر ليس بجديد عليك مثل هذه الأعمال الرائعة .. عمل ممتاز وبداية جميلة جزاك الله كل خير وان شاء الله سنحاول قدر المستطاع الإضافة اليه .. ادعوا الله ان يجعله في ميزان حسناتك خالص تقديري واحترامى استاذي الفاضل
  9. ibn_egypt
    اخى الفاضل لديك طريقتين لتفادي ذلك الأولى أن تجعل المعادلة بالشكل التالي =IF(AND(U14<>"",T14<>""),((U14-T14)/(T14*100)),"") والثانية ان تجعلها بالشكل التالى =IFERROR((U14-T14)/(T14*100),"") خالص تحياتي
  10. ibn_egypt
    اخى الفاضل من تبويب تخطيط الصفحة Page Layout ... ازل علامة الصح الموجودة بجانب عرض خطوط الشبكة .... او ال Gridlines ومن نفس التبويب .. ستجد كلمة BackGround او الخلفية .. اختر الصورة التى تريدها .. تحياتي
  11. ibn_egypt
    اخى الفاضل اسهل طريقة لعمل ذلك هي الفرز المخصص .. ازاى ... الصف الاول اللى انت ادرجته بالاعلى ده بدل ما تكتب فيه الاسماء مرة ثانية اكتب فوق كل عمود رقمه الجديد اللى انت عاوزه زي الصورة دي بعد كده حدد الجدول كامل وروح لفرز ( فرز مخصص ) Sort-Custom Sort واتبع تعليمات الصورة دي ... هتلاقي الاعمدة اترتبت بنفس الترتيب اللى انت رقمته .. وابقي احذف الصف الاول بعد الترتيب تحياتي
  12. ibn_egypt
    اخى الفاضل السلام عليكم ورحمة الله وبركاته قم باضافة السطر التالى فقط في حدث UserForm_Initialize ... حيث أن شريط التمرير الأفقي مرتبط بعرض الأعمدة الموجودة Me.ListBox1.ColumnWidths = 50 تحياتي LISTBOX.rar
  13. ibn_egypt
    أخى الفاضل تم التعديل ... برجاء عدم حذف القيمة الموجودة في الخلية A1 نهائيا فهى التى تحتوى على اسم الملف تحياتى Invoice-Update.rar
  14. ibn_egypt
    اخى الفاضل جرب هذه المعادلة في الخلية C2 =IFERROR(IF(AND(B2<>"",VALUE(B2)>=0),"مستمر","انتهي"),"") تحياتي
  15. ibn_egypt
    هههههههههههههههه...اهو مساعدة وخلاص أ.سليم جديدة دى
  16. ibn_egypt
    اخى الفاضل اجعل المعادلة بهذا الشكل لاخفاء اى خطأ ناتج من المعادلة =IF(A2<>"",TRUNC((A2-$E$1))&" ","") تحياتى
  17. ibn_egypt
    تفضل أخى ابا اسماعيل مرفق الملف بعد التعديل ... تحياتي Invoice.rar
  18. ibn_egypt
    أخى الفاضل تستطيع التغيير في الكود لينسخ النطاق الذي تريده وتستطيع ايضا تحديد النطاق الذي تريد البيانات به .. تحياتي
  19. ibn_egypt
    اخى الفاضل لا اعلم اى تاريخ تريد اضافته للإسم، هل تاريخ الفاتورة ام تاريخ اليوم .... تفضل تم اضافة تاريخ اليوم لإسم الفاتورة تحياتي Invoice.rar
  20. ibn_egypt
    اخى الفاضل أبا اسماعيل تم عمل المطلوب باضافة زر Backup اسفل الحذف .. بمجرد الضغط عليه يتم انشاء نسخة احتياطية من شيت الفاتورة باسم الزبون في المسار C:\ExcelBackup لايلزم ان تقوم بانشاء المجلد فاذا لم يكن موجودا الكود يقوم بانشائه بالنيابة عنك تحياتي Invoice.rar
  21. ibn_egypt
    اخى الفاضل جرب الملف المرفق ... طريقتين في الحل واحدة بمعادلة اخرى والثانية بالكود تحياتي total.rar
  22. ibn_egypt
    أخى الكريم أ.ابراهيم من بعض ما عندكم استاذي القدير .. فما وصلنا الى ما نحن فيه الا بفضل من الله وفضل أساتذتنا الكرام هنا تحياتي وتقديري
  23. ibn_egypt
    أخى الفاضل تفضل الملف المرفق ... لربما به طلبك ... تم افتراض ان جميع الملفات ستكون موجودة بالمسار D:\New يمكنك تغييره بداخل الكود.... وان النطاق الذي سيتم نسخه من جميع الملفات هو من B3:G8 تحياتى GetData.rar
  24. ibn_egypt
    أخى ابا الحسن والحسين ينفع طيب نكون شغالين كل حاجة بكود برمجى من اول ادخال أوامر البيع والشراء مرورا بانشاء صفحات باسم كل شركة وتيجى تقولى لو عدلت يدوي ... مفيش حاجة اسمها يدوى فيه حاجة اسمها انك بتستخدم الفورم في ادخال اوامر البيع والشراء وترحل الاوامر لصفحة الشركة اذا كانت موجودة ... تمام يبقي نخلى الارصدة اللى في Co.Balance مرتبطة بالكود عند ترحيل اى امر لشيت الشركة يتعدل الرصيد للرصيد الجديد كما في المرفق لكن مفيش يدوى تحياتى برنامج الأسهم.rar
  25. ibn_egypt
    أخى الفاضل أبو حمزة جرب الملف المرفق لربما به طلبك .. حسب ما فهمت تحياتي serial.rar
×
×
  • اضف...

Important Information

  I accept