كريم 201190

شكراً جزيلاً استاذ/ محمود أبوالدهب وجزاك الله خيراً

الف الف شكر استاذ / عبد الله وجزاك الله خيراً وجعل ذلك فى ميزان حسانتك

السادة الافاضل بعد التحية وجدت كود للبحث فى جميع صفحات اوراق العمل ووجدته فى عمل باسم استاذنا الفاضل / عبد الله باقشير ، وهذا العمل باسم (استيراد بيانات بطريقة النسخ واللصق مع فورم بحث في جميع اوراق العمل) عملت الفورم فى ملفى وحاولت ان انسخ الاكواد الموجودة فى ملف استاذنا الفاضل ولصقها فى الفورم الموجود بملفى ولكن لم يعمل كما اريد لذا رفعت اليكم ملفى وملف استاذنا الفاضل لنقل الكود الموجود به وتطويعه للعمل بملفى وهذا بعد اذن استاذنا الفاضل / عبد الله باقشير ولسيادتكم جزيل الشكر ملفى.rar ملف استاذ عبد الله باقشير.rar

شكرا على الاهتمام استاذ / ياسر وجزاك الله خيراً

السادة الافاضل ارجو مساعدتى فى تعديل هذا الكود حيث اريد ان يتم تسمية الصفحة الجديدة باسم "كشف رقم" بدلا من تسميتها بالوقت الحالى حيث حاولت ان اعدل بنفسى وتظهر رسالة تخبرنى ان الاسم موجود مسبقاً Sub Test() Dim ws As Worksheet Set ws = ThisWorkbook.Worksheets("معاشات استثنائية ") ws.Copy After:=Sheets(Sheets.Count) ActiveSheet.Name = Format(Time, "hhmmss") ws.Activate ws.Range("F12:H36").ClearContents MsgBox "Done ...", 64 End Sub

للرفع السادة الافاضل ارجوا من حضراتكم مساعدتى فى هذا الكود بحثت فى المنتدى ووجدت ان البحث يكون فى صفحات محددة ولكن المشكلة لدى ان صفحات البحث ليست ثابته اى انها فى ازدياد وبالتالى اريدكم ان تساعدونى فى كود يساعدنى فى البحث مهما زادت صفحات البحث ولكم جزيل الشكر واذا كان المطلوب صعب فأفيدونى

السادة الافاضل بعد التحية ،،،، ارجوا من حضراتكم مساعدتى فى تنفيذ الفكرة المطلوب تنفيذها بالملف المرفق ولسيادتكم جزيل الشكر كشوف معاشات استثنائية.rar

معذرة استاذ ياسر على التعب واتمنى من الله ان يجعله فى ميزان حسناتك وان شاء الله سوف اضع مرفق جديد للمطلوب وشكرا جزيلا على تعاونكم معنا

استاذى الجليل استاذ ياسر شكرا جزيلا على الاهتمام بالموضوع والرد بقى جزئية اخيرة وهى الاستعلام هل متاح من سيادتكم ومساعدتى فيها ام لا واكون شاكر لسيادتكم

السادة الافاضل ،،،، بعد السلام عليكم ورحمة الله وبركاته ارجوا من سيادتكم مساعدتى فى تنفيذ الفكرة المطلوبة فى الملف المرفق ولسيادتكم جزيل الشكر كشوف معاشات استثنائية.rar

بحاول اعمل برنامج فى القيمة الرأسمالية

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

اشكرك استاذ / محمود أبوالدهب وزادك الله من علمه وجزاك الله خيراً

السادة الافاضل بعد السلام عليكم ورحمة الله وبركاته ارجوا المساعدة فى الملف المطلوب وشكرا جزيلاً New Microsoft Excel Worksheet.rar

استاذ/ ابراهيم متشكر على الاهتمام والرد ولكن لم يعمل الكود معى او لم يعمل الملف كما اريد فهل من الممكن ان نجعل البحث استنادا الى التاريخ الموجود فى العمود G الموجود فى الشيت رقم 1