عبدالله باقشير
المشرفين السابقين-
Posts
4,796 -
تاريخ الانضمام
-
تاريخ اخر زياره
-
Days Won
57
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو عبدالله باقشير
-
السلام عليكم اخي الحبيب الخالدي...........حفظكم الله اضافة ممتازة جزاكم الله خيرا تقبلوا تحياتي وشكري
- 18 replies
-
- قائمة
- Validation
-
(و1 أكثر)
موسوم بكلمه :
-
السلام عليكم الشكر واصل للاخ الحبيب محمد أبو البراء والاخ الحبيب رجب جاويش وائراءا للموضوع هذا حل بواسطة معادلة ارجاع صفيف في المرفق معادلتين فقط الاولى في الخلية D2 عند التعديل حدد نطاق بدأً بخلية الصيغة D2 بعدد صفوف اكبر او يساوي خلايا نطاق البيانات في العمود C واضغط F2 لتحرير الخلية ثم اضغط CTRL+SHIFT+ENTER =IFERROR(INDEX(C:C;SMALL(IF((MOD(ROW(C2:C500);2)=1)*(C2:C500<>"");ROW(C2:C500);"");ROW()-1));"") والثانية في الخلية E2 عند التعديل حدد نطاق بدأً بخلية الصيغة E2 بعدد صفوف اكبر او يساوي خلايا نطاق البيانات في العمود C واضغط F2 لتحرير الخلية ثم اضغط CTRL+SHIFT+ENTER =IFERROR(INDEX(C:C;SMALL(IF((MOD(ROW(C2:C500);2)=0)*(C2:C500<>"");ROW(C2:C500);"");ROW()-1));"") المرفق 2010 الخلايا.rar
-
نسألكم الدعاء
عبدالله باقشير replied to أبو سجده's topic in المنتدى التقني العام و تطبيقات الأوفيس الأخرى
اللهم فك كرب المسلمين اجمعين في كل ملأ وفي كل حين -
نعم ممكن مع تعديل بسيط Private Sub CommandButton1_Click() Dim Cntl As Control Dim Txt As String For Each Cntl In Me.Controls If TypeOf Cntl Is MSForms.CheckBox Then If Cntl.Value = True Then Txt = Txt & IIf(Len(Txt), " - ", "") & Cntl.Caption End If End If Next Range("B2").Value = Txt End Sub تحياتي
-
سؤال بخصوص التدقيق التلقائى لخلايا الاكسل
عبدالله باقشير replied to amm830133's topic in منتدى الاكسيل Excel
السلام عليكم ورحمة الله وبركاته يمكنك ذلك بتحديد العمود كامل واضغط عل علامة التعجب في الخلية الاولى للتحديد حتظهر قائمة اختر تحويل الى رقم تحياتي -
السلام عليكم بالنسبة للطلب الاول جرب هذا الكود Private Sub CommandButton1_Click() Dim iNx As Integer iNx = Me.Index - 1 With UserForm1 .MultiPage1.Value = iNx .Show End With End Sub تحياتي
-
السلام عليكم جرب الكود التالي Private Sub CommandButton1_Click() Dim Cntl As Control Dim Txt As String For Each Cntl In Me.Frame1.Controls If TypeOf Cntl Is MSForms.CheckBox Then If Cntl.Value = True Then Txt = Txt & IIf(Len(Txt), " - ", "") & Cntl.Caption End If End If Next Range("B2").Value = Txt End Sub تحياتي
-
السلام عليكم لعبة ترتيب اجزاء الصورة هدية للاخ مجدي يونس بامكانية تغيير اجزاء الصورة في فولدر الملف بالنسبة للجزء الفارغ من الصورة اختياري وممكن حذفه او ابقائه باي اسم في فولدر الملف المرفق 2003 kh_imgemove.rar
-
كود عرض معلومات عن محركات الأقراص الثابتة والقابلة للإزالة
عبدالله باقشير replied to الجموعي's topic in منتدى الاكسيل Excel
اخي الفاضل الجموعي -
اخي الحبيب عبد الرحمن الحمصي ............حفظكم الله اخي الحبيب عادل ابو زيد ............حفظكم الله اخي الحبيب جمال عبد السميع ............حفظكم الله اخي الحبيب أبو حنين ............حفظكم الله اخي الحبيب أبو محمد عباس ............حفظكم الله اختي الفاضلة أم عبدالله ............حفظكم الله اخي الحبيب رجب جاويش............حفظكم الله اخي الحبيب محمد الاسيوطي ............حفظكم الله اخي الحبيب احمد غانم ............حفظكم الله اخي الحبيب احمد فؤاد............حفظكم الله اخي الحبيب عبدالله المجرب ............حفظكم الله اخي الحبيب حمادة باشا ............حفظكم الله اخي الحبيب حمادة عمر............حفظكم الله جزاكم الله خيرا واثابكم بدعائكم واعطاكم بمثله اضعاف مضاعفة تقبلوا تحياتي وشكري
- 18 replies
-
- قائمة
- Validation
-
(و1 أكثر)
موسوم بكلمه :
-
السلام عليكم ورحمة الله وبركاته قائمة Validation مختارة من نتيجة بحث في نفس خلية القائمة لا تحتاج الى ترتيب بيانات البحث وممكن استخدامها في اي ورقة من اوراق الملف المرفق 2003 بحث في خلايا قائمة التحقق من الصحة.rar
- 18 replies
-
- 8
-
- قائمة
- Validation
-
(و1 أكثر)
موسوم بكلمه :