أكاديمية الصقر للتدريب

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
khaled alborene Eslam Abdullah-- لا تميز خلال هذه الفترة YasserKhalil تجزئة الاسماء المركبة وفصلها عن الاسماء العادية اكسيل اسئله واجابات


اعلان هنا
ألعاب فلاش أون لاين
أعلن هنا
أعلن هنا
صفحتنا على الفيس بوك
أعلن هنا



أهلا وسهلا بك زائرنا الكريم في أكاديمية الصقر للتدريب، لكي تتمكن من المشاركة ومشاهدة جميع أقسام المنتدى وكافة الميزات ، يجب عليك إنشاء حساب جديد بالتسجيل بالضغط هنا أو تسجيل الدخول اضغط هنا إذا كنت عضواً .





عمل فلتره باستخدام الماوس -أكاديمية الصقر للتدريب

السلام عليكم وعدناكم بكل ما هو جديد ونحن على العهد اليوم نقدم لكم اكواد حصريه بأكاديمية الصقر للتدريب تقوم بعمل فلتره با ..



06-09-2017 01:37 مساء
الصقر
مدير المنتدى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 2
المشاركات : 1655
الجنس : ذكر
الدعوات : 15
يتابعهم : 0
يتابعونه : 553
قوة السمعة : 17122
الاعجاب : 183
موقعي : زيارة موقعي
 offline 

