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

سليم حاصبيا

أوفيسنا
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    8,723

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

  • Days Won

    262

 نوع المحتوي 

كل منشورات العضو سليم حاصبيا

  1. سليم حاصبيا
    في اي صفحة جديدة املأ الصف من A1 الى اي حلية تريد (Z1 مثلاً ) بأي بيانات و قم بتنفيذ هذا الكود اذا كنت تريدها معادلات سأعمل على ذلك Sub list_to_one_col() laste_col = Cells(1, Columns.Count).End(xlToLeft).Column Do Cells(m + 3, 1) = Cells(1, k + 1) m = m + 1: k = k + 1 Loop Until k = laste_col End Sub
  2. سليم حاصبيا
    مع كل التقدير والاحترام الى الاخ ابو عبد الباري تطوير بسيط على الكود في المرفق Salim_توزيع الأعمدة على الصفوف.rar
  3. سليم حاصبيا
    اضف هذا السطر البسيط الى الكود مباشرة بعد السطر الاول (ليصبح هو الثاني) On Error Resume Next
  4. سليم حاصبيا
    جرب المرفق Bord.rar
  5. سليم حاصبيا
    استبدل كلمة selection باسم النطاق ليصبح الكود هكذا Sub show_borders() With sheets("sheet1").Range("a2:d10").Borders .LineStyle = xlNone .LineStyle = xlContinuous End With With sheets("sheet1").Range("a2:d10").SpecialCells(xlCellTypeConstants, 23).Borders .LineStyle = xlContinuous .Weight = xlThin End With End Sub
  6. سليم حاصبيا
    اكتب هذه المعادلة =SUM('1:31'!A1)/COUNT('1:31'!A1) حتى تقتنع بوجهة نظرى اليك هذا المثال انظر الى الصفحة total Book1 salim.rar
  7. سليم حاصبيا
    بعد اذن اخي عبد السلام كود مختصر Sub show_borders() With Selection.Borders .LineStyle = xlNone .LineStyle = xlContinuous End With With Selection.SpecialCells(xlCellTypeConstants, 23).Borders .LineStyle = xlContinuous .Weight = xlThin End With End Sub
  8. سليم حاصبيا
    يمكنك العمل على هذا الملف كبداية الصفحة الاولى توزيع افقي (حاول تغديل الرقم في الخلية J1 أو K1 ) الثانية توزيع عامودي Distribute Hor_or_Ver.rar
  9. سليم حاصبيا
    قم بما يلي 1-حدد الخلية المراد العمل عليها 2 -اضغط ( Alt + DL ) تظهر لك نافذة 3-اختر من هذه النافذة Input Message 4-في خانة Title اكنب العنوان الذي تريد (في هذه الحالة تلميح) 5- في خانة Input Message اكتب ما نريد ان يطهر لك عند تحديد الخلية 6- أصعب عملية وهي الضغط على Ok
  10. سليم حاصبيا
    تم معالجة الامر بالنسبة الى السؤال الثاني انظر الى الورقة الثانية first_sec semester 1.rar
  11. سليم حاصبيا
    تم معالجة الامر معادله IF correction.rar
  12. سليم حاصبيا
    يمكن ان يكون ما تريد (مثال)؟؟ max_min_price.rar
  13. سليم حاصبيا
    جرب هذه المعادلة =IF(SUMPRODUCT(--($I$7="غ"),--($R$7="غ"),--($AJ$7="غ"),--($BZ$7="غ"),--(OR($B$12=ROW($A$1:$A$5))))=1,1,"ERROR")
  14. سليم حاصبيا
    يمكن ان يكون ما تريد تم استبدال الملف لان الجهاز رفض التعامل معه (يحتوي على فيروس) first_sec semester.rar
  15. سليم حاصبيا
    يمكنك استعمال هذه المعادلة كمثال(تتجاهل الفراغات و النصوص) أصلاً الدالة Sum تتجاهل الفراغات و النصوص =SUM($A$1:$A$100)/SUM(IF(COUNTIF($A$1:$A$100,"<>")*ISNUMBER($A$1:$A$100),1))
  16. سليم حاصبيا
    نستطبع ان تجمع هذه الخلايا و تقسم المحموع غلى 31
  17. سليم حاصبيا
    من خلال حماية الورقة
  18. سليم حاصبيا
    جرب هذا الملف كنموذج facteur_electrique advanced.rar
  19. سليم حاصبيا
    ليس من الضروري ذلك
  20. سليم حاصبيا
    نم التعديل حسب ما تريد مقارنة salim Changed.rar
  21. سليم حاصبيا
    جرب هذا الملف مقارنة salim.rar
  22. سليم حاصبيا
    جرب هذا المرفق Test3 salim.rar
  23. سليم حاصبيا
    جرب هذا الملف (بعد اذن اخي ابو عبد الباري) masarif.rar
  24. سليم حاصبيا
    ربنا يخليك احي ياسر و الحمدلله غالسلامة وحشتنا أوي يا راجل فينك انت بقى (يمكن تكون امتحانات الثانوية العامة زي ما انا كنت مشغول فيها) اضافة بسيطة على الملف column_number 1.rar
  25. سليم حاصبيا
    جرب هذا الملف list_by_letters.rar
×
×
  • اضف...

Important Information

  I accept