محمد الورفلي1
-
Posts
1100 -
تاريخ الانضمام
-
تاريخ اخر زياره
نوع المحتوي
التقويم
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو محمد الورفلي1
-
السلام عليكم اريد تصحيح معادلة countif على ان تجمع بشرطين عدد ذكود كل مدرسة واناث كل مدرسة مجموع.rar
-
اطلعت عليه لكن كان كثر الردود من الاعضاء في المنتدي شتت الموضوع واعتقد انه كان فقرة في في علم البرمجة ما اقصدة استاذ ياسر ان يكون موضوع بالحلقات فقط بجميع اشكالها متى ما تسنى لك وقت وشكراً مره اخرى
-
استاذ ياسر ما الذي يرمز له رقم 17 ورقم 32 For i = 17 To 32
-
السلام عليكم استاذ ياسر شكراً بارك الله فيك ممكن شرح وافي لموضوع الحلقات التكرارية فقط ::: في موضوع منفصل طلباً من فضلك شكراً استاذ سليم ياريت يكون هناك شرح لهذا الدرس الحلقات التكرارية او حتي شرح للكود حتى نفهم ما يكتب لنا
-
السلام عليكم اريد اختصار لهذا الشكل Private Sub UserForm_Activate() Label17 = [c3] Label18 = [c4] Label19 = [c5] Label20 = [c6] Label21 = [c7] Label22 = [c8] Label23 = [c9] Label24 = [c10] Label25 = [c11] Label26 = [c12] Label27 = [c13] Label28 = [c14] Label29 = [c15] Label30 = [c16] Label31 = [c17] Label32 = [c18] Label37 = [d3] Label38 = [d4] Label39 = [d5] Label40 = [d6] Label41 = [d7] Label42 = [d8] End Sub 10.21.rar
-
السلام عليكم بعد المحاولات تم التوصل الي الحل وهذا الملف لعدد 10 لتعم الفائدة شكراً للاستاذ سليم والاستاذ ياسر 10.2.rar
-
السلام عليكم شكراً على الحلول الجميلة في حالة كان لدي عشر ين اسماء مختلفة من محمد 1 الي محمد20 ماذ اغير في الكود حتى يتم جمع القيم لكل شخص Private Sub UserForm_Activate() Dim i As Integer For i = 6 To 10 Me.Controls("label" & i - 5).Caption = Range("l" & i - 3) Me.Controls("label" & i).Caption = Evaluate(Application.WorksheetFunction.SumIf(Range("B2:B11"), Me.Controls("label" & i - 5).Caption, Range("C2:C11"))) Next i End Sub
-
السلام عليكم اريد الجمع بشرط يتم جمع جميع القيم لكل شخص مثلاً الاسم القيمة محمد1 = 5 محمد2 = 3 محمد1 = 1 محمد2 = 4 محمد1 = 2 في الليبل في الفورم يتم جمع كل القيم لكل شخص الليبل الذي يخص محمد1 = 8 10.rar
-
السلام عليكم شكراً استاذ ياسر المطلوب هو ما ادلي به استاذ ياسر لكن فكرتك جميلة جداً .. ادراج العدد والاسماء هل ممكن ادراج الاسماء كا جدول salim 10.rar
-
السلام عليكم اريد جمع عدد من الاسماء في عمود واظهار النتائج في Label على فورم 10.rar
-
اعتراض الحماية لتنفيذ الماكرو اعتراض الحماية لتنفيذ الماكرو
محمد الورفلي1 replied to samycalls2020's topic in منتدى الاكسيل Excel
السلام عليكم جرب بهذا الشكل علي اعتبار الرقم السري 123 Sub WW() ActiveSheet.Unprotect "123" ActiveSheet.Range("$D$6:$K$27").AutoFilter Field:=1 ActiveSheet.Protect "123" End Sub -
شكراً استاذ ياسر
-
السلام عليكم ارقام موجبة فقط في تيكست بوكس اريد عندما تكون النتيجة في التكسيت 3 = -8 تعطي نتيجة 0 يعني الظهور للارقام الموجبة فقط 10.rar
-
السلام عليكم تمام اريد شرح حتي استخدمها في شكل آخر ما معني cint ولماذا وضعت التكست 1 بين الاقواس If CInt(TextBox1)
-
السلام عليكم اريد تصحيح If TextBox1 > TextBox2 Then TextBox3 = "منتظم" If TextBox1 < TextBox2 Then TextBox3 = "متأخر" المشكلة عند وضع رقم 12 في التكست 1 وعند وضع رقم 2 في التكسيت 2 يظهر الناتج في التكسيت 3 "مـتاخر" وهذا خطاء لان المفروض القيم في تكست 1 اكبر من القيمة في تكسيت 2 والنتيجة الصحيحة هي "منتظم" اكبر واصغر.rar
-
Private Sub Workbook_Open() With ورقة1 Range("E6").Select ActiveCell.FormulaR1C1 = Date End With End Sub اولاً لتوجد اي شدة في اللهجة فقط احبب ان استفهم لاني لم افهم قصدك جيداً علي العموم غير الكود السابق بهذا اخيرا لايكلف الله نفساً الا وسعها
-
السلام عليكم استاذ سامي اعتقد انه لابد من وجود الكود في حدث الورقة ThisWorkbook س: ما المانع من وضع الكود في حدث الورقة ThisWorkbook
-
لقد حاولت ولم افلح في طلبك إذا كان هناك كود في صفحة ThisWorkbook يمكن الدمج بين الكودين
-
اريد الفارق بين تاريخيين تكست بوكس
محمد الورفلي1 replied to محمد الورفلي1's topic in منتدى الاكسيل Excel
شكراً استاذ سليم -
السلام عليكم انظر الي المرفق تاريخ اليوم.rar
-
السلام عليكم اريد الفارق بين تاريخيين عن طريق الكود يعني طرح التاريخ الثاني من الاول 222.rar
-
السلام عليكم تم الحل بقضل الله وضعته لتعم الفائدة وليستفيد منه شخص آخر نضع هذا الكود في الكوماند (1) Private Sub CommandButton1_Click() If IsDate(TextBox1.Value) Then TextBox2.Value = Format(DateAdd("m", TextBox3.Value, TextBox1.Value), "yyyy/mm/dd") End Sub
-
للرفع
-
كيف استطيع احصل على كشف بالاستعلام بتاريخ الاستحقاق
محمد الورفلي1 replied to aaa3.com's topic in قسم الأكسيس Access
السلام عليكم الملف معطوب حاول انزال الملف مره اخرى -
للرفع