السلام عليكم
وعدناكم بكل ما هو جديد ونحن على العهد
اليوم نقدم لكم اكواد حصريه بأكاديمية الصقر للتدريب
تقوم بعمل فلتره باستخدام الماوس ( دبل كليك لعمل فلتره على خليه محدده بالعمود - ولألغاء الفتره تضغط رايت كليك
تقبلوا تحياتى

لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب


MzE0NDE3MQ3939sort
 
 
  عمل فلتره باستخدام الماوس -أكاديمية الصقر للتدريب.zip   تحميل zip مرات التحميل :(120)
الحجم :(48.443) KB


أثارت هذه المشاركة إعجاب: nyfmpha، السعيد الجزائري،


توقيع :الصقر

اخى العضو الكريم
اذا كنت ترى ان المنتدى مفيد لك
فكن سفيرا لنا بدعوة الاخرين للانضمام معنا
فالدال على الخير كفاعله




06-09-2017 02:07 مساء
مشاهدة مشاركة منفردة [1]
أشرف عبد المنعم
عضو
معلومات الكاتب ▼
تاريخ الإنضمام : 06-09-2017
رقم العضوية : 399
المشاركات : 7
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 20-3-1971
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 28
الاعجاب : 0
 offline 
look/images/icons/i1.gif عمل فلتره باستخدام الماوس -أكاديمية الصقر للتدريب
حقيقي انا انبهرت بالكود لكن احتاج شرح الكود بمزيد من التفصيل





06-09-2017 02:20 مساء
مشاهدة مشاركة منفردة [2]
Kamel meraghni
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 26-08-2017
رقم العضوية : 182
المشاركات : 102
الجنس : ذكر
تاريخ الميلاد : 23-10-1984
يتابعهم : 7
يتابعونه : 6
قوة السمعة : 631
الاعجاب : 5
 offline 
look/images/icons/i1.gif عمل فلتره باستخدام الماوس -أكاديمية الصقر للتدريب
جزاك الله خيرا



توقيع :Kamel meraghni

الحمد لله وكفى والصلاة والسلام على الحبيب المصطفى



142




06-09-2017 02:32 مساء
مشاهدة مشاركة منفردة [3]
الصقر
مدير المنتدى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 2
المشاركات : 1655
الجنس : ذكر
الدعوات : 15
يتابعهم : 0
يتابعونه : 553
قوة السمعة : 17122
الاعجاب : 183
موقعي : زيارة موقعي
 offline 
look/images/icons/i1.gif عمل فلتره باستخدام الماوس -أكاديمية الصقر للتدريب
المشاركة الأصلية كتبت بواسطة: أشرف عبد المنعم
حقيقي انا انبهرت بالكود لكن احتاج شرح الكود بمزيد من التفصيل

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



توقيع :الصقر

اخى العضو الكريم
اذا كنت ترى ان المنتدى مفيد لك
فكن سفيرا لنا بدعوة الاخرين للانضمام معنا
فالدال على الخير كفاعله



06-09-2017 02:47 مساء
مشاهدة مشاركة منفردة [4]
أشرف عبد المنعم
عضو
معلومات الكاتب ▼
تاريخ الإنضمام : 06-09-2017
رقم العضوية : 399
المشاركات : 7
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 20-3-1971
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 28
الاعجاب : 0
 offline 
look/images/icons/i1.gif عمل فلتره باستخدام الماوس -أكاديمية الصقر للتدريب
زي ما تفضلت و كتبت شرح الدالة في صورة 
ممكن تكتب الكود و جانبه شرح لكل سطر 
في صورة برضو او حتي ملف أكسل أو وورد
ليس الكل علي دراية عالية بكل دوال الأكسيل biggrin2





06-09-2017 03:03 مساء
مشاهدة مشاركة منفردة [5]
YasserKhalil
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 6582
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 400
قوة السمعة : 18172
الاعجاب : 620
 offline 
look/images/icons/i1.gif عمل فلتره باستخدام الماوس -أكاديمية الصقر للتدريب
بارك الله فيك أخي الحبيب حسام ومشكور على موضوعاتك المميزة
الحقيقة أنني لم أنبهر دا لأني متعود منكم على الإبداع وتقديم كل ما هو مبهر smile

بالنسبة للشرح أخي العزيز أشرف : الأفضل متابعة الدورة الحالية التي يقدمها الأخ الغالي حسام خطاب لأن معرفة الأساسيات ستجعل من تلك الأكواد أسطر سهلة ويسيرة بالنسبة لك
 

أثارت هذه المشاركة إعجاب: السعيد الجزائري،




06-09-2017 03:04 مساء
مشاهدة مشاركة منفردة [6]
الصقر
مدير المنتدى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 2
المشاركات : 1655
الجنس : ذكر
الدعوات : 15
يتابعهم : 0
يتابعونه : 553
قوة السمعة : 17122
الاعجاب : 183
موقعي : زيارة موقعي
 offline 
look/images/icons/i1.gif عمل فلتره باستخدام الماوس -أكاديمية الصقر للتدريب
استاذ اشرف بالنسبه للشرح تابعنا هنقدم سلسله شروحات من الصفر
ام بخصوص الكود يمكنك الدخول لمحرر الاكود ونسخه
عندك فى حدث الورقه اكواد وفى الموديول اكواد
 



توقيع :الصقر

اخى العضو الكريم
اذا كنت ترى ان المنتدى مفيد لك
فكن سفيرا لنا بدعوة الاخرين للانضمام معنا
فالدال على الخير كفاعله



06-09-2017 07:00 مساء
مشاهدة مشاركة منفردة [7]
ابوحمزه
عضو
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 27-08-2017
رقم العضوية : 233
المشاركات : 14
الجنس : ذكر
تاريخ الميلاد : 1-1-1983
الدعوات : 1
يتابعهم : 4
يتابعونه : 4
قوة السمعة : 73
الاعجاب : 1
 offline 
look/images/icons/i1.gif عمل فلتره باستخدام الماوس -أكاديمية الصقر للتدريب
كود رائع ... بارك الله فيكم






06-09-2017 07:06 مساء
مشاهدة مشاركة منفردة [8]
khaled alborene
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 16
المشاركات : 655
الجنس : ذكر
تاريخ الميلاد : 9-9-1990
الدعوات : 2
يتابعهم : 9
يتابعونه : 8
قوة السمعة : 770
الاعجاب : 32
 Online 
look/images/icons/i1.gif عمل فلتره باستخدام الماوس -أكاديمية الصقر للتدريب
استاذ حسام كيف ربط الكود بالماوس بما انه الها مديول ومش بحدث الصفحة





06-09-2017 07:49 مساء
مشاهدة مشاركة منفردة [9]
Yasser Elaraby
المشرف العام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 1
المشاركات : 1118
الجنس : ذكر
الدعوات : 13
مشاركات مكتبة الميديا: 25
يتابعهم : 2
يتابعونه : 586
قوة السمعة : 8069
الاعجاب : 274
موقعي : زيارة موقعي
 offline 
look/images/icons/i1.gif عمل فلتره باستخدام الماوس -أكاديمية الصقر للتدريب
المشاركة الأصلية كتبت بواسطة: khaled alborene
استاذ حسام كيف ربط الكود بالماوس بما انه الها مديول ومش بحدث الصفحة


اولا مشكور اخي حسام على الموضوع المميز 

ثانيا اخي خالد هتلاقي حدثين في الشيت مرتبطين بالاكواد الموجودة بالموديول افتح محرر الاكواد واذهب للشيت وانت هتلاقي حدث للدبل كليك والاخر للكليك يمين
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If ActiveCell = "" Then Exit Sub
Cancel = True
Call Filter
End Sub

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
If ActiveCell = "" Then Exit Sub
Cancel = True
Call EndFilter
End Sub


تحياتي



توقيع :Yasser Elaraby
663013020



06-09-2017 08:16 مساء
مشاهدة مشاركة منفردة [10]
ناصر سعيد
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 9
المشاركات : 157
الجنس : ذكر
تاريخ الميلاد : 1-1-1985
الدعوات : 1
يتابعهم : 0
يتابعونه : 3
قوة السمعة : 197
الاعجاب : 1
 offline 
look/images/icons/i1.gif عمل فلتره باستخدام الماوس -أكاديمية الصقر للتدريب
Sub Filter()
'هذا الكود للاستاذ المحترم الصقر
'الهدف من الكود هو الفلتره باستخدام الماوس
'نم في 5/9/2017
'=========
    If ActiveCell = "" Then Exit Sub
    Selection.AutoFilter Field:=ActiveCell.Column - (ActiveCell.CurrentRegion.Column - 1), Criteria1:=ActiveCell
End Sub
Sub EndFilter()

    If ActiveCell = "" Then Exit Sub
        Dim ws As Worksheet
    Dim f As Filter
    Dim n As Long
    Set ws = ActiveSheet
    On Error GoTo 1
    For Each f In ws.AutoFilter.Filters
        If f.On Then n = n + 1
    Next f
1
    If n <= 1 Then
        ActiveSheet.AutoFilterMode = False
    Else
        Selection.AutoFilter Field:=ActiveCell.Column - (ActiveCell.CurrentRegion.Column - 1)
    End If
End Sub
'======================
'======================
' من هنا يوضع في حدث الصفحه المراد فلترتها
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'هذا الكود يوضع في حدث الورقه المطلوب فلترتها
If ActiveCell = "" Then Exit Sub
Cancel = True
Call Filter
End Sub

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
If ActiveCell = "" Then Exit Sub
Cancel = True
Call EndFilter
End Sub

جزاكم الله خيرا وبارك فيك استاذ الصقر



توقيع :ناصر سعيد
جزاكم الله خيرا



06-09-2017 08:41 مساء
مشاهدة مشاركة منفردة [11]
khaled alborene
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 16
المشاركات : 655
الجنس : ذكر
تاريخ الميلاد : 9-9-1990
الدعوات : 2
يتابعهم : 9
يتابعونه : 8
قوة السمعة : 770
الاعجاب : 32
 Online 
look/images/icons/i1.gif عمل فلتره باستخدام الماوس -أكاديمية الصقر للتدريب
شكرا الك استاذ ياسر ما قصرة 





06-09-2017 09:10 مساء
مشاهدة مشاركة منفردة [12]
خالد عيسى
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 19
المشاركات : 26
الجنس : ذكر
تاريخ الميلاد : 9-9-1969
الدعوات : 1
يتابعهم : 1
يتابعونه : 7
قوة السمعة : 228
الاعجاب : 0
 offline 
look/images/icons/i1.gif عمل فلتره باستخدام الماوس -أكاديمية الصقر للتدريب

كود جميل !!









الكلمات الدلالية
فلتره ، باستخدام ، الماوس ، -أكاديمية ، الصقر ، للتدريب ،


 







اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.



الساعة الآن 10:26 مساء

أعلن هنا
أعلن هنا
أعلن هنا