۩◊۩ أبو حنين ۩◊۩ قام بنشر نوفمبر 13, 2013 قام بنشر نوفمبر 13, 2013 السلام عليكم الاخوه الاعزاء هذا كود تصفيه نتقدمه كيف لى ان اجعل الكود بتم تلقائى دون الضغط على زر الكود Sub Macro2() ' ' Macro2 Macro ' Sheets("Sheet2").Select Sheets("Sheet1").Range("A1:E27").AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=Sheets("Sheet1").Range("H1:I2"), CopyToRange:=Range( _ "Sheet2!Extract"), Unique:=False End Sub شاكرا لكم تعاونكم
حمادة عمر قام بنشر نوفمبر 14, 2013 قام بنشر نوفمبر 14, 2013 الاخ الكريم / ۩◊۩ أبو حنين ۩◊۩ بارك الله فيك يمكنك وضع الكود التالي في حدث Sheet2 حيث عند اختياره وتنشيطة يعمل الكود تلقائيا Private Sub Worksheet_Activate() Macro2 End Sub ولكن اخي الكريم ياريت لو ترفق ملف كمثال ليتضح الامر اكثر وتكون الاجابة اكثر دقة تقبل خالص تحياتي 1
۩◊۩ أبو حنين ۩◊۩ قام بنشر نوفمبر 14, 2013 الكاتب قام بنشر نوفمبر 14, 2013 السلام عليكم اخى العزيز حماده الماكرو عن طريف filtir advancer هل بمكن جعل الفلتر بين تاريخين وهل يمكن ان يعمل الفتر الناتج عن filtir advancer بمجر ادخال البيانات دون الضغط على زر الفلتر شاكر للجميع Book1.rar
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.