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

السلام عليكم في المرفق المعادلة المطلوبة في التذييل وفي الراس اختر ما تشاء توزيع_3.rar

السلام عليكم الشرطتين دي هي -1*-1 طيب لو ازلنا الشرطتين وغيرنا المعادلة بالشكل ده: =SUMPRODUCT((MONTH(INDEX(kh_range;0;1))=$A$4)*(INDEX(kh_range;0;3)=$A6);INDEX(kh_range;0;B$1)) حتكون مفهومة لك

السلام عليكم حدد الخلية التي تريد التنسيق الشرطي فيها من القائمة تنسيق / تنسيق شرطي ثم اتبع الخطوات في الصورة ادناه:

السلام عليكم اي معادلة بالصيغة التالية : [b1]=[b2] قيمة الصيغة اما True او False ولان الصيغة SUMPRODUCT تعامل إدخالات الصفيف غير الرقمية كما لو كانت أصفار. لتحويل القيمة True الى رقم صحيح موجب نضربها *-1=-1*-1=1 اما القيمة FALSE فهي قيمة صفرية عند ضربها في اي رقم=0

السلام عليكم اخي اريد ان تطلع على هذا العمل وهو من اعمالي وممكن تعمل فيه اكثر من دليل حسابات وهو من الاعمال الجميلة والحديثة ويمكنني ان اضيف التعديلات التي تريدها في هذا العمل باعتبارة العمل الاحدث ويتم البحث فيه بواسطة الكود http://www.officena.net/ib/index.php?showtopic=21063&hl= الاخ / MAHRD هويبحث في دليل حسابات تقوم تقوم بوضع اعداداته انت ثم عند اظهار النتيجة يقوم بوضعها في الخليه النشطه

السلام عليكم اعمل تحديد (سلكت) للأعمدة من بعد العمود Q الى آخر الشيت ثم اذهب الى تنسيق / عمود / اخفاء وبالنسبة للطريقة للصفوف

السلام عليكم نعم التعاون اخي عمر واخي محمد صالح واخي احمد يعقوب هذه مواطن كسب الاجر لان تنفيذ احتياج الناس في هذا الوقت والناس مشغولين باحتياجاتهم نبتغي من وراه لنا ولكم ولجميع المشاركين اجر كشف الكرب واستغاثة الملهوف وعون الناس فمن كان ففي عون اخيه كان الله في عونه ( بمعنى الاحاديث وليس سرد نصوص ) حسب ما اطلعت على المرفق فلنعطيه ما يريده تفضل الكود: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$L$3" Then For R = 7 To 14 If Cells(R, 10) >= [L3] Then Cells(R, 13) = "OK" ElseIf Cells(R, 10) = "" Then Cells(R, 13) = "" ElseIf Cells(R, 10) < [L3] Then Cells(R, 13) = "NO" End If Next End If End Sub ay-م44.rar

السلام عليكم من خصائص التاكست: AutoTab=True MaxLength=6 11111.rar

السلام عليكم الاخ / BLACK ================================================ تنبيه: موضوعك ده تكرر اربع مرات وبعناوين مخالفة ولقد قمت بدمجهم في موضوع واحد وتم تغيير العنوان ================================================ استخدم المعادلة التالية: =SUMPRODUCT(--(MONTH(INDEX(kh_range;0;1))=$A$4);--(INDEX(kh_range;0;3)=$A6);INDEX(kh_range;0;B$1)) واستخدم المعادلة التالية لتغيير اسم الشهر في الخلية A3: =CONCATENATE("مبيعات شهر ";TEXT(DATE(2009;$A$4;1);"mmmm");" لعملاء منطقه جنوب الصعيد لعام 2009") تفضل المرفق مهم.rar

السلام عليكم استخدم هذه المعادلة للتنسيق الشرطي =TEXT(D$3;"dddd")="الجمعة" تفضل المرفق work.rar

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

عمل رائع جدا جدا سلمت يداك و

