الفكرة ان مش ببقا عارف الشيت اللي في البيانات دي يعني انا عامل فورم للبحث عن الاسم هو يبحث كل الشيتات ويطلع البيانات المطابقة ويعرضها فا مش ببقا عارف الشيت اصلا
في الحالة دي هو هيعدل في الشيت المفتوح فقط
انا كنت عندي المشكلة دي في البحث كمان بس شخص عزيز عليا ساعدني وعدل الكود ده واشتغلت
ws_sheets = ActiveWorkbook.Worksheets.Count
For i = 3 To ws_sheets - 2
sheet_name = ActiveWorkbook.Worksheets(i).Name
With Sheets(sheet_name)
لماذا دائما في تجاهل من حضارتكم لكل مواضيعي ولا اجد اي رد واذا وجد اشعر كانه استهزاء
وكل مشاكلي التي اعرضها نادرا لما تتحل
عايز افهم يعني لو انا بعمل حاجة غلط ؟
1. يوجد خطاء بالكود الخاص بالطباعة
2. زرار تعديل البيانات ياخذ وقت طويل نسبيا علشان يعدل وكمان بدل خانات مكان خانات ومسح خانات
زى انا حطيت سنة التخرج 2020 و وموقف التجنيد مسحة ومعدلوش
وكرر النسبة وحطها في سنة التخرج
وعايز رسالة تظهر عند الضغط علي زرار تعديل البيانات ويسالني هل تريد التعديل ام لا
1. تمام الف شكر
2. تم ظهور الخطاء عندي بمجرد دخولي لشيت (data ) وتعديل اى بيانات فية
3. انا كنت عايز عايز اطبع الفورم كما هو بس اقتراحك بعمل شيت اخر للغرض دة عجبني ولهذا ممكن نعمل شيت للبيانات دي وينطبع اكيد هيبقي احسن
بالنسبة للبحث في مشكلة في عرض البيانات
اما الطباعة انا هحتاج اني اكبر الفورم زى ما كان علشان اعرضة كويس ليا وبكدة المقاسات هتختلف وحضرتك عاملة portirait اما انا عايزة landscape
بالنسبة لزرار تعديل البيانات ؟؟؟؟
محتاج مساعده في كود التكست بوكس بتاع السيرش اللي في فورم البحث بحيث يبحث عن الاسماء وبمجرد اختيار الاسم من الليست بوكس يعرض جميع بياناتة
مساعدة في برمجة الازار
بالنسبة لزرار الطباعة عايزة يطبع الفورم علي ورقم A4 وتكون Landscape بحث تاخد الفورم كامل
زرار التعديل يعطي رسالة تنبية قبل تعديل البيانات يسالني فعلا هل تريد تعدبل البيانات ام لا
واسف جدا علي الاطالة
القاعدة.xlsm