نجوم المشاركات
Popular Content
Showing content with the highest reputation on 15 ينا, 2012 in all areas
-
السلام عليكم ورحمة الله ادخل المعادلة التالية في الخلية E8 واسحبها للاسفل: =IF(SUMPRODUCT(--(COUNTIF(OFFSET(F8:AJ8;;COLUMN(F8:AH8)-COLUMN(F8);;3);"غ")>2))>0;"الاشعار الأول";"") المعادلة تعمل على افتراض ان يوم الغياب هي الخلايا التي تحتوي على الحرف(غ) في امان الله1 point
-
السلام عليكم اخي ابو الحسن جرب هذا Sub Abu_Ahmed_NO() Dim Cl As Range LR = Range("A" & Rows.Count).End(xlUp).Row For Each Cl In Range("G2:G" & LR) If Cl.Value = "" Then Cl.Value = 0 Cl.NumberFormat = "0.00" End If Next End Sub1 point
-
السلام عليكم عذرا أخي انشغلت عن سؤالك فكرت لك في حل أفضل أضفت خاصية لزر (جلب البيانات كلها) تجعله يضع فواصل للصفحات بعد كل 11 إسم بالتتابع وبعدها تطبع مباشرة أنقر زر (جلب البيانات كلها) وشاهد النتيجة في المرفق Book1_TAREQ4.rar1 point