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

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
مالك ماريه ali mohamed ali-- لا تميز خلال هذه الفترة YasserKhalil تعديل الكود ليتم حفظ الصوة باسم الخلية مع تاريخ اليوم  اكسيل اسئله واجابات


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



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





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

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



06-09-2017 01:37 مساء
الصقر
menu_open عضوية موثقة
مدير المنتدى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 2
المشاركات : 1726
الجنس : ذكر
الدعوات : 17
يتابعهم : 0
يتابعونه : 581
قوة السمعة : 17825
الاعجاب : 371
موقعي : زيارة موقعي
 offline 

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

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


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


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


توقيع :الصقر

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




06-09-2017 02:07 مساء
مشاهدة مشاركة منفردة [1]
أشرف عبد المنعم
menu_open
عضو
معلومات الكاتب ▼
تاريخ الإنضمام : 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
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 26-08-2017
رقم العضوية : 182
المشاركات : 106
الجنس : ذكر
تاريخ الميلاد : 23-10-1984
يتابعهم : 7
يتابعونه : 6
قوة السمعة : 641
الاعجاب : 10
 offline 
look/images/icons/i1.gif عمل فلتره باستخدام الماوس -أكاديمية الصقر للتدريب
جزاك الله خيرا



توقيع :Kamel meraghni

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



142




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

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



توقيع :الصقر

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



06-09-2017 02:47 مساء
مشاهدة مشاركة منفردة [4]
أشرف عبد المنعم
menu_open
عضو
معلومات الكاتب ▼
تاريخ الإنضمام : 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
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 7895
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 421
قوة السمعة : 22861
الاعجاب : 2122
 offline 
look/images/icons/i1.gif عمل فلتره باستخدام الماوس -أكاديمية الصقر للتدريب
بارك الله فيك أخي الحبيب حسام ومشكور على موضوعاتك المميزة
الحقيقة أنني لم أنبهر دا لأني متعود منكم على الإبداع وتقديم كل ما هو مبهر smile

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

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




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



توقيع :الصقر

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



06-09-2017 07:00 مساء
مشاهدة مشاركة منفردة [7]
ابوحمزه
menu_open
عضو
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
menu_open
عضو متميز
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 16
المشاركات : 720
الجنس : ذكر
تاريخ الميلاد : 9-9-1990
الدعوات : 2
يتابعهم : 10
يتابعونه : 8
قوة السمعة : 861
الاعجاب : 76
 offline 
look/images/icons/i1.gif عمل فلتره باستخدام الماوس -أكاديمية الصقر للتدريب
استاذ حسام كيف ربط الكود بالماوس بما انه الها مديول ومش بحدث الصفحة





06-09-2017 07:49 مساء
مشاهدة مشاركة منفردة [9]
Yasser Elaraby
menu_open عضوية موثقة
المشرف العام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 1
المشاركات : 1209
الجنس : ذكر
الدعوات : 13
مشاركات مكتبة الميديا: 25
يتابعهم : 2
يتابعونه : 604
قوة السمعة : 8775
الاعجاب : 501
موقعي : زيارة موقعي
 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]
ناصر سعيد
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 9
المشاركات : 219
الجنس : ذكر
تاريخ الميلاد : 1-1-1985
الدعوات : 1
يتابعهم : 0
يتابعونه : 3
قوة السمعة : 434
الاعجاب : 74
 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
menu_open
عضو متميز
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 16
المشاركات : 720
الجنس : ذكر
تاريخ الميلاد : 9-9-1990
الدعوات : 2
يتابعهم : 10
يتابعونه : 8
قوة السمعة : 861
الاعجاب : 76
 offline 
look/images/icons/i1.gif عمل فلتره باستخدام الماوس -أكاديمية الصقر للتدريب
شكرا الك استاذ ياسر ما قصرة 





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

كود جميل !!









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


 







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



الساعة الآن 11:19 مساء

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