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

السلام عليكم استخدم دالة OFFSET AVERAGE(OFFSET(C10:C59;COUNT(C60:C300);;50)) AVERAGE(OFFSET(C10:C18;COUNT(C19:C300);;9)) لتحديد النطاق المطلوب لحساب المتوسط انظر الى المرفق ان شاء الله يكون المطلوب اخوك خبور خير _________.rar

السلام عليكم الاخ محمد حفظه الله صح كلامك انا مقصر معاك في ما ذكرت والسبب النسيان وليس الاهمال وحقك علي انظر الى المرفق اذا كان هذا النموذج عجبك سنعمل عليه الترحيل والاستدعاء ان شاء الله اذا كان هناك في اضافات لديك لمعلومات اخرى في النموذج قم بها اخوك خبور خير __________1.rar

السلام عليكم استخدم الكود التالي : Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) Sh.Cells.Interior.ColorIndex = xlNone If Target.Cells.Count > 1 Then GoTo 1 For R = 2 To 6 With Cells(Target.Row, R).Interior .ColorIndex = 8 .Pattern = xlSolid End With Next 1 End Sub تفضل المرفق ان شاء الله يكون المطلوب خبور خير __________________.rar

السلام عليكم ورحمة الله وبركاته الاخ / محمد طنطاوي المحترم لا ادري اخي الحبيب سبب ذلك ؟؟؟؟ اخوك خبور خير __________.rar

اخي العزيز الموضوع يحتاج بعض الوقت لاقوم بذلك فقد طلب احدهم مثل طلبك هذا سنقوم بذلك ان شاء الله

السلام عليكم انظر الى المرفق ان شاء الله خبور خير ___________3.rar

السلام عليكم من سلسلة ملفات الترحيل سنبدأ بعمل برنامج مخازن اليكم البداية ادخال واخراج من المخزن السعر يتغير تلقائيا حسب تغيير السعر عند ادخال كميات جديدة الموضوع مفتوح لاستقبال الاقتراحات اخوكم خبور خير ___________1.rar

السلام عليكم ورحمة الله وبركاته مواصلة لسلسلة ملفات الترحيل اليكم هذا الملف طلب لاحدهم اخوكم خبور خير _____.rar

السلام عليكم ورحمة الله وبركاته اضغط هنـــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــا

السلام عليكم ورحمة الله وبركاته اخي اكرم الغامدي اكرمك الله وعافك تقبل شكري وامتناني

السلام عليكم انظر الى المرفق ان شاء الله يكون المطلوب اخوك خبور خير ___________.rar

السلام عليكم عملت لك مثال بتعادل الجميع مع الفرق في الشروط التي ذكرتها انظر الى الترتيب مرفق ملف اخوك / خبور خير _____.rar

السلام عليكم ورحمة الله وبركاته الاخ ابو اكرم الله يجزيك خيرا اخي الحبيب شكرا اخي الحبيب اطا لالله عمرك على طاعة الله الاخ اسلام حفظك ربي واكرمك وازال همك الاخ ابو عبدالله حفظه الله ولك مثل دعائك من فاطر السموات عدد خلقه ورضاء نفسه وزينة عرشه الاخ / بوماهر الله يجزيك خيرا اخي الحبيب ودمتم في حفظ الله و رعايته اخوكم خبور خير

الاخ / سلامه المحترم عفوا لتاخير الرد ستجد طلبك في موضوع جديد اضغط هنا خبور خير

السلام عليكم ملف للترحيل كان طلب احد الاخوة حبيت ان يراه الجميع لتعم الفائدة ومعرفة الميزات التالية اولا : ورقة الترحيل 1- اذا كانت لديك خلايا متفرقة و تريد جمعها في الكود باختصار Set myRng1 = Range("E6,I8,H6,B8,B10,I10,I11") 2- الفاتورة توجد فيها سبعة صفوف يتم انتقاء الصفوف التي اكبر من اصفر في خانة الاجمالي ليتم ترحيلها For E = 19 To 25 If Cells(E, 1).Value > 0 Then Y = Y + Cells(E, 1).Count End If Next 3- مسح قيم الخلايا بعد الترحيل حتى لو كانت الخلايا مدموجة ولا توجد بها صيغ myRng1.Cells.SpecialCells(xlCellTypeConstants).ClearContents ثانياً: ورقة البيانات تلوين الصف الاول من كل عملية ترحيل للفصل بين البيانات Range("A" & N & ":R" & N).Interior.ColorIndex = 8 اخوكم / خبور خير ____________.rar

السلام عليكم [A23].NumberFormat = "B2mmmm" خبور خير

السلام عليكم بارك الله فيك اخي اسامة

السلام عليكم الله يبارك فيك شكرا جزيلا

السلام عليكم انشاء قائمة من عمودين الموضوع خاص بالمشاركة http://www.officena.net/ib/index.php?showtopic=21031 ولكن حبيت ان تعم الفائدة للجميع اخوكم خبور خير ___________________.rar

السلام عليكم انظر الى الرابط http://www.officena.net/ib/index.php?showtopic=21110 ان شاء الله يكون المطلوب اخوك خبورخير

السلام عليكم بارك الله فيك اخي ابو عبدالله

السلام عليكم تفضل مرفق مشابه لمعطياتك ومرفق استخراج من البيانات الاصل ان شاء الله يكون المطلوب اخوك خبور خير _____.rar _____1.rar

السلام عليكم اخي العزيز ارجو المعذرة فلم اتوصل الى حل الى الوقت الحالي اخوك خبور خير

السلام عليكم تفضل ان شاء الله يكون المطلوب _____1.rar

السلام عليكم انظر الى المرفق ان شاء الله يكون المراد اخوك خبور خير ________1.rar