السلام عليكم الاخ / علي الحساني -------حفظه الله كل الاعمال (---) هنا في المنتدى لوجه الله الكريم لا تحتاج في استخدامها لاذن من احد . استنفع منها ونحن لك من الشاكرين. ====================================================================== يجب ان تعرف ان هذا العمل يتلخص في الملف ( الصفحة الرئيسية) انسخ هذا الملف والصقه في الفايل الذي يضم ملفاتك الذي تريد البحث فيها افتح الملف وامسح الجدول القديم وقم باضافة المعلومات الجديدة فيه من اسماء الملفات وغيره مما هو معرف من عناوين وكده انتهت ىالحكاية وستبدا البحث في ملفاتك المعنونة ======================================================================

السلام عليكم عدد الصفوف لجدول الفصل 40 الافتراضية يمكنك الاختيار في E2 للتقليص من الصفوف اقل عدد 15 ======================== في الخلية D5 اختار النوع عدم الاختيار يعني اذا كانت الخلية فاضية يتم استدعاء النوعين تفضل المرفق تكوين فصول خاصة.rar

السلام عليكم اخي الحبيب/ خالد القدس ربنا يعطيك امثال دعائك اضعاف مضاعفة الاخ/ MOH الله اعلم لم افهم ما تعنيه من هذا السؤال

السلام عليكم الاخ / سكاي ----حفظه الله لا يمكن تسمية كودين بنفس الاسم ولكن يمكنك من خلال كود معين تشغيل عدة اكواد تفضل المرفق If Function in VBA.rar

السلام عليكم اخي الفاضل قصي حفظك الله واكرمك ============================ اخي الفاضل YAHIAO لازم تكون الملفات مفتوحه قبل دخول الفورم ويتم تكوين قائمة بها حتى تستطيع الاختيار منها فيما بعد من القائمة وانا عارف ستكون معك ملفات او كم اوراق في كل ملف انا اريد الملف يستخدم من الكل يقوموا بنسخ ملف الصفحة الرئيسية الى الفايل بتاعهم اكيد وصلت الفكرة( سيكون اسهل وامرن في الاستخدام) =============================================== اخي الفاضل/ خالد القدس -------حفظه الله كلامك حلو اخي الحبيب اكرمك الله واعطاك من الاجر اعظمه ================================= اخي الفاضل/ احمد يعقوب-------حفظه الله جزاك الله كل خير سرني مرورك تقبوا تحياتي وشكري

السلام عليكم اخي الفاضل/ خالد القدس-------حفظه الله اكرمك الله وده من حسن اخلاقك ولك بمثل دعائك اضعاف مضاعفة ========================= اخي الفاضل/ حسن-------حفظه الله اكرمك الله واثابك بمثل دعائك اضعاف مضاعفة تقبلا تحياتي وشكري

السلام عليكم Z = .Cells(10000, 2).End(xlUp).Row + 1 المعنى آخر صف في العمود رقم 2 ابتداءاً من الصف 10000 الى اعلى زايدا صف واحد. كود الترحيل: Sub kh_TR() Dim MyS As String Dim R As Integer, Z As Integer For R = 7 To 11 If MyS = "" Then MyS = Cells(R, 5) Else MyS = MyS & Chr(10) & Cells(R, 5) Next With ورقة2 Z = .Cells(10000, 2).End(xlUp).Row + 1 .Cells(Z, 2) = MyS End With End Sub تفضل المرفق ترحيل معين.rar

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

السلام عليكم شرط الحذف : If Sheets("ورقة1").Cells(Z, 6) = ComboBox1.Text Then بعدالحذف يتم اعادة تغيير بيانات القائمة من جديد ملاحظة : من اجل ظهور بيانات القائمة فقط في تاكست الكومبكس في خصائص الكومبكس Style = 2 combox.rar

السلام عليكم تفضل المرفق قائمة كمبوكس.rar

السلام عليكم وده مرفق آخر لعمل سابق فيه حساب الفرق بين تاريخين بالمعادلات قد تستفيد منه ايضا حساب فرق بين تاريخين بالمعادلات.rar

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