اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

السادة خبراء الاكسل :

تحية و بعد

بعد عمل التصفية التلقائية يظهر زر بجانب الخلية بالنقر عليه بالماوس تظهر خيارات التصفية , الا انه هناك اختصار من لوحة المفاتيح ( زرين ) بالضغط عليهما يتم فتح قائمة التصفيه , جربت معظم الأزرار ولم انجح , هل من احد يعرف ؟؟؟؟؟؟؟؟؟؟؟ :rol:

شكرا تحياتي للجميع

قام بنشر

السلام عليكم

بالنسبة للإختصار التابع للأوفيس لأعلم

ولكن بالإمكان عمل إختصار

حط هذا الكود في حدث Thisworkbook عمل الكود لفتح القائمة بزر F3


Private Sub Workbook_Open()

Application.OnKey "{F3}", "FF"

End Sub

وهذا الكود في مودويل

Sub FF()

'*******************

' غير المدى إلى أي مدى تريد

Set My_R = ActiveSheet.Range("A1:M1")

'

'*******************

If Not Intersect(ActiveCell, My_R) Is Nothing Then

With Application

.Goto ActiveCell

.SendKeys ("%{DOWN}")

End With

End If

End Sub

Ali_By.rar

قام بنشر

يتم فتح قائمة التصفية بالضغط على زرى

ALT+سهم لاسفل من اسهم الحركه بالكيبورد

بعد تحديد الخليه المراد فتح قائمة التصفيه لها

قام بنشر

يتم فتح قائمة التصفية بالضغط على زرى

ALT+سهم لاسفل من اسهم الحركه بالكيبورد

بعد تحديد الخليه المراد فتح قائمة التصفيه لها

شكرا جزيلا اخي الفاضل

تعمل 100 بالـ100

شكرا جزيلا

و شكرا لكل من داخل بالجواب

اما ctrl+shift+ l لم تعمل

اما الاكواد سأجربها

أكرر شكري للجميع

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information