الفشل2004 قام بنشر نوفمبر 17, 2004 مشاركة قام بنشر نوفمبر 17, 2004 ارغب ان اعمل مجموعة من الازرار بحيث عند الضغط عليها يتم تصفية البيانات الموجودة في احد الاعمدة حسب خيار محدد مثلا اذا كان خلايا عمود معين تحوي على 1 او 0 وارت ان اعمل تصفية بحيث تضهر الخانات التي تحوي على 1 بدون الذهاب الى الى بيانات >>>> ثم تصفية >>>>> ثم تصفية تلقائية ارجو من له في هذا ان يفيدني؟؟ :h رابط هذا التعليق شارك More sharing options...
محمد حجازي قام بنشر نوفمبر 17, 2004 مشاركة قام بنشر نوفمبر 17, 2004 السلام عليكم .. يمكنك ذلك عن طريق كود الـ VBA وبالتحديد التعليمة AutoFilter هذه أول مرة أستخدم فيها هذه التعليمة ، فإذا كان هناك بعض الأخطاء في شرحي أرجو من الأعضاء التصحيح ... انظر إلى الكود التالي : Worksheets("Sheet1").Range("A1").AutoFilter Field:=2, Criteria1:="1" الكود السابق يقوم بعمل التصفية على البيانات الموجودة في الورقة Sheet1 و المتضمنة للخلية A1 ، وهذه التصفية تنفذ بالاعتماد على حقل البيانات الثاني وبالنسبة للقيمة 1 (كما كنت تريد) رابط هذا التعليق شارك More sharing options...
الفشل2004 قام بنشر نوفمبر 19, 2004 الكاتب مشاركة قام بنشر نوفمبر 19, 2004 والله تستاهل كل خير يا استاذي العزيز لكن عندي سؤال اذا حبيت تعمل جنب نفس الز زر مايكرو اخر يقوم بالغاء عمل الاول بنفس الطريقة عند الضغط عليه كيف يكون؟؟ وسموحة منك اذا ثقلت في الطلابات رابط هذا التعليق شارك More sharing options...
محمد حجازي قام بنشر نوفمبر 19, 2004 مشاركة قام بنشر نوفمبر 19, 2004 السلام عليكم ورحمة الله وبركاته،، جرب الكود التالي : If Worksheets("Sheet1").AutoFilterMode Then Worksheets("Sheet1").Range("A1").AutoFilter End If رابط هذا التعليق شارك More sharing options...
محمودعبدالعزيز قام بنشر نوفمبر 21, 2004 مشاركة قام بنشر نوفمبر 21, 2004 اللة يعطيك العافية اخ محمد ولكن الكود لم يعلم الا عندما غيرت الموجود عند العبارة التالي AutoFilter Field:=2 من الرقم 2 الي الرقم 1 فنجح معي السؤال : لماذ نستخدم هذة الارقام ؟ يعني ايش فائدتها ؟ الامر الثاني الامر الانتقل الي الخلية Range("A1"). لماذا هل ياخذ من الخلية A1 البيانا التي تحدد التصفية ؟ لانني جعلت هذة الخلية فارغة فنجح التصفية وكتبت ارقام اخري فتمت التصفية ارجو منك التركم بالشرح رابط هذا التعليق شارك More sharing options...
محمد حجازي قام بنشر نوفمبر 21, 2004 مشاركة قام بنشر نوفمبر 21, 2004 السلام عليكم ... بالنسبة للعبارة التالية AutoFilter Field:=2 فهي لن تعمل إذا كان جدول البيانات يحتوي على عامود (حقل) بيانات واحد ، أي أن الرقم الذي تضعه يجب أن يكون من ضمن عدد أعمدة البيانات (أصغر من أو يساوي عدد أعمدة البيانات الموجودة) ، وعندما تضع رقماً أكبر من عدد أعمدة (حقول) البيانات الموجودة على ورقة العمل فإنك ستتسبب بالخطأ 1004. أما بالنسبة لملاحظتك الثانية فجرب أن تغير المرجع إلى خلية خارج نطاق سجلات البيانات ، فمثلاً إذا كانت بياناتك موجودة على خمس سجلات (صفوف) ضمن النطاق A2:C6 فإن تغيير المرجع في الكود إلى A10 مثلاً سيتسبب في ظهور الخطأ 1004 هذا شرح باختصار ، وكما ذكرت فالتعليمة AutoFilter جديدة علي ، فعلى من يرغب بالتصحيح أو التوضيح فليتفضل ... وله جزيل الشكر رابط هذا التعليق شارك More sharing options...
الردود الموصى بها